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

ZLMV#76512 -- Inrichting ZLM Verzekeringen, anonimiseren volgens ANO.anonymizebez

Browse Source 
svn path=/Customer/trunk/; revision=61865
This commit is contained in:
Norbert Wassink
2023-09-21 11:09:42 +00:00
parent b864a565a6
commit 24226c245e
1 changed files with 3 additions and 121 deletions
Download Patch File Download Diff File Expand all files Collapse all files

124
ZLMV/ZLMV.sql
View File

@@ -253,127 +253,9 @@ AS
PROCEDURE anonimiseer_bezoeker
AS
anonymize_period NUMBER := 42;
bez_generic_visitor VARCHAR2 (2001)
:= lcl.l ('lcl_bez_generic_visitor');
v_count NUMBER;
CURSOR c_afspraak IS
SELECT a.bez_afspraak_key
FROM bez_afspraak a,
(SELECT datum_van
FROM (SELECT TRUNC (MIN (bez_afspraak_datum)) datum_van
FROM bez_afspraak a
WHERE bez_afspraak_datum <
(SYSDATE - anonymize_period)
AND NOT EXISTS
(SELECT ft.fac_tracking_key
FROM fac_tracking ft
WHERE ft.fac_tracking_refkey =
bez_afspraak_key
AND ft.fac_srtnotificatie_key =
(SELECT fac_srtnotificatie_key
FROM fac_srtnotificatie
WHERE fac_srtnotificatie_code =
'BEZANO'))))
van,
(SELECT TRUNC (SYSDATE - anonymize_period) --- 6 weken dus 6*7
datum_tot
FROM DUAL) tot
WHERE a.bez_afspraak_datum BETWEEN van.datum_van
AND tot.datum_tot
AND NOT EXISTS
(SELECT ft.fac_tracking_key
FROM fac_tracking ft
WHERE ft.fac_tracking_refkey =
a.bez_afspraak_key
AND ft.fac_srtnotificatie_key =
(SELECT fac_srtnotificatie_key
FROM fac_srtnotificatie
WHERE fac_srtnotificatie_code =
'BEZANO'))
ORDER BY a.bez_afspraak_key;
anonymize_period NUMBER := 42;
BEGIN
FOR rec IN c_afspraak
LOOP
-- Verwijder alle kenmerkwaarden van bezoekers van de afspraak waarvan het ampersand 8 (BITAND) bit van het bez_kenmerk.bez_kenmerk_systeem veld is gezet.
DELETE FROM bez_kenmerkwaarde bkw
WHERE bkw.bez_bezoekers_key IN
(SELECT b.bez_bezoekers_key
FROM bez_bezoekers b
WHERE b.bez_afspraak_key =
rec.bez_afspraak_key)
AND bkw.bez_kenmerk_key IN
(SELECT bk.bez_kenmerk_key
FROM bez_kenmerk bk
WHERE bk.bez_kenmerk_key =
bkw.bez_kenmerk_key
AND BITAND (bk.bez_kenmerk_systeem,
8) =
8);
-- Anonimiseer alle bezoekers.
UPDATE bez_bezoekers
SET bez_afspraak_naam = bez_generic_visitor,
-- bez_afspraak_bedrijf = NULL,
bez_afspraak_opmerking = NULL,
bez_bezoekers_telefoon = NULL,
bez_bezoekers_email = NULL,
bez_bezoekers_kenteken = NULL
WHERE bez_afspraak_key = rec.bez_afspraak_key;
-- Anonimiseer alle afspraken.
-- Door de trigger in de update wordt automatische de naam van de host in de gastheer geplakt.
-- Daardoor wordt de lcl "Ganonimiseerd" in vele gevallen niet blijvend in de gasheer gezet.
-- De persoon (prs record) moet daarom eerst aangepast worden.
-- Tijdens het anonimiseren van de persoon wordt daarom de bez_afspraak_gastheer ook geanonimiseerd.
-- In de gevallen dat er geen host wordt gebruikt en alleen tekst voor de persoon (gastheer) wordt ingevuld wordt het veld wel blijvend gezet.
UPDATE bez_afspraak
SET bez_afspraak_gastheer = bez_generic_visitor,
bez_afspraak_telefoonnr = NULL,
bez_afspraak_opmerking = NULL
WHERE bez_afspraak_key = rec.bez_afspraak_key;
-- Alle BEZ tracking anonimiseren m.b.t. de afspraak.
UPDATE fac_tracking
SET fac_tracking_oms = NULL
WHERE fac_srtnotificatie_key IN
(SELECT fac_srtnotificatie_key
FROM fac_srtnotificatie
WHERE fac_srtnotificatie_xmlnode =
'afspraak'
AND fac_srtnotificatie_code != 'BEZANO')
AND fac_tracking_refkey = rec.bez_afspraak_key
AND fac_tracking_oms IS NOT NULL;
-- Alle BEZ tracking anonimiseren m.b.t. de bezoekers van de afspraak.
UPDATE fac_tracking
SET fac_tracking_oms = NULL
WHERE fac_srtnotificatie_key IN
(SELECT fac_srtnotificatie_key
FROM fac_srtnotificatie
WHERE fac_srtnotificatie_xmlnode = 'bezoeker')
AND fac_tracking_refkey IN
(SELECT bb.bez_bezoekers_key
FROM bez_bezoekers bb
WHERE bb.bez_afspraak_key = rec.bez_afspraak_key)
AND fac_tracking_oms IS NOT NULL;
-- Anonimiseren van de afspraak tracken.
fac.trackaction ('BEZANO',
rec.bez_afspraak_key,
NULL,
NULL,
NULL);
IF v_count >= 1000
THEN
COMMIT;
v_count := 0;
ELSE
v_count := v_count + 1;
END IF;
END LOOP;
ANO.anonymizebez (SYSDATE - 365, SYSDATE - anonymize_period);
END;
END;
/
@@ -518,7 +400,7 @@ BEGIN
-- inactiveren personen die 12 maanden niet hebben ingelogd
-- zlmv.inactivate_prs (); moet nu via de scim koppeling worden geregeld.
-- anonimiseer bezoekers
-- anonimiseer bezoekers to 42 dagen terug
zlmv.anonimiseer_bezoeker ();
END;