VLKC#59661 PRS-import/Wijzigen personeelsnummers

svn path=/Customer/; revision=45330

onces/VLKC/VLKC#59661.sql

@@ -0,0 +1,51 @@
+--
+-- $Id$
+--
+-- Customer specific once-script VLKC#59661.SQL.
+DEFINE thisfile = 'VLKC#59661.SQL'
+DEFINE dbuser   = '^VLKC'
+
+SET ECHO ON
+SET DEFINE ON
+COLUMN fcltlogfile NEW_VALUE fcltlogfile NOPRINT;
+WHENEVER SQLERROR EXIT;
+SELECT adm.scriptspoolfile('&dbuser', '&thisfile') AS fcltlogfile FROM DUAL;
+WHENEVER SQLERROR CONTINUE;
+SPOOL &fcltlogfile
+SET DEFINE OFF
+
+------ payload begin ------
+
+SELECT i.*
+  FROM fac_imp_fac_gebruikersgroep i
+ WHERE NOT EXISTS (SELECT 1
+                     FROM prs_perslid
+                    WHERE prs_perslid_nr = i.personeelsnummer);
+/*
+  SELECT i.personeelsnummer, COUNT (prs_perslid_key)
+    FROM fac_imp_fac_gebruikersgroep i, prs_v_aanwezigperslid p
+   WHERE i.personeelsnummer = p.prs_perslid_nr(+)
+GROUP BY i.personeelsnummer;
+*/
+UPDATE prs_perslid p
+   SET p.prs_perslid_nr =
+          (SELECT MAX (groep)
+             FROM fac_imp_fac_gebruikersgroep
+            WHERE personeelsnummer = p.prs_perslid_nr)
+ WHERE p.prs_perslid_verwijder IS NULL
+       AND EXISTS (SELECT 1
+                     FROM fac_imp_fac_gebruikersgroep
+                    WHERE personeelsnummer = p.prs_perslid_nr);
+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