Files
Customer/onces/STCH/STCH#51457_2.sql
Arthur Egberink 8798177e65 STCH#51457 -- Verwijderen van non-relevante Heyday medewerkers
svn path=/Customer/; revision=36480
2018-01-03 16:10:46 +00:00

73 lines
2.0 KiB
SQL

--
-- $Id$
--
-- Script containing customer specific sql statements for the STCH database
DEFINE thisfile = 'STCH#51457_2.SQL'
DEFINE dbuser = 'STCH'
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 ------
UPDATE prs_bedrijfadres
SET prs_bedrijfadres_xsl = 'xsl\STCH.xsl'
WHERE prs_bedrijfadres_xsl LIKE '%AASI.xsl%';
UPDATE prs_perslid
SET prs_perslid_oslogin = NULL,
prs_perslid_oslogin2 = NULL,
prs_perslid_uurloon = NULL,
prs_perslid_telefoonnr = NULL,
prs_perslid_mobiel = NULL,
prs_perslid_email = NULL,
prs_perslid_nr = NULL
WHERE prs_perslid_verwijder IS NULL
AND prs_perslid_email LIKE '%heyday%'
AND prs_perslid_key NOT IN (57489,
99925,
125,
57475,
70523,
57559,
40603,
59447,
102746,
9841,
9061);
BEGIN
FOR rec
IN ( SELECT prs_perslid_key
FROM prs_perslid
WHERE prs_perslid_verwijder IS NULL
AND prs_perslid_email LIKE '%heyday%'
AND prs_perslid_key NOT IN (57489, 99925, 125, 57475, 70523, 57559, 40603, 59447, 102746, 9841, 9061)
ORDER BY 1)
LOOP
BEGIN
prs.delete_perslid (1, rec.prs_perslid_key);
END;
END LOOP;
END;
/
------ payload end ------
SET DEFINE OFF
BEGIN adm.systrackscriptId ('$Id$', 0); END;
/
COMMIT;
SET ECHO OFF
SPOOL OFF
SET DEFINE ON
PROMPT Logfile of this upgrade is: &fcltlogfile