admin/Customer
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

ARBO#62670 -- Fout in personenimport bij verwijderen afdelingen.

Browse Source 
svn path=/Customer/trunk/; revision=47033
This commit is contained in:
Arthur Egberink
2020-06-03 12:57:47 +00:00
parent c61fd5f28e
commit fc3bfee959
1 changed files with 12 additions and 12 deletions
Download Patch File Download Diff File Expand all files Collapse all files

24
ARBO/arbo.sql
View File

@@ -1880,7 +1880,8 @@ BEGIN
UPDATE prs_afdeling
SET prs_afdeling_verwijder = SYSDATE
WHERE prs_afdeling_key IN
WHERE prs_afdeling_verwijder IS NULL
AND prs_afdeling_key IN
(SELECT prs_afdeling_key
FROM prs_v_afdeling_boom ab
WHERE niveau = 4
@@ -1899,14 +1900,14 @@ BEGIN
(SELECT prs_afdeling_key
FROM prs_v_aanwezigafdeling a
WHERE a.prs_afdeling_parentkey =
ab.prs_afdeling_key)
AND prs_afdeling_verwijder IS NULL);
ab.prs_afdeling_key));
v_errorhint := 'Opschonen afdeling niveau 3';
UPDATE prs_afdeling
SET prs_afdeling_verwijder = SYSDATE
WHERE prs_afdeling_key IN
WHERE prs_afdeling_verwijder IS NULL
AND prs_afdeling_key IN
(SELECT prs_afdeling_key
FROM prs_v_afdeling_boom ab
WHERE niveau = 3
@@ -1925,14 +1926,14 @@ BEGIN
(SELECT prs_afdeling_key
FROM prs_v_aanwezigafdeling a
WHERE a.prs_afdeling_parentkey =
ab.prs_afdeling_key)
AND prs_afdeling_verwijder IS NULL);
ab.prs_afdeling_key));
v_errorhint := 'Opschonen afdeling niveau 2';
UPDATE prs_afdeling
SET prs_afdeling_verwijder = SYSDATE
WHERE prs_afdeling_key IN
WHERE prs_afdeling_verwijder IS NULL
AND prs_afdeling_key IN
(SELECT prs_afdeling_key
FROM prs_v_afdeling_boom ab
WHERE niveau = 2
@@ -1951,14 +1952,14 @@ BEGIN
(SELECT prs_afdeling_key
FROM prs_v_aanwezigafdeling a
WHERE a.prs_afdeling_parentkey =
ab.prs_afdeling_key)
AND prs_afdeling_verwijder IS NULL);
ab.prs_afdeling_key));
v_errorhint := 'Opschonen afdeling niveau 1';
UPDATE prs_afdeling
SET prs_afdeling_verwijder = SYSDATE
WHERE prs_afdeling_key IN
WHERE prs_afdeling_verwijder IS NULL
AND prs_afdeling_key IN
(SELECT prs_afdeling_key
FROM prs_v_afdeling_boom ab
WHERE niveau = 1
@@ -1977,8 +1978,7 @@ BEGIN
(SELECT prs_afdeling_key
FROM prs_v_aanwezigafdeling a
WHERE a.prs_afdeling_parentkey =
ab.prs_afdeling_key)
AND prs_afdeling_verwijder IS NULL);
ab.prs_afdeling_key));
-- Niet gebruikte kostenplaatsen gaan we verwijderen.
UPDATE prs_kostenplaats kp