DLLG#66674 -- Koppeling met Brivo

svn path=/Customer/trunk/; revision=52554
This commit is contained in:
Arthur Egberink
2021-07-29 06:40:39 +00:00
parent 9a02c27b32
commit 71dc6bd6e5

View File

@@ -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',