MNNL#68520 Once/Omkatten behandelteam op afgemelde (Security-)meldingen

svn path=/Customer/; revision=54680

onces/MNNL/MNNL#68520.sql

@@ -0,0 +1,82 @@
+--
+-- $Id$
+--
+-- Customer specific once-script MNNL#68520.sql.
+DEFINE thisfile = 'MNNL#68520.sql'
+DEFINE dbuser   = '^MNNL'
+
+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;
+PROMPT &fcltcusterr
+SET DEFINE OFF
+
+------ payload begin ------
+
+-- MNNL#68520: Omkatten afgemelde Security-meldingen van foutief Behandelteam
+--             naar Security-Behandelteam op basis van 'Eigen tabel'-import!
+
+-- *** PRE-CONDITIE ***
+-- Alleen inlezen (niet verwerken!) van bestand via 'FIP: Aanmaken/bijwerken
+-- eigen tabel'-import!
+
+-- Verwijder FAC_IMPORT-entry voor vandaag/zojuist door _FACILITOR ingelezen
+-- bestand (om verwerken te voorkomen).
+-- NB. De FAC_IMPORT_USRDATA-tabel blijft gevuld!
+DELETE FROM fac_import
+      WHERE fac_import_app_key = 23                     -- FIP: Eigen tabellen
+            AND TRUNC (fac_import_datum_gelezen) = TRUNC (SYSDATE)
+            --AND fac_import_filenaam = 'InventarisatieMNNL#68520.csv'
+            AND prs_perslid_key = 4                              -- _FACILITOR
+;
+COMMIT;
+/*
+SELECT m.mld_ins_discipline_key,
+       (SELECT ins_discipline_omschrijving
+          FROM ins_tab_discipline
+         WHERE ins_discipline_key = m.mld_ins_discipline_key),
+       (SELECT md.ins_discipline_key
+          FROM fac_imp_usrdata ud, mld_discipline md
+         WHERE fac.safe_to_number (ud.fac_usrdata_code) = m.mld_melding_key
+               AND ud.fac_usrdata_omschr = md.ins_discipline_omschrijving),
+       (SELECT md.ins_discipline_omschrijving
+          FROM fac_imp_usrdata ud, mld_discipline md
+         WHERE fac.safe_to_number (ud.fac_usrdata_code) = m.mld_melding_key
+               AND ud.fac_usrdata_omschr = md.ins_discipline_omschrijving)
+  FROM mld_melding m
+ WHERE EXISTS
+          (SELECT 1
+             FROM fac_imp_usrdata ud
+            WHERE fac.safe_to_number (fac_usrdata_code) = m.mld_melding_key);
+*/
+UPDATE mld_melding m
+   SET m.mld_ins_discipline_key =
+          (SELECT md.ins_discipline_key
+             FROM fac_imp_usrdata ud, mld_discipline md
+            WHERE ud.fac_usrdata_omschr = md.ins_discipline_omschrijving
+                  AND fac.safe_to_number (ud.fac_usrdata_code) = m.mld_melding_key)
+ WHERE EXISTS
+          (SELECT 1
+             FROM fac_imp_usrdata ud, mld_discipline md
+            WHERE ud.fac_usrdata_omschr = md.ins_discipline_omschrijving
+                  AND fac.safe_to_number (ud.fac_usrdata_code) = m.mld_melding_key);
+COMMIT;
+
+------ 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