Skip to content

Commit d80aba9

Browse files
authored
Finish mngoe/develop
OSD-222: Double HOF Check
2 parents f4a34a7 + e82c600 commit d80aba9

1 file changed

Lines changed: 27 additions & 0 deletions

File tree

sql/stored_procedures/uspConsumeEnrollments.sql

Lines changed: 27 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -584,6 +584,33 @@ CREATE PROCEDURE [dbo].[uspConsumeEnrollments](
584584
WHERE I.ValidityTo IS NULL AND I.IsHead = 1 AND I.CHFID IS NULL)
585585
RAISERROR(N'-1',16,1)
586586

587+
IF EXISTS(SELECT COUNT(1)
588+
FROM @tblInsuree TI
589+
LEFT OUTER JOIN tblInsuree I ON TI.CHFID = I.CHFID
590+
WHERE I.ValidityTo IS NULL
591+
AND I.IsHead = 1
592+
GROUP BY TI.FamilyID
593+
HAVING COUNT(1) > 1)
594+
595+
--Added by Amani
596+
BEGIN
597+
DELETE FROM @tblResult;
598+
SET @FamilyImported = 0;
599+
SET @FamilyRejected =0;
600+
SET @FamiliesUpd =0;
601+
SET @InsureeImported = 0;
602+
SET @InsureeUpd =0;
603+
SET @PolicyImported = 0;
604+
SET @PolicyImported = 0;
605+
SET @PolicyRejected = 0;
606+
SET @PremiumImported = 0
607+
INSERT INTO @tblResult VALUES
608+
(N'<h3 style="color:red;">Double HOF Found. <br />Please contact your IT manager for further assistant.</h3>')
609+
--GOTO EndOfTheProcess;
610+
611+
RAISERROR(N'-5',16,1)
612+
END
613+
587614
--Duplicate Receipt
588615
IF EXISTS(SELECT 1 FROM @tblPremium TPR
589616
INNER JOIN tblPremium PR ON PR.PolicyID = TPR.PolicyID AND TPR.Amount = PR.Amount AND TPR.Receipt = PR.Receipt

0 commit comments

Comments
 (0)