From 71dc6bd6e55b7656cfbb00106064a20e44aac52c Mon Sep 17 00:00:00 2001
From: Arthur Egberink <arthur.egberink@aareon.nl>
Date: Thu, 29 Jul 2021 06:40:39 +0000
Subject: [PATCH] DLLG#66674 -- Koppeling met Brivo

svn path=/Customer/trunk/; revision=52554
---
 DLLG/DLLG.sql | 15 +++++++++++++++
 1 file changed, 15 insertions(+)

diff --git a/DLLG/DLLG.sql b/DLLG/DLLG.sql
index 58dd7e180..af3b7181c 100644
--- a/DLLG/DLLG.sql
+++ b/DLLG/DLLG.sql
@@ -336,6 +336,7 @@ AS
         v_facility_code_key   NUMBER;
         v_hex_code_key        NUMBER;
         v_dec_code_key        NUMBER;
+        v_sync_timestamp_key  NUMBER;
         v_date                DATE;
     BEGIN
         FOR rec IN c
@@ -395,6 +396,13 @@ AS
           FROM bez_kenmerk
          WHERE bez_kenmerk_upper = 'DEC CODE';
 
+        SELECT bez_kenmerk_key
+          INTO v_sync_timestamp_key
+          FROM bez_kenmerk
+         WHERE bez_kenmerk_upper = 'BRIVO SYNC TIMESTAMP';
+
+
+
         DBMS_OUTPUT.put_line ('v_date');
 
         SELECT bez_afspraak_datum
@@ -413,6 +421,7 @@ AS
 
         -- We controleren of de minst significante vier cijfers van de key overeenkomen met de 4 minst significate cijfers van het kaarnummer
         -- Bij het herhalen van de afspraak worden namelijk de kenmerken gekopieerd.
+        -- In dat geval wordt de timestamp op NULL gezet zodat de nieuwe informatie doorgestuurd wordt naar Brivo.
         IF v_code IS NULL OR SUBSTR(v_code, LENGTH(v_code)-3, LENGTH(v_code)) <> SUBSTR(p_bezkey, LENGTH(p_bezkey)-3, LENGTH(p_bezkey))
         THEN
            v_code := ROUND(DBMS_RANDOM.value(0,4)) || SUBSTR(p_bezkey, LENGTH(p_bezkey)-3, LENGTH(p_bezkey));
@@ -421,6 +430,12 @@ AS
                         v_card_number_key,
                         p_bezkey,
                         v_code);
+
+           FLX.setflex ('BEZ',
+                        v_sync_timestamp_key,
+                        p_bezkey,
+                        NULL);
+
         END IF;
 
         FLX.setflex ('BEZ',