From c5270c00f2b8de226bd769dfcaa350a856723d05 Mon Sep 17 00:00:00 2001
From: Erik Groener <erik.groener@aareon.nl>
Date: Tue, 19 Apr 2022 10:41:02 +0000
Subject: [PATCH] KFSG#72129 AiAi bij inloggen via app van inactieve gebruiker

svn path=/Database/trunk/; revision=55613
---
 PRS/PRS_TRI.SRC  | 6 +++++-
 _UP/DB41to42.src | 8 ++++++++
 2 files changed, 13 insertions(+), 1 deletion(-)

diff --git a/PRS/PRS_TRI.SRC b/PRS/PRS_TRI.SRC
index 041319c9..0f215a75 100644
--- a/PRS/PRS_TRI.SRC
+++ b/PRS/PRS_TRI.SRC
@@ -267,9 +267,13 @@ BEGIN
            OR :new.prs_perslid_oslogin2 IS NULL AND :old.prs_perslid_oslogin2 IS NOT NULL
            OR NVL(:new.prs_perslid_wachtwoord_hash, 'X') <> NVL(:old.prs_perslid_wachtwoord_hash, 'X')
            )
-       OR      fac.getsetting ('login_use_email') = 1
+       OR  (   fac.getsetting ('login_use_email') = 1
            AND :new.prs_perslid_email IS NULL
            AND :old.prs_perslid_email IS NOT NULL
+           )
+       OR  (   :new.prs_perslid_inactief IS NOT NULL
+           AND :old.prs_perslid_inactief IS NULL
+           )
     THEN -- Merk op: anno 5.3.2 wordt een persoon die *nu* is ingelogd hier niet
          --          automatisch door uitgelogd
         :new.prs_perslid_credentials_datum := SYSDATE;
diff --git a/_UP/DB41to42.src b/_UP/DB41to42.src
index 7d302183..d94361f0 100644
--- a/_UP/DB41to42.src
+++ b/_UP/DB41to42.src
@@ -184,6 +184,14 @@ UPDATE fac_menuitems
      , fac_menuitems_label = 'lcl_Facilitor_Status'
  WHERE fac_menuitems_label = 'lcl_Facilitor_Forum';
 
+/////////////////////////////////////////////////////////////////////////////////////////// KFSG#72129
+DELETE FROM fac_session
+ WHERE prs_perslid_key IN
+       (SELECT prs_perslid_key
+          FROM prs_perslid
+         WHERE prs_perslid_inactief IS NOT NULL
+       );
+
 /////////////////////////////////////////////////////////////////////////////////////////// FCLT#00000
 
 REGISTERONCE('$Id$')