diff --git a/MAAS/maas.sql b/MAAS/maas.sql index 0d43b0358..b3484634b 100644 --- a/MAAS/maas.sql +++ b/MAAS/maas.sql @@ -251,7 +251,7 @@ BEGIN -- Bepalen van het ticknr. uit Valuemation, deze is vooral van belang bij het confirmation bericht v_errormsg := '(0x246)' || v_mldkey || psubject || v_actie; - v_vmnr := SUBSTR (psubject, 11, 12); + v_vmnr := substr(regexp_replace(psubject, '[^0-9]', ''),0, 12); -- Bepalen van mld_melding_key v_errormsg := '(0x247)' || v_mldkey || psubject || v_actie; @@ -283,18 +283,18 @@ BEGIN -- Bepalen van opdrachtvolgnr v_errormsg := '(0x248)' || v_mldkey || psubject || v_actie; v_opdrvolgnr := - SUBSTR ( - SUBSTR ( - SUBSTR (psubject, INSTR (psubject, 'Facilitor opdracht:') + 19), - 0), - INSTR ( - SUBSTR ( - SUBSTR (psubject, - INSTR (psubject, 'Facilitor opdracht:') + 19), - 0), - '/') - + 1, - 1); + SUBSTR ( + SUBSTR ( + SUBSTR (psubject, INSTR (psubject, 'Facilitor opdracht:') + 19), + 0), + INSTR ( + SUBSTR ( + SUBSTR (psubject, + INSTR (psubject, 'Facilitor opdracht:') + 19), + 0), + '/') + + 1, + 1); -- Bepalen van de mld_opdr_key -- Uitgangspunt is 1 opdracht per melding @@ -339,6 +339,12 @@ BEGIN '%IN VERBAND MET HET UITBLIJVEN VAN EEN REACTIE%' THEN v_actie := 'ORDAFM'; + WHEN UPPER (SUBSTR (psubject, LENGTH (psubject) - 13, 14)) LIKE + '%IS BIJGEWERKT%' + THEN + v_actie := 'ORDUPD'; + v_kenmstatusoms := + 'De melding is bijgewerkt.'; ELSE v_actie := NULL; END CASE; @@ -582,7 +588,7 @@ BEGIN || ')'); END IF; - --Wanneer confirmationbericht niet binnen is gekomen, dan is de status nog Toegekend (6) en niet Geaccepteerd (8). Dat kunnen we nu ook omzetten, zodra er een + --Wanneer confirmationbericht niet binnen is gekomen, dan is de status nog Toegekend (6) en niet Geaccepteerd (8). Dat kunnen we nu ook omzetten. IF v_vmnr IS NOT NULL AND v_opdrkey IS NOT NULL AND v_status = 6 --Toegekend (en dus nog niet geaccepteerd) @@ -623,7 +629,7 @@ BEGIN INTO v_kenmstatusper_cur FROM DUAL; - -- Als de kenmkerken nog niet bestaan, dan toevoegen bij de opdracht, anders updaten indien gewijzigd. + -- Als de kenmerken nog niet bestaan, dan toevoegen bij de opdracht, anders updaten indien gewijzigd. IF v_kenmstatusoms_cur = 'leeg' THEN v_errormsg := @@ -678,7 +684,7 @@ BEGIN VALUES (v_opdrkey, 603, -- -- Kenmerk 'Status per' (623 in ACCP) TO_CHAR (SYSDATE, - 'DD-MM-YYYY HH24:MI:SS')) + 'DD-MM-YYYY HH24:MI:SS')) RETURNING mld_kenmerkopdr_waarde INTO v_kenmstatusper;