From a269f2f6cf51b0783457f03d435ceb28a00207e3 Mon Sep 17 00:00:00 2001
From: "Infineon\\Ouellette" <jonathan.ouellette@infineon.com>
Date: Fri, 17 Jan 2025 14:57:36 -0700
Subject: [PATCH] Minor bugfix to determining if an idle session is still valid

---
 LSL2/STPROC/OI_WIZARD_SERVICES.txt | 13 +++++--------
 1 file changed, 5 insertions(+), 8 deletions(-)

diff --git a/LSL2/STPROC/OI_WIZARD_SERVICES.txt b/LSL2/STPROC/OI_WIZARD_SERVICES.txt
index 2872f75..1848833 100644
--- a/LSL2/STPROC/OI_WIZARD_SERVICES.txt
+++ b/LSL2/STPROC/OI_WIZARD_SERVICES.txt
@@ -217,16 +217,12 @@ end service
 This routine validates a users session without extending it. Used for OI Wizard sessions that are awaiting input.
 */
 Service ValidateSessionIdle(OIWizardID)
+    
     ErrorMsg = ''
     If OIWizardID NE '' then
-        OIWizardRec = Database_Services('ReadDataRow', 'OI_WIZARD', OIWizardID, True$, 0, False$)
-        If Error_Services('NoError') then
-            SessionTerminated = OIWizardRec<OI_WIZARD.TERMINATED$>
-            If SessionTerminated then
-                ErrorMsg = 'Expired session.'
-            end
-        end else
-            ErrorMsg = Error_Services('GetMessage')
+        Valid             = Xlate('OI_WIZARD', OIWizardID, 'VALID', 'X')
+        If Not(Valid) then
+            ErrorMsg = 'Invalid or expired session'
         end
     end else
         ErrorMsg = 'Error in ':Service:' service. Null OIWizardID passed in.'
@@ -235,6 +231,7 @@ Service ValidateSessionIdle(OIWizardID)
     If ErrorMsg EQ '' then
         Response = True$
     end else
+        debug
         Error_Services('Add', ErrorMsg)
         Response = False$
     end