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

ALLR#81100 -- Verplaatsen van afdelingen leidt tot dubbele afdelingen

Browse Source 
svn path=/Customer/trunk/; revision=62632
This commit is contained in:
Arthur Egberink
2023-11-21 14:32:11 +00:00
parent ee5e64430f
commit b32645f468
1 changed files with 6 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
AA/ALLR/allr.sql
View File

@@ -359,7 +359,8 @@ BEGIN
SELECT prs_afdeling_key
INTO v_prs_afdeling_key1
FROM prs_afdeling a
WHERE prs_afdeling_naam = rec.prs_kenmerk2;
WHERE a.prs_afdeling_verwijder IS NULL
AND a.prs_afdeling_naam = rec.prs_kenmerk2;
UPDATE prs_afdeling
SET prs_bedrijf_key = c_prs_bedrijf_key,
@@ -386,7 +387,8 @@ BEGIN
SELECT prs_afdeling_key
INTO v_prs_afdeling_key2
FROM prs_afdeling a
WHERE prs_afdeling_naam = rec.prs_kenmerk4;
WHERE a.prs_afdeling_verwijder IS NULL
AND a.prs_afdeling_naam = rec.prs_kenmerk4;
UPDATE prs_afdeling
SET prs_afdeling_parentkey = v_prs_afdeling_key1,
@@ -416,7 +418,8 @@ BEGIN
SELECT prs_afdeling_key
INTO v_prs_afdeling_key3
FROM prs_afdeling a
WHERE prs_afdeling_naam = rec.prs_afdeling_naam;
WHERE a.prs_afdeling_verwijder IS NULL
AND a.prs_afdeling_naam = rec.prs_afdeling_naam;
IF v_prs_afdeling_key2 IS NULL
THEN