From d6c040dc03d45a87a640533d78b30bc50708e393 Mon Sep 17 00:00:00 2001
From: Maarten van der Heide <maarten.vanderheide@aareon.nl>
Date: Thu, 30 Jun 2022 13:20:37 +0000
Subject: [PATCH] KFSG#72218 DAILY/anonimiseren bestelaanvragen (externe
 adres-, kaart- en contactgegevens)

svn path=/Customer/trunk/; revision=56449
---
 KFSG/kfsg.sql | 40 ++++++++++++++++++++++++++++++++++++++++
 1 file changed, 40 insertions(+)

diff --git a/KFSG/kfsg.sql b/KFSG/kfsg.sql
index 3a2dd7818..9fcbc6909 100644
--- a/KFSG/kfsg.sql
+++ b/KFSG/kfsg.sql
@@ -24,6 +24,8 @@ AS
 
     PROCEDURE schonen_bezoekers;
 
+    PROCEDURE schonen_bestelkenmerken;
+
     FUNCTION get_kenmerk (p_module        IN VARCHAR2,
                           p_kenmerk_key   IN NUMBER,
                           p_link_key      IN NUMBER)
@@ -142,6 +144,41 @@ AS
         ANO.anonymizebez (SYSDATE - (10 * 365), SYSDATE - fac.getsetting ('anonymize_period'));
     END;
 
+    -- KFSG#72218: Schonen bestelkenmerken bij 361=Bloemen en 362=Fruitmanden!
+    PROCEDURE schonen_bestelkenmerken
+    AS
+        CURSOR c
+        IS
+            SELECT b.bes_bestelling_key
+              FROM bes_bestelling b
+             WHERE COALESCE (fac.gettrackingdate ('BESOTV', b.bes_bestelling_key),
+                             fac.gettrackingdate ('BESREJ', b.bes_bestelling_key)) < TRUNC (SYSDATE, 'iw')
+                   --AND EXISTS                           -- Zou zo moeten zijn!
+                   --      (SELECT 1
+                   --         FROM bes_bestelling_item bbi, bes_srtdeel sd, bes_srtgroep sg
+                   --        WHERE bbi.bes_srtdeel_key = sd.bes_srtdeel_key
+                   --              AND sd.bes_srtgroep_key = sg.bes_srtgroep_key
+                   --              AND sg.ins_discipline_key IN (361, 362) -- Bloemen/Fruitmanden
+                   --              AND bbi.bes_bestelling_key = b.bes_bestelling_key)
+                   AND EXISTS
+                         (SELECT 1
+                            FROM bes_kenmerkbestell
+                           WHERE (bes_kenmerk_key IN (8, 9, 10, 11, 13, 281, 282, 283) -- Bloemen
+                                  OR bes_kenmerk_key IN (3, 4, 5, 6, 17)) -- Fruitmanden
+                                 AND bes_bestelling_key = b.bes_bestelling_key)
+          ORDER BY 1;
+    BEGIN
+        FOR rec IN c
+        LOOP
+            DELETE FROM bes_kenmerkbestell -- Inclusief eventueel verwijderde waarden!
+                  WHERE (bes_kenmerk_key IN (8, 9, 10, 11, 13, 281, 282, 283) -- Bloemen
+                         OR bes_kenmerk_key IN (3, 4, 5, 6, 17)) -- Fruitmanden
+                        AND bes_bestelling_key = rec.bes_bestelling_key;
+            fac.trackaction ('#BESUPD', rec.bes_bestelling_key, NULL, SYSDATE, 'Geanonimiseerd');
+        END LOOP;
+        COMMIT;
+    END;
+
     FUNCTION get_kenmerk (p_module        IN VARCHAR2,
                           p_kenmerk_key   IN NUMBER,
                           p_link_key      IN NUMBER)
@@ -324,6 +361,9 @@ BEGIN
 
    -- KFSG#69746: Schonen bezoekersgegevens ouder dan 90 dagen!
    KFSG.schonen_bezoekers();
+
+   -- KFSG#72218: Schonen bestelkenmerken !
+   KFSG.schonen_bestelkenmerken();
 END;
 /