CAPG#26115 Realisatie koppeling met Securinet/Trigion

svn path=/Customer/trunk/; revision=17805

CAPG/Once/CAPG6.sql

@@ -0,0 +1,94 @@
+-- CAPG#26115: Inrichting voor koppeling bezoekerszuil (Securinet/Trigion)
+-- $Revision$
+-- $Id$
+
+SET ECHO ON;
+SPOOL xCAPG6.lst
+
+INSERT INTO fac_usrtab
+  (fac_usrtab_naam,
+   fac_usrtab_omschrijving,
+   fac_usrtab_view)
+VALUES
+  ('Geslacht',
+   'Geslacht',
+   'T');
+
+INSERT INTO fac_usrdata
+  (fac_usrtab_key,
+   fac_usrdata_code,
+   fac_usrdata_omschr)
+SELECT fac_usrtab_key, 'M', 'Man'
+  FROM fac_usrtab
+ WHERE fac_usrtab_naam = 'Geslacht';
+
+INSERT INTO fac_usrdata
+  (fac_usrtab_key,
+   fac_usrdata_code,
+   fac_usrdata_omschr)
+SELECT fac_usrtab_key, 'V', 'Vrouw'
+  FROM fac_usrtab
+ WHERE fac_usrtab_naam = 'Geslacht';
+
+INSERT INTO fac_kenmerkdomein
+  (fac_kenmerkdomein_module,
+   fac_kenmerkdomein_omschrijving,
+   fac_kenmerkdomein_objectnaam,
+   fac_kenmerkdomein_kolomnaam,
+   fac_kenmerkdomein_kolomtxt,
+   fac_usrtab_key)
+SELECT 'BEZ',
+       'Geslacht',
+       'FAC_USRDATA',
+       'FAC_USRDATA_KEY',
+       'FAC_USRDATA_OMSCHR',
+       fac_usrtab_key
+  FROM fac_usrtab
+ WHERE fac_usrtab_naam = 'Geslacht';
+
+INSERT INTO bez_kenmerk
+  (bez_kenmerk_volgnr,
+   bez_kenmerk_omschrijving,
+   bez_kenmerk_kenmerktype,
+   bez_kenmerk_verplicht,
+   fac_kenmerkdomein_key)
+SELECT 10,
+       'Geslacht',
+       'R',
+       1,
+       fac_kenmerkdomein_key
+  FROM fac_kenmerkdomein
+ WHERE fac_kenmerkdomein_module = 'BEZ'
+   AND fac_kenmerkdomein_omschrijving = 'Geslacht';
+
+INSERT INTO bez_kenmerk
+  (bez_kenmerk_volgnr,
+   bez_kenmerk_omschrijving,
+   bez_kenmerk_kenmerktype,
+   bez_kenmerk_lengte,
+   bez_kenmerk_dimensie,
+   bez_kenmerk_regexp)
+VALUES
+  (20,
+   'Mobiel nr',
+   'C',
+   11,
+   '06-',
+   '06-[0-9]{8}');
+
+INSERT INTO bez_kenmerk
+  (bez_kenmerk_volgnr,
+   bez_kenmerk_omschrijving,
+   bez_kenmerk_kenmerktype,
+   bez_kenmerk_lengte)
+VALUES
+  (30,
+   'Kenteken',
+   'C',
+   10);
+
+BEGIN adm.systrackscript('$Workfile: capg.sql $', '$Revision$', 0); END;
+/
+COMMIT;
+
+SPOOL OFF;

CAPG/capg.sql

@@ -908,7 +908,50 @@ AS
    FROM alg_v_aanwezigruimte r, alg_verdieping v
    WHERE r.alg_verdieping_key = v.alg_verdieping_key;
 
-BEGIN fac.registercustversion('CAPG', 3); END;
+-- CAPG#26115: Export t.b.v. bezoekerszuil
+CREATE OR REPLACE VIEW capg_v_export_bez
+AS
+   SELECT 'BEZOEKER_KEY;BEZOEKER_NAAM;BEDRIJFSNAAM;OPMERKING;GESLACHT;MOBIEL_NR;KENTEKEN;DATUM;ONTVANGER' result,
+          0 result_order
+     FROM DUAL
+   UNION ALL
+   SELECT bezoeker_key || ';' ||
+          bezoeker_naam || ';' ||
+          bedrijfsnaam || ';' ||
+          opmerking || ';' ||
+          geslacht || ';' ||
+          mobiel_nr || ';' ||
+          kenteken || ';' ||
+          datum || ';' ||
+          ontvanger,
+          bezoeker_key
+     FROM 
+     (SELECT b.bez_bezoekers_key bezoeker_key,
+             b.bez_afspraak_naam bezoeker_naam,
+             b.bez_afspraak_bedrijf bedrijfsnaam,
+             a.bez_afspraak_opmerking opmerking,
+             ud.fac_usrdata_code geslacht,
+             mobiel.bez_kenmerkwaarde_waarde mobiel_nr,
+             kenteken.bez_kenmerkwaarde_waarde kenteken,
+             TO_CHAR(a.bez_afspraak_datum, 'YYYY-MM-DD HH24:MI') datum,
+             p.prs_perslid_nr ontvanger
+        FROM bez_bezoekers b,
+             bez_afspraak a,
+             prs_perslid p,
+             (SELECT * FROM bez_kenmerkwaarde WHERE bez_kenmerk_key = 1001) geslacht,
+             (SELECT * FROM fac_usrdata WHERE fac_usrtab_key = 281) ud,
+             (SELECT * FROM bez_kenmerkwaarde WHERE bez_kenmerk_key = 1003) mobiel,
+             (SELECT * FROM bez_kenmerkwaarde WHERE bez_kenmerk_key = 1005) kenteken
+       WHERE b.bez_afspraak_key = a.bez_afspraak_key
+         AND TRUNC(a.bez_afspraak_datum) >= TRUNC(SYSDATE)
+         AND a.alg_locatie_key = 2
+         AND p.prs_perslid_key = a.bez_afspraak_contact_key
+         AND geslacht.bez_bezoekers_key = b.bez_bezoekers_key
+         AND ud.fac_usrdata_key(+) = fac.safe_to_number(geslacht.bez_kenmerkwaarde_waarde)
+         AND mobiel.bez_bezoekers_key(+) = b.bez_bezoekers_key
+         AND kenteken.bez_bezoekers_key(+) = b.bez_bezoekers_key);
+
+BEGIN fac.registercustversion('CAPG', 6); END;
 /
 BEGIN adm.systrackscript('$Workfile: capg.sql $', '$Revision$', 0); END;
 /