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

FMHN#84596 Heractiveren ongeacht operator (ook handmatige imports)

Browse Source 
svn path=/Customer/trunk/; revision=67905
This commit is contained in:
Sander Schepers
2025-02-07 11:14:19 +00:00
parent 0204b95972
commit db1714c401
1 changed files with 19 additions and 16 deletions
Download Patch File Download Diff File Expand all files Collapse all files

33
FMHN/fmhn.sql
View File

@@ -4902,6 +4902,24 @@ BEGIN
FROM prs_perslid p, prs_v_afdeling b
WHERE b.prs_afdeling_key = p.prs_afdeling_key
AND p.prs_perslid_key = v_perslid_key;
-- FMHN#84596: Heractiveren account (ongeacht operator)
v_errormsg := 'Fout heractiveren persoon';
UPDATE prs_perslid
SET prs_perslid_inactief = NULL
WHERE prs_perslid_key = v_perslid_key
AND ( TRUNC (rc.einddat) > TRUNC (SYSDATE)
OR rc.einddat = NULL)
AND NOT EXISTS
(SELECT 1
FROM prs_kenmerklink kl
WHERE kl.prs_kenmerk_key = 1100 -- Handmatige inactiefdatum
AND kl.PRS_LINK_KEY =
v_perslid_key
AND kl.prs_kenmerklink_verwijder
IS NULL);
ELSE
v_afdeling_key_old := TO_NUMBER (NULL); -- Don't care!
v_bedrijf_key_old := TO_NUMBER (NULL); -- Don't care!
@@ -5009,21 +5027,6 @@ BEGIN
prs_perslid_externsyncdate = SYSDATE
WHERE prs_perslid_key = v_perslid_key;
v_errormsg := 'Fout heractiveren persoon';
UPDATE prs_perslid
SET prs_perslid_inactief = NULL
WHERE prs_perslid_key = v_perslid_key
AND ( TRUNC (rc.einddat) > TRUNC (SYSDATE)
OR rc.einddat = NULL)
AND NOT EXISTS
(SELECT 1
FROM prs_kenmerklink kl
WHERE kl.prs_kenmerk_key = 1100 -- Handmatige inactiefdatum
AND kl.PRS_LINK_KEY =
v_perslid_key
AND kl.prs_kenmerklink_verwijder
IS NULL);
-- Alleen bij nieuwe persoon of ook bij bestaande persoon?
v_errormsg := 'Fout bijwerken mincode';
prs.upsertkenmerk (1008, v_perslid_key, TO_CHAR (v_minomschr_key)); -- Ministeriecode