BLCC#88329 Goedkeuringsflow huurcontracten werkt niet zonder contractbedrag

svn path=/Database/trunk/; revision=69280
This commit is contained in:
Erik Groener
2025-06-04 09:18:57 +00:00
parent f697fe9e68
commit 421dd7c0da

View File

@@ -78,7 +78,7 @@ CREATE OR REPLACE PACKAGE BODY cnt AS
END IF;
WHEN 3 -- Ter goedkeuring
THEN
IF currentstatus = 2
IF currentstatus = 2 OR currentstatus IS NULL
THEN
newstatus := pstatus;
eventcode := 'CNTCPT';
@@ -401,6 +401,7 @@ CREATE OR REPLACE PACKAGE BODY cnt AS
newkey NUMBER;
nummer1 cnt_contract.cnt_contract_nummer_intern%TYPE;
amount1 cnt_contract.cnt_contract_kosten%TYPE;
approve_new cnt_disc_params.cnt_disc_params_approve_new%TYPE;
srtcontract_type cnt_disc_params.cnt_srtcontract_type%TYPE;
new_status cnt_contract.cnt_contract_status%TYPE;
tracking VARCHAR2 (4000);
@@ -423,8 +424,9 @@ CREATE OR REPLACE PACKAGE BODY cnt AS
cnt_contract_nummer_intern,
cnt_contract_kosten,
cdp.cnt_srtcontract_type,
cdp.cnt_disc_params_approve_new,
c.cnt_contract_status
INTO begin1, eind1, versie1, nummer1, amount1, srtcontract_type, new_status
INTO begin1, eind1, versie1, nummer1, amount1, srtcontract_type, approve_new, new_status
FROM cnt_contract c,
cnt_disc_params cdp
WHERE c.ins_discipline_key = cdp.cnt_ins_discipline_key
@@ -442,7 +444,12 @@ CREATE OR REPLACE PACKAGE BODY cnt AS
eind1 := eind1;
IF (fac.getsetting('cnt_contract_approval') = 1 AND srtcontract_type != 6)
THEN
new_status := 2; -- altijd op nieuw
IF (approve_new = 1)
THEN
new_status := 3; -- gesplitst contract altijd accorderen
ELSE
new_status := 2; -- altijd op nieuw
END IF;
ELSE
new_status := 0; -- direct actief
END IF;