AAIT#87319 -- Probleem prs_import ivm dubbele zwevende afdelingen - oplossing om naar de volledige en aanwezigafdeling_boom-structuur te kijken

svn path=/Customer/trunk/; revision=69351
2025-06-10 12:17:45 +00:00
parent fc69c112c1
commit 6ed82faa76
1 changed files with 4 additions and 5 deletions
--- a/AA/aa_prs_pack.sql
+++ b/AA/aa_prs_pack.sql
@@ -714,12 +714,11 @@ AS
               || recPersLid.prs_afdeling_naam
               || ']';

-            SELECT prs_afdeling_key
+            SELECT a.prs_afdeling_key
              INTO v_afdeling_key
-              FROM prs_afdeling
-             WHERE UPPER (prs_afdeling_naam) =
-                      UPPER (recPersLid.prs_afdeling_naam)
-                   AND prs_afdeling_verwijder IS NULL;
+              FROM prs_v_aanwezigafdeling_boom ab, prs_afdeling a
+             WHERE ab.prs_afdeling_key = a.prs_afdeling_key
+                   AND UPPER (a.prs_afdeling_naam) = UPPER (recPersLid.prs_afdeling_naam) ;

            -- p_sleutelkolom
            --   NR = prs_perslid_nr