DLLG#77449 -- Koppeling met Brivo systeem geeft foutmeldingen.

svn path=/Customer/; revision=59742

onces/DLLG/DLLG#77449.sql

@@ -2,9 +2,8 @@
 -- $Id$
 --
 -- Korte beschrijving wat het script doet
--- Voor dbuser invullen: - indien script voor 1 klant is: 'AADS' (de klantcode, zoals vermeld in fac_version_cust)
---                       - script is voor meerdere klanten: 'AAXX' (de groepcode, zoals vermeld in fac_version_group)
---                       - script is voor meerdere klanten met naam volgens een bepaald patroon: '^AA|^ASMS|^GULU|^NMMS|^RABO|^ZKHM'
+-- Card number was altijd gevuld met de key van de bezoeker maar die reeks is maar kort met een cache van 20 op de sequence
+-- Daarom gaan we nu een eigen sequence gebruiken.
 --
 DEFINE thisfile = 'DLLG#77449.SQL'
 DEFINE dbuser   = '^DLLG'
@@ -24,13 +23,6 @@ SET DEFINE OFF
 
 ------ payload begin ------
 
-CREATE SEQUENCE DLLG_S_BEZ_BEZOEKERS_CARD
-  START WITH 10000
-  MAXVALUE 50000
-  MINVALUE 1
-  CYCLE
-  NOCACHE;
-
 DECLARE
     CURSOR c IS SELECT * FROM BEZ_bezoekers ORDER BY bez_bezoekers_key;
 
@@ -48,7 +40,7 @@ BEGIN
             FLX.setflex ('BEZ',
                          v_card_number_key,
                          rec.bez_bezoekers_key,
-                         DLLG_S_BEZ_BEZOEKERS_CARD.NEXTVAL);
+                         REMAINDER (fac_s_user01.NEXTVAL, 40000) + 10000);
         END IF;
     END LOOP;
 END;