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

FMHN#76140 Script uitzetten

Browse Source 
svn path=/Customer/trunk/; revision=62599
This commit is contained in:
Sander Schepers
2023-11-16 07:22:59 +00:00
parent 16f71731a4
commit 06f8c7856f
1 changed files with 21 additions and 20 deletions
Download Patch File Download Diff File Expand all files Collapse all files

41
FMHN/fmhn.sql
View File

@@ -4906,11 +4906,12 @@ BEGIN
IF COALESCE (UPPER (rc.operator), 'INSERT') = 'INSERT'
THEN
--Bij een verhuizing van afdeling binnen BZK mogen werkplekken en autorisaties verwijderd worden.
-- IF v_bedrijf_key = 921
-- AND v_bedrijf_key_old = 921
-- AND v_afdeling_key <> v_afdeling_key_old
-- AND v_afdeling_key IS NOT NULL
-- THEN
--In FMHN#76140 is dit tijdelijk (vanaf januari 2023) uitgeschakeld geweest en mogen de autorisaties vanaf november 2023 weer verwijderd worden
IF v_bedrijf_key = 921
AND v_bedrijf_key_old = 921
AND v_afdeling_key <> v_afdeling_key_old
AND v_afdeling_key IS NOT NULL
THEN
-- v_errormsg :=
-- 'Opp instellen tbv herstellen werkplekken';
--
@@ -4918,21 +4919,21 @@ BEGIN
-- SET prs_perslid_opp = 1 -- Hiermee in de nachtrun de werkplekken verwijderen (en opnieuw instellen)
-- WHERE prs_perslid_key = v_perslid_key;
--
-- v_errormsg :=
-- 'Verwijderen niet-standaard autorisatiegroepen BZK';
--
-- DELETE FROM
-- fac_gebruikersgroep
-- WHERE prs_perslid_key = v_perslid_key
-- AND fac_groep_key NOT IN (102, 167); --Autorisatiegroepen 'MLD_BZK_Iedereen' en 'RES klant'
--
-- v_errormsg := 'Logging afdelingswijzing binnen BZK';
-- fac.trackaction ('PRSUPD',
-- v_perslid_key,
-- 3,
-- SYSDATE,
-- 'IDM - BZK afdeling gewijzigd');
-- END IF;
v_errormsg :=
'Verwijderen niet-standaard autorisatiegroepen BZK';
DELETE FROM
fac_gebruikersgroep
WHERE prs_perslid_key = v_perslid_key
AND fac_groep_key NOT IN (102, 167); --Autorisatiegroepen 'MLD_BZK_Iedereen' en 'RES klant'
v_errormsg := 'Logging afdelingswijzing binnen BZK';
fac.trackaction ('PRSUPD',
v_perslid_key,
3,
SYSDATE,
'IDM - BZK afdeling gewijzigd');
END IF;
v_errormsg := 'Fout bijwerken persoon';
UPDATE prs_perslid