diff --git a/HGCU/hgcu.sql b/HGCU/hgcu.sql index eeb9daf54..94a87f2bd 100644 --- a/HGCU/hgcu.sql +++ b/HGCU/hgcu.sql @@ -832,7 +832,8 @@ AS SELECT mld_melding_key FROM hgcu_v_monitoring WHERE status = 'Afgemeld' - AND gereed < TRUNC (SYSDATE, 'MONTH') + -- AND gereed < TRUNC (SYSDATE, 'Q') ****** + AND gereed < TO_DATE('20250401', 'YYYYMMDD') AND afw IS NULL -- geen afwijkingen die goedgekeurd moeten worden AND afgerond IS NULL; -- expliciete goedkeuring staat niet aan @@ -849,7 +850,8 @@ AS m.* FROM mld_melding m WHERE m.mld_melding_parentkey IS NULL - AND fac.gettrackingdate ('MLDAFM', m.mld_melding_key) < TRUNC (SYSDATE, 'MONTH') + -- AND fac.gettrackingdate ('MLDAFM', m.mld_melding_key) < TRUNC (SYSDATE, 'Q') ****** + AND fac.gettrackingdate ('MLDAFM', m.mld_melding_key) < TO_DATE('20250401', 'yyyymmdd') AND m.mld_melding_key NOT IN (SELECT melding_key FROM hgcu_monitoring WHERE melding_key IS NOT NULL)) m, hgcu_v_monitoring mo @@ -859,7 +861,9 @@ AS CURSOR c3 IS - SELECT * FROM hgcu_v_monitoring_tot; + SELECT * FROM hgcu_v_monitoring_tot + WHERE gereed < TO_DATE('20250401', 'YYYYMMDD'); -- ******* + v_exportdate DATE; v_lastexport DATE; @@ -867,15 +871,18 @@ AS v_status NUMBER; BEGIN v_exportdate := SYSDATE; - v_exportdate := SYSDATE; + v_exportdate := SYSDATE - 20; -- ******* + -- Als ik deze maand al een freeze heb uitgevoerd dan mag ik dat niet nog een keer doen. SELECT MAX(export_datum) INTO v_lastexport FROM hgcu_monitoring; DELETE imp_log WHERE COALESCE(imp_log_applicatie, 'QueQeLeQue') = p_applname; + + DELETE fac_rapport WHERE fac_rapport_node = 'FREEZE'; - IF TRUNC (COALESCE(v_lastexport, SYSDATE-100), 'MONTH') <> TRUNC(v_exportdate, 'MONTH') + IF (TRUNC (COALESCE(v_lastexport, SYSDATE-100), 'Q') <> TRUNC(v_exportdate, 'Q')) OR 1=1 -- ****** THEN -- Zet de meldingen die geen afwijking kennen en die niet op status afgerond staan naar status verwerkt FOR rec IN c1 @@ -1007,8 +1014,8 @@ BEGIN SELECT mld_melding_key, DECODE(mld_melding_indult, 1, 'Ja', 'Nee'), v_exportdate FROM mld_melding m WHERE m.mld_melding_status = 6 -- Historie - AND fac.gettrackingdate ('MLDAFM', m.mld_melding_key) < - TRUNC (SYSDATE, 'MONTH') + -- AND fac.gettrackingdate ('MLDAFM', m.mld_melding_key) < TRUNC (SYSDATE, 'Q') ******* + AND fac.gettrackingdate ('MLDAFM', m.mld_melding_key) < TO_DATE('20250401', 'YYYYMMDD') AND m.mld_melding_key NOT IN (SELECT nm.melding_key FROM hgcu_monitoring nm WHERE nm.melding_key IS NOT NULL); @@ -1030,7 +1037,7 @@ BEGIN END hgcu_select_freeze_monitoring; / -CREATE OR REPLACE PROCEDURE hgcu_export_freeze_monintoring ( +CREATE OR REPLACE PROCEDURE hgcu_export_freeze_monitoring ( p_applname IN VARCHAR2, p_applrun IN VARCHAR2, p_filedir IN VARCHAR2,