FSN#26947 Opschonen gebruik perslidwerkplek/werkplek_verwijder

svn path=/Customer/trunk/; revision=19076
This commit is contained in:
Maarten van der Heide
2013-09-12 08:52:30 +00:00
parent 1b0eaf03e4
commit bba1dfe27e
16 changed files with 339 additions and 918 deletions

View File

@@ -602,7 +602,7 @@ IS
WHERE p.prs_perslid_nr IS NOT NULL
AND p.prs_perslid_naam NOT LIKE c_persoon_inactief || '%'
AND NOT EXISTS (SELECT 1
FROM prs_v_aanwezigperslidwerkplek pw
FROM prs_perslidwerkplek pw
WHERE pw.prs_perslid_key = p.prs_perslid_key);
-- Alle aanwezige personen met personeelsnummer (ie. de import-doelgroep) niet in een groep
@@ -1011,7 +1011,7 @@ BEGIN
SELECT COUNT (*)
INTO v_count
FROM prs_v_aanwezigperslidwerkplek pw,
FROM prs_perslidwerkplek pw,
prs_werkplek wp,
alg_ruimte r,
alg_verdieping v
@@ -1063,7 +1063,7 @@ BEGIN
WHERE w.prs_alg_ruimte_key = v_ruimte_key
AND NOT EXISTS (
SELECT 1
FROM prs_v_aanwezigperslidwerkplek pw
FROM prs_perslidwerkplek pw
WHERE pw.prs_werkplek_key =
w.prs_werkplek_key);
@@ -1075,17 +1075,10 @@ BEGIN
WHERE w.prs_alg_ruimte_key = v_ruimte_key
AND NOT EXISTS (
SELECT 1
FROM prs_v_aanwezigperslidwerkplek pw
FROM prs_perslidwerkplek pw
WHERE pw.prs_werkplek_key =
w.prs_werkplek_key);
-- Verwijder (keihard) de mogelijk eerder logisch verwijderde
-- koppeling tussen dezelfde persoon en werkplek!!!
DELETE FROM prs_perslidwerkplek pw
WHERE pw.prs_perslid_key = v_perslid_key
AND pw.prs_werkplek_key = v_wp_key
AND pw.prs_perslidwerkplek_verwijder IS NOT NULL;
v_errorhint :=
'Fout bij koppelen persoon aan vrije werkplek';