PCHD#63522 Import personen, nu werkplekken verwijderen obv ruimte-afdeling

svn path=/Customer/trunk/; revision=47965
This commit is contained in:
Sander Schepers
2020-08-28 14:35:47 +00:00
parent c393976080
commit 73aa3e5581

View File

@@ -1425,6 +1425,45 @@ BEGIN
COMMIT;
-- Eerst werkplekken verwijderen die niet voldoen aan de conventie Ruimte-Afdeling.
-- Daarbij dit enkel doen bij de personen waarvan de login naam in de import wordt aangeboden.
-- Daarbij enkel de werkplekken met als omschrijving n.v.t' verwijderen, eventuele andere ruimtes die als werkplek zijn gekoppeld blijven dan wel in tact.
DELETE FROM prs_perslidwerkplek
WHERE prs_perslidwerkplek_key IN
(SELECT pwp.prs_perslidwerkplek_key
FROM prs_werkplek wp,
prs_perslidwerkplek pwp,
prs_perslid p,
pchd_imp_prs i
WHERE pwp.prs_werkplek_key = wp.prs_werkplek_key
AND p.prs_perslid_key = pwp.prs_perslid_key
AND UPPER (p.prs_perslid_oslogin) =
UPPER (i.prs_perslid_oslogin)
AND UPPER (wp.prs_werkplek_omschrijving) LIKE
'%N.V.T.%'
AND wp.prs_alg_ruimte_key NOT IN
(SELECT (rg_nvt.alg_ruimte_key)
alg_ruimte_key
FROM prs_ruimteafdeling ra,
pchd_imp_prs i,
prs_perslid p,
prs_afdeling a,
--prs_afdeling bu,
alg_v_ruimte_gegevens rg_nvt
WHERE UPPER (p.prs_perslid_oslogin) =
UPPER (
i.prs_perslid_oslogin)
AND p.prs_afdeling_key =
a.prs_afdeling_key
AND a.prs_afdeling_key =
ra.prs_afdeling_key
AND rg_nvt.alg_ruimte_key =
ra.alg_ruimte_key
AND UPPER (
rg_nvt.alg_ruimte_nr) =
'N.V.T.'));
FOR recwerkplek IN cwerkplek
LOOP
BEGIN