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=68563
This commit is contained in:
Erik Groener
2025-03-27 11:55:12 +00:00
parent 6bdf33fe19
commit cac9273fe1
4 changed files with 48 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
CNT/CNT_IND.SRC
View File

@@ -27,6 +27,8 @@ CREATE UNIQUE INDEX cnt_i_cnt_factuurschema1 ON cnt_factuurschema(cnt_contract_k
CREATE INDEX cnt_i_cnt_srtkenmerk1 ON cnt_srtkenmerk(cnt_srtkenmerk_code);
CREATE INDEX cnt_i_cnt_kenmerk1 ON cnt_kenmerk(cnt_kenmerk_code);
CREATE INDEX cnt_i_cnt_verlengschema ON cnt_verlengschema(cnt_contract_key);
REGISTERONCE('$Id$')
#endif // CNT

20
CNT/CNT_PAC.SRC
View File

@@ -272,6 +272,8 @@ CREATE OR REPLACE PACKAGE BODY cnt AS
);
tracking VARCHAR2(4000);
next_termijn cnt_termijn.cnt_termijn_key%TYPE;
next_einddatum cnt_contract.cnt_contract_looptijd_tot%TYPE;
BEGIN
FOR cnt_verloopt IN c_verleng
LOOP
@@ -284,6 +286,24 @@ CREATE OR REPLACE PACKAGE BODY cnt AS
, '{1}', TO_CHAR(cnt_verloopt.dtnieuw,'dd-mm-yyyy')
);
fac.trackaction ('CNTUPD', cnt_verloopt.cnt_contract_key, NULL, NULL, tracking);
-- Heeft dit automatisch verlengbaar contract een verlengschema?
-- Dan volgende verlengtermijn uit verlengschema naar het veld verlengtermijn verplaatsen.
BEGIN
SELECT cnt_verlengschema_verlengtermijn
, cnt_verlengschema_einddatum
INTO next_termijn
, next_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;
END;
END LOOP;
END;

12
CNT/CNT_TAB.SRC
View File

@@ -455,6 +455,18 @@ CREATE_TABLE(cnt_factuurschema , 0)
DEFAULT SYSDATE
);
CREATE TABLE(cnt_verlengschema, 0)
(
cnt_contract_key
NUMBER(10)
CONSTRAINT cnt_r_cnt_contract_key2 REFERENCES cnt_contract(cnt_contract_key),
cnt_verlengschema_einddatum
DATE,
cnt_verlengschema_verlengtermijn
NUMBER(10)
CONSTRAINT cnt_r_cnt_termijn_key6 REFERENCES cnt_termijn(cnt_termijn_key)
);
REGISTERONCE('$Id$')