FSN#26947 Opschonen gebruik perslidwerkplek/werkplek_verwijder

svn path=/Customer/trunk/; revision=19046
This commit is contained in:
Maarten van der Heide
2013-09-10 14:01:03 +00:00
parent 5b1604c6c6
commit 1b0eaf03e4
12 changed files with 78 additions and 153 deletions

View File

@@ -684,7 +684,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
@@ -1256,7 +1256,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
@@ -1308,7 +1308,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);
@@ -1320,17 +1320,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';