BLCC#59950 Nieuwe werkwijze gepland onderhoud

svn path=/Customer/trunk/; revision=46207
This commit is contained in:
Maarten van der Heide
2020-03-12 12:55:32 +00:00
parent 6730f48068
commit 38318f44be

View File

@@ -20144,6 +20144,7 @@ AS
oracle_err_num NUMBER;
oracle_err_mes VARCHAR2 (200);
v_aanduiding VARCHAR2 (200);
v_importeur_key NUMBER (10);
v_count NUMBER (10);
v_count_del NUMBER (10);
v_count_upd NUMBER (10);
@@ -20162,7 +20163,7 @@ AS
WHERE cp.cnt_contract_plaats_verwijder IS NULL
AND cp.cnt_contract_key = c.cnt_contract_key
AND c.ins_discipline_key = 2221 -- Planned Maintenance
AND c.cnt_contract_status = 0 -- Definitief
--AND c.cnt_contract_status = 0 -- Definitief
AND NOT EXISTS -- Beschouw alleen laatste versie van contracten?
(SELECT 1
FROM cnt_v_aanwezigcontract
@@ -20194,7 +20195,7 @@ AS
(SELECT * FROM cnt_contract_plaats WHERE cnt_alg_plaats_code = 'G') cp
WHERE UPPER (i.contractnr) = UPPER (c.cnt_contract_nummer_intern || DECODE (c.cnt_contract_versie, NULL, '', '.' || c.cnt_contract_versie))
AND c.ins_discipline_key = 2221 -- Planned Maintenance
AND c.cnt_contract_status = 0 -- Definitief
--AND c.cnt_contract_status = 0 -- Definitief
AND UPPER (i.gebouwcode) = g.alg_gebouw_upper(+)
AND c.cnt_contract_key = cp.cnt_contract_key(+)
AND g.alg_gebouw_key = cp.cnt_alg_plaats_key(+)
@@ -20208,10 +20209,17 @@ AS
cnt_v_aanwezigcontract c
WHERE UPPER (i.contractnr) = UPPER (c.cnt_contract_nummer_intern || DECODE (c.cnt_contract_versie, NULL, '', '.' || c.cnt_contract_versie))
AND c.ins_discipline_key = 2221 -- Planned Maintenance
AND c.cnt_contract_status = 0 -- Definitief
--AND c.cnt_contract_status = 0 -- Definitief
GROUP BY c.cnt_contract_key, i.contractnr
ORDER BY 1;
BEGIN
v_errormsg := 'Fout bepalen importeur';
SELECT prs_perslid_key
INTO v_importeur_key
FROM fac_import
WHERE fac_import_key = p_import_key;
v_count_del := 0;
FOR rec IN c1
@@ -20296,6 +20304,8 @@ BEGIN
SET cnt_contract_kosten = rec.gebouwtotaal
WHERE cnt_contract_key = rec.cnt_contract_key;
fac.trackaction ('CNTUPD', rec.cnt_contract_key, v_importeur_key, NULL, 'Contract-scope bijgewerkt via import');
v_count_upd := v_count_upd + 1;
COMMIT;
EXCEPTION