PCHD#53705 -- Import personen vanuit AD VWS

svn path=/Customer/trunk/; revision=39818
2018-11-15 15:24:12 +00:00
parent 85287e7d54
commit e79cc9f21c
1 changed files with 8 additions and 3 deletions
--- a/PCHD/pchd.sql
+++ b/PCHD/pchd.sql
@@ -1019,8 +1019,8 @@ BEGIN
               AND pa.prs_bedrijf_key = pb.prs_bedrijf_key
               AND pb.prs_bedrijf_naam = recdep.prs_perslid_wm;

-            SELECT COUNT (*)
-              INTO v_count
+            SELECT COUNT (*), MAX(prs_afdeling_key)
+              INTO v_count, v_afdeling_key
              FROM prs_afdeling
              WHERE UPPER (prs_afdeling_omschrijving) =
                               UPPER (recdep.prs_afdeling_naam)
@@ -1047,8 +1047,13 @@ BEGIN
                            v_kostenplaats_key,
                            recdep.prs_afdeling_naam
                            );
-               COMMIT;
+            ELSIF v_count = 1
+            THEN
+               UPDATE prs_afdeling
+                  SET prs_kostenplaats_key = v_kostenplaats_key
+                WHERE prs_afdeling_key = v_afdeling_key;
            END IF;
+            COMMIT;
         EXCEPTION
            WHEN OTHERS
            THEN