admin/Database
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

BAMG#85636 Uitbreiding BAMG#83299 met diverse verlengingstermijnen

Browse Source 
svn path=/Database/trunk/; revision=68572
This commit is contained in:
Erik Groener
2025-03-28 10:17:35 +00:00
parent cac9273fe1
commit 9e2e11c403
1 changed files with 9 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

14
CNT/CNT_PAC.SRC
View File

@@ -271,7 +271,7 @@ CREATE OR REPLACE PACKAGE BODY cnt AS
AND cn.cnt_contract_verwijder IS NULL
);
tracking VARCHAR2(4000);
tracking VARCHAR2(4000);
next_termijn cnt_termijn.cnt_termijn_key%TYPE;
next_einddatum cnt_contract.cnt_contract_looptijd_tot%TYPE;
BEGIN
@@ -294,15 +294,19 @@ CREATE OR REPLACE PACKAGE BODY cnt AS
INTO next_termijn
, next_einddatum
FROM cnt_verlengschema
WHERE cnt_contract_key = cnt_verloopt.cnt_contract_key
AND cnt_verlengschema_einddatum = cnt_verloopt.dtnieuw;
--
WHERE cnt_verlengschema_einddatum =
(SELECT MIN(cnt_verlengschema_einddatum)
FROM cnt_verlengschema
WHERE cnt_contract_key = cnt_verloopt.cnt_contract_key
AND cnt_verlengschema_einddatum > cnt_verloopt.dtnieuw
);
UPDATE cnt_contract
SET cnt_contract_verleng_termijn = next_termijn
, cnt_contract_looptijd_tot = next_einddatum
WHERE cnt_contract_key = cnt_verloopt.cnt_contract_key;
EXCEPTION
WHEN NO_DATA_FOUND THEN NULL;
-- Laat laatste verlengtermijn staan als er geen volgende in het schema gevonden kan worden.
END;
END LOOP;
END;