NYBU#73290 huurlijst wordt niet gevuld

svn path=/Customer/; revision=56486

onces/NYBU/NYBU#73290.sql

@@ -0,0 +1,82 @@
+--
+-- $Id$
+-- NYBU#73290 huurlijst wordt niet gevuld
+-- Onterecht en onjuist aangemaakte factuurregels verwijderen
+--
+
+DEFINE thisfile = 'NYBU#73290.SQL'
+DEFINE dbuser   = '^NYBU'
+
+SET ECHO ON
+SET DEFINE ON
+COLUMN fcltlogfile NEW_VALUE fcltlogfile NOPRINT;
+COLUMN fcltcusterr NEW_VALUE fcltcusterr NOPRINT;
+WHENEVER SQLERROR CONTINUE;
+
+SELECT adm.getscriptspoolfile ('&thisfile') AS fcltlogfile FROM DUAL;
+
+SPOOL &fcltlogfile
+WHENEVER SQLERROR EXIT;
+
+SELECT adm.checkscriptcust ('&dbuser') AS fcltcusterr FROM DUAL;
+
+WHENEVER SQLERROR CONTINUE;
+SET DEFINE OFF
+
+------ payload begin ------
+
+DECLARE
+    -- Contracten waarbij ten onrechte een factuur is aangemaakt
+    CURSOR c IS
+        SELECT DISTINCT h.cnt_contract_key, h.periode
+          FROM nybu_huur_archief h
+         WHERE     (h.periode = '202207' OR h.periode = '202208')
+               AND h.naar_coda IS NULL;
+               
+BEGIN
+    -- de huurbuffer tabel mag sowioso helemaal leeg gegooid worden
+    DELETE nybu_huur_buffer;
+
+    -- Dan de juiste regels uit het huurarchief verwijderen
+    DELETE 
+        nybu_huur_archief h
+         WHERE     (h.periode = '202207' OR h.periode = '202208')
+               AND h.naar_coda IS NULL;
+    
+    -- En netjes tracking zetten bij de contracten die het betreft          
+    FOR rec IN c
+    LOOP
+        BEGIN            
+
+            INSERT INTO fac_tracking (fac_srtnotificatie_key,
+                                      fac_tracking_refkey,
+                                      fac_tracking_oms)
+                     VALUES (
+                         569,                                        -- CNTTRK
+                         rec.cnt_contract_key,
+                            'Factuur voor periode '
+                         || rec.periode
+                         || ' verwijderd. Zie Logcentre 73290');
+
+            COMMIT;
+        END;
+    END LOOP;
+END;
+/
+
+------ payload end   ------
+
+SET DEFINE OFF
+
+BEGIN
+    adm.systrackscriptId (
+        '$Id$',
+        1);
+END;
+/
+
+COMMIT;
+SET ECHO OFF
+SPOOL OFF
+SET DEFINE ON
+PROMPT Logfile of this upgrade is: &fcltlogfile