From 93a77edbd88a32044ee2d6e783555cdad54c7e26 Mon Sep 17 00:00:00 2001
From: Maarten van der Heide <maarten.vanderheide@aareon.nl>
Date: Wed, 19 Jul 2023 08:24:38 +0000
Subject: [PATCH] MNNL#78431 PRS-import/Automatische (de)autorisatie (van IV,
 PV en FRS & EC)

svn path=/Customer/trunk/; revision=61230
---
 MNNL/mnnl.sql | 87 +++++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 87 insertions(+)

diff --git a/MNNL/mnnl.sql b/MNNL/mnnl.sql
index bd24c734a..b4bde575f 100644
--- a/MNNL/mnnl.sql
+++ b/MNNL/mnnl.sql
@@ -206,6 +206,93 @@ BEGIN
                      WHERE fac_groep_key = 2101                 -- _Default_VB
                        AND prs_perslid_key = p.prs_perslid_key);
    COMMIT;
+
+   -- Afnemen 2341=_Default_IV van medewerkers niet onder IV (op niveau 1)!
+   v_errorhint := 'Fout afnemen _Default_IV';
+
+   DELETE FROM fac_gebruikersgroep gg
+         WHERE gg.fac_groep_key = 2341                         -- _Default_IV
+               AND EXISTS
+                     (SELECT 1
+                        FROM prs_v_aanwezigperslid p, prs_v_afdeling_boom ab
+                       WHERE p.prs_afdeling_key = ab.prs_afdeling_key
+                             AND ab.prs_afdeling_key1 = 10 -- Afdeling-1 met code=IV!
+                             AND p.prs_perslid_key = gg.prs_perslid_key);
+   COMMIT;
+
+   -- Toekennen 2341=_Default_IV aan medewerkers onder IV (op niveau 1)!
+   v_errorhint := 'Fout toekennen _Default_IV';
+
+   INSERT INTO fac_gebruikersgroep (fac_groep_key, prs_perslid_key)
+      SELECT 2341, p.prs_perslid_key                            -- _Default_IV
+        FROM prs_v_aanwezigperslid p, prs_v_afdeling_boom ab
+       WHERE p.prs_perslid_oslogin IS NOT NULL
+             AND p.prs_afdeling_key = ab.prs_afdeling_key
+             AND ab.prs_afdeling_key1 = 10          -- Afdeling-1 met code=IV!
+             AND NOT EXISTS                         -- Niet al in _Default_IV!
+                   (SELECT 1
+                      FROM fac_gebruikersgroep
+                     WHERE fac_groep_key = 2341                 -- _Default_IV
+                       AND prs_perslid_key = p.prs_perslid_key);
+   COMMIT;
+
+   -- Afnemen 2342=_Default_PV van medewerkers niet onder PV (op niveau 1)!
+   v_errorhint := 'Fout afnemen _Default_PV';
+
+   DELETE FROM fac_gebruikersgroep gg
+         WHERE gg.fac_groep_key = 2342                         -- _Default_PV
+               AND EXISTS
+                     (SELECT 1
+                        FROM prs_v_aanwezigperslid p, prs_v_afdeling_boom ab
+                       WHERE p.prs_afdeling_key = ab.prs_afdeling_key
+                             AND ab.prs_afdeling_key1 = 422 -- Afdeling-1 met code=PV!
+                             AND p.prs_perslid_key = gg.prs_perslid_key);
+   COMMIT;
+
+   -- Toekennen 2342=_Default_PV aan medewerkers onder PV (op niveau 1)!
+   v_errorhint := 'Fout toekennen _Default_PV';
+
+   INSERT INTO fac_gebruikersgroep (fac_groep_key, prs_perslid_key)
+      SELECT 2342, p.prs_perslid_key                            -- _Default_PV
+        FROM prs_v_aanwezigperslid p, prs_v_afdeling_boom ab
+       WHERE p.prs_perslid_oslogin IS NOT NULL
+             AND p.prs_afdeling_key = ab.prs_afdeling_key
+             AND ab.prs_afdeling_key1 = 422         -- Afdeling-1 met code=PV!
+             AND NOT EXISTS                         -- Niet al in _Default_PV!
+                   (SELECT 1
+                      FROM fac_gebruikersgroep
+                     WHERE fac_groep_key = 2342                 -- _Default_PV
+                       AND prs_perslid_key = p.prs_perslid_key);
+   COMMIT;
+
+   -- Afnemen 2343=_Default_FRS & EC van medewerkers niet onder FRS of EC (op niveau 1)!
+   v_errorhint := 'Fout afnemen _Default_FRS & EC';
+
+   DELETE FROM fac_gebruikersgroep gg
+         WHERE gg.fac_groep_key = 2343                    -- _Default_FRS & EC
+               AND EXISTS
+                     (SELECT 1
+                        FROM prs_v_aanwezigperslid p, prs_v_afdeling_boom ab
+                       WHERE p.prs_afdeling_key = ab.prs_afdeling_key
+                             AND ab.prs_afdeling_key1 IN (1061, 1041) -- Afdeling-1 met code=FRS of EC!
+                             AND p.prs_perslid_key = gg.prs_perslid_key);
+   COMMIT;
+
+   -- Toekennen 2343=_Default_FRS & EC aan medewerkers onder FRS of EC (op niveau 1)!
+   v_errorhint := 'Fout toekennen _Default_FRS & EC';
+
+   INSERT INTO fac_gebruikersgroep (fac_groep_key, prs_perslid_key)
+      SELECT 2343, p.prs_perslid_key                      -- _Default_FRS & EC
+        FROM prs_v_aanwezigperslid p, prs_v_afdeling_boom ab
+       WHERE p.prs_perslid_oslogin IS NOT NULL
+             AND p.prs_afdeling_key = ab.prs_afdeling_key
+             AND ab.prs_afdeling_key1 IN (1061, 1041) -- Afdeling-1 met code=FRS of EC!
+             AND NOT EXISTS                   -- Niet al in _Default_FRS & EC!
+                   (SELECT 1
+                      FROM fac_gebruikersgroep
+                     WHERE fac_groep_key = 2343           -- _Default_FRS & EC
+                       AND prs_perslid_key = p.prs_perslid_key);
+   COMMIT;
 END mnnl_update_prs;
 /