Scriptje dat 'personen' LEEG[AFD] vervangt door afdeling AFD

svn path=/Customer/trunk/; revision=12565

AKZA/Once/dummypersoon2afdeling.sql

@@ -0,0 +1,28 @@
+-- Vervang de dummy personen die men bij een afdeling heeft aangemaakt voor het
+-- 'ik weet wel de afdeling maar niet de persoon' verschijnsel. Men moet hier
+-- gewoon de afdeling hebben aangegeven. Ruimt lekker op.
+
+SELECT * FROM PRS_PERSLIDWERKPLEK WHERE prs_perslid_key IN (
+ SELECT prs_perslid_key FROM PRS_PERSLID
+ WHERE prs_perslid_naam LIKE 'LEEG [%]')
+
+ALTER TABLE PRS_PERSLIDWERKPLEK DISABLE CONSTRAINT PRS_C_PRS_PERSLIDWP_KOPPELING
+ 
+UPDATE PRS_PERSLIDWERKPLEK W SET prs_afdeling_key=
+ (SELECT prs_afdeling_key FROM PRS_PERSLID A
+   WHERE A.prs_perslid_key = W.prs_perslid_key
+     AND prs_perslid_key IN
+(SELECT prs_perslid_key FROM PRS_PERSLID B
+ WHERE prs_perslid_naam LIKE 'LEEG [%]'))
+
+UPDATE PRS_PERSLIDWERKPLEK W SET prs_perslid_key=NULL
+WHERE prs_perslid_key IS NOT NULL AND prs_afdeling_key IS NOT NULL
+
+UPDATE PRS_PERSLIDWERKPLEK W SET prs_AFDELING_key=767
+WHERE prs_perslid_key IS NULL AND prs_afdeling_key IS NULL
+
+ALTER TABLE PRS_PERSLIDWERKPLEK ENABLE CONSTRAINT PRS_C_PRS_PERSLIDWP_KOPPELING
+
+-- cleanup dummy persons 
+UPDATE PRS_PERSLID SET prs_perslid_verwijder=SYSDATE 
+WHERE prs_perslid_naam LIKE 'LEEG [%]' AND prs_perslid_verwijder IS NULL