FSN#41521 usertellingnotificatiejob werd iedere dag gestuurd ipv elke 90 dagen

svn path=/Database/branches/DB31/; revision=34826

ADM/ADM_SEQ.SRC

@@ -0,0 +1,9 @@
+/*
+ * $Revision$
+ * $Id$
+ */
+
+CREATE SEQUENCE adm_s_adm_tracking_key MINVALUE 1;
+
+// De package is er nog niet bij de CREA dus uitgeschakeld
+// REGISTERONCE('$Id$')

ADM/ADM_TAB.SRC

@@ -5,8 +5,14 @@
 
 CREATE_TABLE(adm_tracking, 0)
 (
+   adm_tracking_key
+      NUMBER(10)
+      CONSTRAINT adm_k_adm_tracking_key PRIMARY KEY,
    adm_tracking_name VARCHAR2 (60),
    adm_tracking_revision VARCHAR2 (60),
    adm_tracking_date DATE DEFAULT SYSDATE,
    adm_tracking_osuser VARCHAR2 (60) DEFAULT SYS_CONTEXT('USERENV','OS_USER')
 );
+
+// De package is er nog niet bij de CREA dus uitgeschakeld
+// REGISTERONCE('$Id$')

ADM/ADM_TRI.SRC

@@ -0,0 +1,16 @@
+/*
+ *  $Revision$
+ *  $Id$
+ *
+ */
+
+CREATE_TRIGGER(adm_t_adm_tracking_B_I)
+BEFORE INSERT ON adm_tracking
+FOR EACH ROW
+BEGIN
+    UPDATE_PRIMARY_KEY(adm_tracking_key, adm_s_adm_tracking_key);
+END;
+/
+
+// De package is er nog niet bij de CREA dus uitgeschakeld
+// REGISTERRUN('$Id$')

ALG/ALG_SEQ.SRC

@@ -20,3 +20,4 @@ CREATE SEQUENCE alg_s_alg_srtverdieping_key     MINVALUE 1;
 
 CREATE SEQUENCE alg_s_alg_kenmerk_key           MINVALUE 1000;
 CREATE SEQUENCE alg_s_alg_onrgoedkenmerk_key    MINVALUE 1;
+CREATE SEQUENCE alg_s_alg_algfaq_key            MINVALUE 1;

ALG/ALG_TAB.SRC

@@ -594,4 +594,22 @@ CREATE_TABLE(alg_kenmerk,0)
         DEFAULT NULLDATUM
 );
 
-REGISTERONCE('$Id$')
+-- Koppeltabel tussen de Kennisbank (FAQ) en plaats (alg_v_allonroerendgoed)
+CREATE_TABLE(alg_algfaq, 0)
+(
+    alg_algfaq_key
+        NUMBER(10)
+        CONSTRAINT alg_k_algfaq_key PRIMARY KEY,
+    alg_locatie_key
+        NUMBER(10)
+        NOT_NULL(alg_locatie_key, mld_c_alg_locatie_key)
+        CONSTRAINT mld_r_mld_locatie_key1 REFERENCES alg_locatie(alg_locatie_key) ON DELETE CASCADE,
+    alg_onroerendgoed_keys
+        NUMBER(10),
+    fac_faq_key
+        NUMBER(10)
+        NOT_NULL(fac_faq_key, alg_c_fac_faq_key)
+        CONSTRAINT alg_r_fac_faq_key1 REFERENCES fac_faq(fac_faq_key) ON DELETE CASCADE
+);
+
+REGISTERONCE('$Id$')

ALG/ALG_TRI.SRC

@@ -117,20 +117,6 @@ BEGIN
         WHEN NO_DATA_FOUND THEN NULL;
         WHEN TOO_MANY_ROWS THEN raise_application_error(-20000,'cnt_m027');
       END;
-      /* CONN#465 */
-      DECLARE
-        dummy CHAR;
-      BEGIN
-        SELECT 'x'
-        INTO   dummy
-        FROM   cnt_contract_onrgoed co
-        WHERE  co.ALG_ONRGOED_KEY  = :old.alg_terreinsector_key
-        AND    co.ALG_ONRGOED_NIVEAU = 'T';
-        APPLICATION_ERROR_GOTO(-20000,'alg_m999 Terrein heeft nog huurcontract');
-      EXCEPTION
-        WHEN NO_DATA_FOUND THEN NULL;
-        WHEN TOO_MANY_ROWS THEN APPLICATION_ERROR_GOTO(-20000,'alg_m999 Terrein heeft nog huurcontract');
-      END;
       DECLARE
         dummy CHAR;
       BEGIN
@@ -333,20 +319,6 @@ BEGIN
         WHEN TOO_MANY_ROWS THEN APPLICATION_ERROR_GOTO(-20000,'cnt_m024');
       END;
 
-      DECLARE
-        dummy CHAR;
-      BEGIN
-        SELECT 'x'
-        INTO   dummy
-        FROM   cnt_contract_onrgoed co
-        WHERE  co.alg_onrgoed_key  = :old.alg_ruimte_key
-        AND    co.alg_onrgoed_niveau = 'R';
-        APPLICATION_ERROR_GOTO(-20000,'alg_m999 Ruimte heeft nog huurcontract');
-      EXCEPTION
-        WHEN NO_DATA_FOUND THEN NULL;
-        WHEN TOO_MANY_ROWS THEN APPLICATION_ERROR_GOTO(-20000,'alg_m999 Ruimte heeft nog huurcontract');
-      END;
-
       DECLARE
         dummy CHAR;
       BEGIN
@@ -697,4 +669,23 @@ BEGIN
 END;
 /
 
+CREATE_TRIGGER(alg_t_alg_algfaq_B_I)
+BEFORE INSERT ON alg_algfaq
+FOR EACH ROW
+BEGIN
+    UPDATE_PRIMARY_KEY(alg_algfaq_key, alg_s_alg_algfaq_key);
+END;
+/
+
+CREATE_TRIGGER(alg_t_alg_algfaq_B_IU)
+BEFORE INSERT OR UPDATE ON alg_algfaq
+FOR EACH ROW
+BEGIN
+    IF :new.alg_onroerendgoed_keys IS NOT NULL
+    THEN
+    CHECK_REFERENCE_ONROERENDGOED(alg_onroerendgoed_keys, 'alg_m239 alg_onroerendgoed_keys ('|| :new.alg_onroerendgoed_keys ||') bestaat niet');
+    END IF;
+END;
+/
+
 REGISTERRUN('$Id$')

ALG/ALG_VIE.SRC

@@ -551,15 +551,6 @@ AS
      FROM alg_terreinsector alg_t, alg_locatie alg_l
     WHERE alg_l.alg_locatie_key = alg_t.alg_locatie_key;
 
-CREATE_VIEW(alg_v_alg_ruimte_verdieping,0)
-AS SELECT ALG_R.alg_ruimte_key
-   ,      ALG_V.alg_verdieping_key
-   FROM   alg_ruimte           ALG_R,
-          alg_verdieping       ALG_V
-   WHERE  ALG_R.alg_verdieping_key = ALG_V.alg_verdieping_key
-   AND    ALG_R.alg_ruimte_verwijder IS NULL;
-
-
 CREATE_VIEW(alg_v_my_room, 0) AS
    SELECT DISTINCT r.alg_ruimte_key, r.alg_verdieping_key, pl.prs_perslid_key
               FROM alg_ruimte r,

AUT/AUT_IND.SRC

@@ -0,0 +1,11 @@
+/*  $Revision$
+ *  $Id$
+ */
+
+CREATE UNIQUE INDEX aut_i_idp_code ON aut_idp(aut_idp_code);
+CREATE UNIQUE INDEX aut_i_idp2 ON aut_idp(aut_idp_issuer, aut_idp_audience, aut_idp_type);
+
+CREATE UNIQUE INDEX aut_i_cp_refreshtkn  ON aut_client_perslid(aut_client_perslid_refreshtkn);
+CREATE UNIQUE INDEX aut_i_cp_accesstoken ON aut_client_perslid(aut_client_perslid_accesstoken);
+
+REGISTERONCE('$Id$')

AUT/AUT_SEQ.SRC

@@ -0,0 +1,12 @@
+/*
+ * $Revision$
+ * $Id$
+ */
+
+CREATE SEQUENCE aut_s_aut_idp_key               MINVALUE 1;
+CREATE SEQUENCE aut_s_aut_idp_map_key           MINVALUE 1;
+
+CREATE SEQUENCE aut_s_aut_client_key            MINVALUE 1;
+CREATE SEQUENCE aut_s_aut_client_perslid_key    MINVALUE 1;
+
+REGISTERONCE('$Id$')

AUT/AUT_TAB.SRC

@@ -0,0 +1,147 @@
+/*
+ * $Revision$
+ * $Id$
+ */
+
+// Documentatie in de wiki onder Authenticeren
+CREATE TABLE aut_idp
+(
+    aut_idp_key
+        NUMBER(10)
+        CONSTRAINT aut_k_idp_key PRIMARY KEY,
+    aut_idp_code            -- Voor &sso=<code>
+        VARCHAR2(30),
+    aut_idp_type            -- 1=Internal (login.asp, future use), 2=UID_DEC (deprecated),
+        NUMBER(3),          -- 3=GUID-encrypted (deprecated), 4=JWT, 5=SAML (future use)
+    aut_idp_algorithm       -- HS256 is HMAC-SHA256
+        VARCHAR2(30),
+    aut_idp_omschrijving
+        VARCHAR2(30),
+    aut_idp_opmerking
+        VARCHAR2(320),
+    aut_idp_secret
+        VARCHAR2(128),
+    aut_idp_audience
+        VARCHAR2(128),
+    aut_idp_issuer
+        VARCHAR2(128),
+    aut_idp_remote_loginurl
+        VARCHAR2(128),
+    aut_idp_remote_logouturl
+        VARCHAR2(128),
+    aut_idp_saml_metaurl
+        VARCHAR2(128),
+    aut_idp_clockskew
+        NUMBER(10),
+    aut_idp_duration
+        NUMBER(10),
+    aut_idp_autocreate
+        NUMBER(1)
+        DEFAULT 0 -- +1: create; +2: update
+        NOT NULL,
+-- Note: these column are defined in PRS_TAB.SRC
+--    prs_afdeling_key         NUMBER(10)
+--    prs_bedrijf_key          NUMBER(10)
+    fac_functie_key
+        NUMBER(10)
+        CONSTRAINT aut_r_idp_functie REFERENCES fac_functie(fac_functie_key),
+    aut_idp_internal        -- can be used for FACFAC
+        NUMBER(1)
+        DEFAULT 0 NOT NULL,
+    aut_idp_ipfilter
+        VARCHAR2(320),
+    aut_idp_ipauto
+        NUMBER(1)
+        DEFAULT 0 NOT NULL,
+    aut_idp_loglevel
+      NUMBER(1) DEFAULT 0 NOT NULL,
+    aut_idp_aanmaak
+        DATE
+        DEFAULT SYSDATE
+);
+
+CREATE TABLE aut_idp_map
+(
+    aut_idp_map_key
+        NUMBER(10)
+        CONSTRAINT aut_k_idp_map_key PRIMARY KEY,
+    aut_idp_key
+        NUMBER(10)
+        CONSTRAINT aut_r_idp_map_id REFERENCES aut_idp(aut_idp_key) ON DELETE CASCADE,
+    aut_idp_map_from --  as sent in JWT
+        VARCHAR(100)
+        NOT NULL,
+    aut_idp_map_to -- FACILITOR column of 1000+kenmerk_key
+        NUMBER(10)
+        NOT NULL,
+    aut_idp_map_identify
+        NUMBER(1)
+        DEFAULT 0
+        NOT NULL,
+    aut_idp_map_default
+        VARCHAR(256),
+    aut_idp_map_aanmaak
+        DATE
+        DEFAULT SYSDATE
+);
+
+-- Clients (zoals al dan niet native App's)
+CREATE TABLE aut_client
+(
+    aut_client_key
+        NUMBER(10)
+        CONSTRAINT aut_k_aut_client_key PRIMARY KEY,
+    aut_client_id
+        VARCHAR2(64),
+    aut_client_type            -- 1=Internal (login.asp, future use), 2=UID_DEC (deprecated),
+        NUMBER(3),             -- 3=GUID-encrypted (deprecated), 4=JWT, 5=SAML (future use)
+    aut_client_omschrijving
+        VARCHAR2(30),
+    aut_client_opmerking
+        VARCHAR2(320),
+    aut_client_secret
+        VARCHAR2(128),
+    aut_client_customuri -- future use
+        VARCHAR2(128),
+    aut_client_aanmaak
+        DATE
+        DEFAULT SYSDATE
+);
+
+-- Koppeling client en (toestemming gegeven door) perslid
+CREATE TABLE aut_client_perslid
+(
+    aut_client_perslid_key
+        NUMBER(10)
+        CONSTRAINT aut_k_client_perslid PRIMARY KEY,
+    aut_client_key
+        NUMBER(10)
+        CONSTRAINT aut_r_aut_client_id REFERENCES aut_client(aut_client_key) ON DELETE CASCADE,
+    aut_client_perslid_device_id
+        VARCHAR(320),
+    aut_client_perslid_scope
+        VARCHAR(320)
+        DEFAULT NULL,
+    aut_client_perslid_pushtoken
+        VARCHAR(320),
+    aut_client_perslid_refreshtkn -- unused yet
+        VARCHAR(320),
+    aut_client_perslid_refreshdate
+        DATE,
+    aut_client_perslid_accesstoken
+        VARCHAR(320),
+    aut_client_perslid_accessdate
+        DATE,
+    aut_client_perslid_login -- wanneer voor het laatst de app gebruikt
+        DATE,
+// Note: this column is defined in PRS_TAB.SRC
+//    prs_perslid_key
+//        NUMBER(10)
+//        CONSTRAINT aut_r_aut_client_perslid REFERENCES prs_perslid(prs_perslid_key) ON DELETE CASCADE
+//        CONSTRAINT aut_c_aut_client_perslid CHECK(prs_perslid_key IS NOT NULL),
+    aut_client_perslid_aanmaak
+        DATE
+        DEFAULT SYSDATE
+);
+
+REGISTERONCE('$Id$')

AUT/AUT_TRI.SRC

@@ -0,0 +1,40 @@
+/*
+ *  $Revision$
+ *  $Id$
+ *
+ */
+
+CREATE_TRIGGER(aut_t_aut_idp_B_IU)
+BEFORE INSERT OR UPDATE ON aut_idp
+FOR EACH ROW
+BEGIN
+   UPDATE_PRIMARY_KEY(aut_idp_key, aut_s_aut_idp_key);
+   :new.aut_idp_code := UPPER(:new.aut_idp_code);
+END;
+/
+
+CREATE_TRIGGER(aut_t_aut_idp_map_B_I)
+BEFORE INSERT ON aut_idp_map
+FOR EACH ROW
+BEGIN
+   UPDATE_PRIMARY_KEY(aut_idp_map_key, aut_s_aut_idp_map_key);
+END;
+/
+
+CREATE_TRIGGER(aut_t_aut_client_B_I)
+BEFORE INSERT ON aut_client
+FOR EACH ROW
+BEGIN
+   UPDATE_PRIMARY_KEY(aut_client_key, aut_s_aut_client_key);
+END;
+/
+
+CREATE_TRIGGER(aut_t_aut_client_perslid_B_I)
+BEFORE INSERT ON aut_client_perslid
+FOR EACH ROW
+BEGIN
+   UPDATE_PRIMARY_KEY(aut_client_perslid_key, aut_s_aut_client_perslid_key);
+END;
+/
+
+REGISTERRUN('$Id$')

BES/BES_PAC.SRC

@@ -51,7 +51,8 @@ AS
                          p_bes_srtdeel_vervaldatum     IN DATE,
                          p_bes_srtdeel_image           IN VARCHAR2,
                          p_bes_srtdeel_veelvoud        IN NUMBER,
-                         p_bes_srtdeel_opmerking       IN VARCHAR2
+                         p_bes_srtdeel_opmerking       IN VARCHAR2,
+                         p_bes_srtdeel_details_loc     IN VARCHAR2 DEFAULT NULL
                         );
 
    PROCEDURE makeorders (i_userkey IN NUMBER, bes_key IN NUMBER);
@@ -606,7 +607,8 @@ AS
                              p_bes_srtdeel_vervaldatum     IN DATE,
                              p_bes_srtdeel_image           IN VARCHAR2,                                -- VARCHAR2 (255)
                              p_bes_srtdeel_veelvoud        IN NUMBER,                                      -- NUMBER (6)
-                             p_bes_srtdeel_opmerking       IN VARCHAR2                                -- VARCHAR2 (2000)
+                             p_bes_srtdeel_opmerking       IN VARCHAR2,                               -- VARCHAR2 (2000)
+                             p_bes_srtdeel_details_loc     IN VARCHAR2  DEFAULT NULL                   -- VARCHAR2 (255)
                             )
    AS
       v_bes_srtgroep_key NUMBER (10);
@@ -688,7 +690,8 @@ AS
                                      bes_srtdeel_image,
                                      bes_srtdeel_veelvoud,
                                      bes_srtdeel_verwijder,
-                                     bes_srtdeel_opmerking
+                                     bes_srtdeel_opmerking,
+                                     bes_srtdeel_details_loc
                     )
            VALUES   (
                         v_bes_srtdeel_key,
@@ -702,7 +705,8 @@ AS
                         p_bes_srtdeel_image,
                         p_bes_srtdeel_veelvoud,
                         SYSDATE,
-                        p_bes_srtdeel_opmerking
+                        p_bes_srtdeel_opmerking,
+                        p_bes_srtdeel_details_loc
                     );
       ELSE
         -- Bestaand artikel, maar de verwijdatum moet wel ververst worden
@@ -1444,6 +1448,7 @@ AS
                                                              WHERE   aa.prs_afdeling_key = lafd_key
                                                                      AND aa.niveau = g.fac_gebruiker_prs_level_write))))
                          -- in ASP:  if (params.loc_key>0)
+                         -- Bij bestelling wordt afleveradres ingevuld die is gekoppeld aan alg_locatie_key. Dus op locatie niveau checken is hier voldoende.
                          AND (g.fac_gebruiker_alg_level_write = -1
                               OR (g.fac_gebruiker_alg_level_write < 9
                                   AND lloc_key IN

BES/BES_TAB.SRC

@@ -405,6 +405,10 @@ CREATE_TABLE(bes_disc_params, 0)
         NUMBER(10)
         NOT_NULL(bes_ins_discipline_key, bes_c_ins_discipline_key)
         CONSTRAINT bes_r_ins_discipine_key REFERENCES ins_tab_discipline(ins_discipline_key),
+    bes_disc_params_fiatflow /* Fiatterings flow 0=fiatteur->besbof 1=besbof->fiatteur */
+        NUMBER(1)
+        DEFAULT 0
+        CONSTRAINT bes_c_disc_params_fiatflow CHECK(bes_disc_params_fiatflow IN (0,1)),
     bes_disc_params_bestellimiet
         NUMBER(8,2)
         DEFAULT 100000,

BES/BES_TRI.SRC

@@ -147,6 +147,47 @@ END;
 /
 
 
+AUDIT_BEGIN(bes_disc_params)
+AUDIT_VALUE(bes_disc_params, bes_disc_params_bestellimiet)
+AUDIT_VALUE(bes_disc_params, bes_disc_params_bestellimiet2)
+AUDIT_VALUE(bes_disc_params, bes_disc_params_bestellimiet3)
+AUDIT_VALUE(bes_disc_params, bes_disc_params_bestellimiet4)
+AUDIT_VALUE(bes_disc_params, bes_disc_params_bestellimiet5)
+AUDIT_VALUE(bes_disc_params, bes_disc_params_min_bedrag)
+AUDIT_VALUE(bes_disc_params, bes_disc_params_auto_order)
+AUDIT_VALUE(bes_disc_params, bes_disc_params_autoacceptrfo)
+AUDIT_VALUE(bes_disc_params, bes_disc_params_herfiat)
+AUDIT_VALUE(bes_disc_params, bes_disc_params_herfiatpct)
+AUDIT_VALUE(bes_disc_params, bes_disc_params_herfiatmarge)
+AUDIT_VALUE(bes_disc_params, bes_disc_params_factuurpct)
+AUDIT_VALUE(bes_disc_params, bes_disc_params_factuurmarge)
+AUDIT_VALUE(bes_disc_params, bes_disc_params_factmatchmode)
+AUDIT_VALUE(bes_disc_params, bes_disc_params_factuurappr)
+AUDIT_VALUE(bes_disc_params, bes_disc_params_factuurgrens)
+AUDIT_VALUE(bes_disc_params, bes_disc_params_pgb)
+AUDIT_VALUE(bes_disc_params, bes_disc_params_leverdagen)
+AUDIT_VALUE(bes_disc_params, bes_disc_params_remoteconfirm)
+AUDIT_VALUE(bes_disc_params, bes_disc_params_freeartikel)
+AUDIT_VALUE(bes_disc_params, bes_disc_params_punchouturl)
+AUDIT_VALUE(bes_disc_params, bes_disc_params_punch_bedr_key)
+AUDIT_VALUE(bes_disc_params, bes_disc_params_logo_url)
+AUDIT_VALUE(bes_disc_params, bes_disc_params_noti_dagen)
+AUDIT_VALUE(bes_disc_params, bes_disc_params_noti_opdr)
+AUDIT_VALUE(bes_disc_params, bes_disc_params_bonotify)
+AUDIT_VALUE(bes_disc_params, bes_disc_params_retour)
+AUDIT_VALUE(bes_disc_params, bes_disc_params_retour_url)
+AUDIT_VALUE(bes_disc_params, bes_disc_params_levopm_url)
+AUDIT_VALUE(bes_disc_params, bes_ins_discipline_key_inkoop)
+AUDIT_VALUE(bes_disc_params, bes_disc_params_singlegroep)
+AUDIT_VALUE(bes_disc_params, bes_disc_params_kpautorisatie)
+AUDIT_VALUE(bes_disc_params, bes_disc_params_maxartikel)
+AUDIT_VALUE(bes_disc_params, bes_disc_params_contract)
+AUDIT_VALUE(bes_disc_params, bes_disc_params_cnt_disckey)
+AUDIT_VALUE(bes_disc_params, bes_disc_params_cnt_termijn)
+AUDIT_VALUE(bes_disc_params, bes_disc_params_cnt_opzegterm)
+AUDIT_VALUE(bes_disc_params, bes_disc_params_for_others)
+AUDIT_END()
+
 CREATE_TRIGGER(BES_T_BES_DISC_PARAMS_B_IU)
 BEFORE INSERT OR UPDATE ON bes_disc_params
 FOR EACH ROW

BEZ/BEZ_PAC.SRC

@@ -295,6 +295,8 @@ CREATE OR REPLACE PACKAGE BODY bez AS
                                         POWER(2,
                                               (fac.getweekdaynum(TRUNC(lbegin)) - 1))) =
                                  POWER(2, (fac.getweekdaynum(TRUNC (lbegin)) - 1))
+                             AND (   d.res_deel_vervaldatum IS NULL
+                                  OR d.res_deel_vervaldatum > lbegin)
                   ORDER BY   id.ins_deel_upper)
          WHERE   aantal IS NULL;
       ELSE
@@ -327,6 +329,8 @@ CREATE OR REPLACE PACKAGE BODY bez AS
                                         POWER(2,
                                               (fac.getweekdaynum(TRUNC(lbegin)) - 1))) =
                                  POWER(2, (fac.getweekdaynum(TRUNC (lbegin)) - 1))
+                             AND (   d.res_deel_vervaldatum IS NULL
+                                  OR d.res_deel_vervaldatum > lbegin)
                   ORDER BY   id.ins_deel_upper)
          WHERE   aantal IS NULL;
       END IF;

BEZ/BEZ_VIE.SRC

@@ -37,6 +37,8 @@ SELECT a.bez_afspraak_key,
 CREATE_VIEW(bez_v_udr_bezoeker, 1)
 (
    key,
+   afspraak_key,
+   reservering_key,
    host,
    contact,
    plaats_code,
@@ -69,6 +71,8 @@ CREATE_VIEW(bez_v_udr_bezoeker, 1)
 )
 AS
    SELECT b.bez_bezoekers_key,
+          a.bez_afspraak_key,
+          a.res_rsv_ruimte_key,
           COALESCE (p1.prs_perslid_naam_full, a.bez_afspraak_gastheer) bez_afspraak_host,
           p2.prs_perslid_naam_full bez_afspraak_contact,
           og.alg_onroerendgoed_code,
@@ -120,7 +124,159 @@ AS
           AND l.alg_locatie_key = og.alg_locatie_key
           AND a.alg_onrgoed_keys = og.alg_onroerendgoed_keys
           AND b.bez_bezoekers_key = rrd.bez_bezoekers_key(+)
-          AND rrd.res_deel_key = rd.res_deel_key(+);
+          AND rrd.res_deel_key = rd.res_deel_key(+)
+          AND a.bez_afspraak_datum >= TO_DATE ('01-01-2010', 'DD-MM-YYYY');
+
+CREATE_VIEW(bez_v_udr_reserveringbezoeker, 1)
+(
+   bezoeker_key,
+   afspraak_key,
+   reservering_key,
+   host,
+   plaats_code,
+   plaats_omschrijving,
+   regio,
+   district,
+   locatie_code,
+   locatie_naam,
+   gebouw_code,
+   gebouw_naam,
+   verdieping_code,
+   verdieping_naam,
+   ruimte_code,
+   ruimte_naam,
+   afspraak_ruimte,
+   afspraak_opmerking,
+   bezoeker_naam,
+   bezoeker_bedrijf,
+   bezoek_van,
+   bezoek_tot,
+   actie,
+   bezoeker_opmerking,
+   bezoeker_binnen,
+   bezoeker_buiten,
+   pasnr,
+   parkeerplaats,
+   nummer,
+   res_omschrijving,
+   invoerdatum,
+   datum,
+   gastheer,
+   invoerder,
+   kostensoortgroep,
+   kostensoort,
+   kpn,
+   kpn_omschrijving,
+   fclt_3d_afdeling_key,
+   afdeling_code,
+   afdeling_omschrijving,
+   regio_omschrijving,
+   district_omschijving,
+   fclt_3d_locatie_key,
+   locatie,
+   locatie_omschrijving,
+   locatie_plaats,
+   gebouw,
+   verdieping,
+   ruimte,
+   opstelling,
+   capaciteit,
+   no_show,
+   mandaat,
+   personeelsnr,
+   fclt_3d_discipline_key,
+   catalogus_key,
+   catalogus,
+   reserveerbare_ruimte,
+   bezoekers,
+   van,
+   tot,
+   duur,
+   status,
+   bostatus,
+   activiteit,
+   srtactiviteit_key,
+   activiteitsoort
+ )
+AS
+SELECT
+   b.key bezoeker_key,
+   b.afspraak_key,
+   b.reservering_key,
+   b.host,
+   --b.contact,
+   b.plaats_code,
+   b.plaats_omschrijving,
+   b.regio,
+   b.district,
+   b.locatie_code,
+   b.locatie_naam,
+   --b.locatie_plaats,
+   b.gebouw_code,
+   b.gebouw_naam,
+   b.verdieping_code,
+   b.verdieping_naam,
+   b.ruimte_code,
+   b.ruimte_naam,
+   b.afspraak_ruimte,
+   b.afspraak_opmerking,
+   b.bezoeker_naam,
+   b.bezoeker_bedrijf,
+   b.bezoek_van,
+   b.bezoek_tot,
+   b.actie,
+   b.bezoeker_opmerking,
+   b.bezoeker_binnen,
+   b.bezoeker_buiten,
+   b.pasnr,
+   b.parkeerplaats,
+   --b.fclt_3d_locatie_key,
+   --b.fclt_3d_afdeling_key,
+   --r.key,
+   r.nummer,
+   r.res_omschrijving,
+   r.invoerdatum,
+   r.datum,
+   r.gastheer,
+   --r.contact,
+   r.invoerder,
+   r.kostensoortgroep,
+   r.kostensoort,
+   r.kpn,
+   r.kpn_omschrijving,
+   r.fclt_3d_afdeling_key,
+   r.afdeling_code,
+   r.afdeling_omschrijving,
+   r.regio_omschrijving,
+   r.district_omschijving,
+   r.fclt_3d_locatie_key,
+   r.locatie,
+   r.locatie_omschrijving,
+   r.locatie_plaats,
+   r.gebouw,
+   r.verdieping,
+   r.ruimte,
+   r.opstelling,
+   r.capaciteit,
+   r.no_show,
+   r.mandaat,
+   r.personeelsnr,
+   r.fclt_3d_discipline_key,
+   r.catalogus_key,
+   r.catalogus,
+   r.reserveerbare_ruimte,
+   r.bezoekers,
+   r.van,
+   r.tot,
+   r.duur,
+   r.status,
+   r.bostatus,
+   r.activiteit,
+   r.srtactiviteit_key,
+   r.activiteitsoort
+  FROM res_v_udr_reservering r, bez_v_udr_bezoeker b
+ WHERE b.reservering_key = r.key;
+
 
 REGISTERRUN('$Id$')
 

BGT/BGT_IND.SRC

@@ -0,0 +1,10 @@
+#ifdef BGT
+/*
+ * $Revision$
+ * $Id$
+ */
+
+
+REGISTERONCE('$Id$')
+
+#endif // BGT

BGT/BGT_INI.SRC

@@ -0,0 +1,11 @@
+#ifdef BGT
+/*
+ * $Revision$
+ * $Id$
+ */
+
+_FAC_MODULE('BGT','lcl_module_BGT')
+
+REGISTERONCE('$Id$')
+
+#endif // BGT

BGT/BGT_PAC.SRC

@@ -0,0 +1,10 @@
+#ifdef BGT
+/*
+ * $Revision$
+ * $Id$
+ */
+
+
+REGISTERRUN('$Id$')
+
+#endif // BGT

BGT/BGT_SEQ.SRC

@@ -0,0 +1,16 @@
+#ifdef  BGT
+/*
+ * $Revision$
+ * $Id$
+ */
+
+CREATE SEQUENCE bgt_s_bgt_disc_params_key   MINVALUE 1;
+CREATE SEQUENCE bgt_s_bgt_project_key       MINVALUE 1;
+CREATE SEQUENCE bgt_s_bgt_kostenrubriek_key MINVALUE 1;
+CREATE SEQUENCE bgt_s_bgt_budget_key        MINVALUE 1;
+CREATE SEQUENCE bgt_s_bgt_budgetmutatie_key MINVALUE 1;
+
+
+REGISTERONCE('$Id$')
+
+#endif  // BGT

BGT/BGT_TAB.SRC

@@ -0,0 +1,151 @@
+#ifdef  BGT
+/*
+ * $Revision$
+ * $Id$
+ */
+
+/* discipline=project */
+CREATE_TABLE(bgt_disc_params,0)
+(
+    bgt_disc_params_key
+        NUMBER (10) PRIMARY KEY NOT NULL,
+    bgt_ins_discipline_key
+        NUMBER (10)
+        CONSTRAINT bgt_r_ins_discipine_key REFERENCES ins_tab_discipline (ins_discipline_key),
+    bgt_disc_params_code  -- projectcode
+        VARCHAR2 (20 BYTE),
+    bgt_disc_params_opdrachtgever
+        VARCHAR2 (200 BYTE),
+    bgt_disc_params_startdatum
+        DATE
+);
+/* deelproject */
+CREATE_TABLE(bgt_project, 0)
+(
+    bgt_project_key
+        NUMBER (10) PRIMARY KEY NOT NULL,
+    ins_discipline_key
+        NUMBER (10)
+        CONSTRAINT bgt_r_ins_discipline_key1 REFERENCES ins_tab_discipline (ins_discipline_key),
+    bgt_project_code
+        VARCHAR2 (20 BYTE),
+    bgt_project_omschrijving
+        VARCHAR2 (60 BYTE),
+    bgt_project_volgnr
+        NUMBER (3),
+    bgt_project_prijspeildatum
+        DATE,
+    bgt_project_info
+        VARCHAR2 (4000 BYTE),
+    bgt_project_notes
+        VARCHAR2 (4000 BYTE),
+    bgt_project_aanmaak
+        DATE DEFAULT SYSDATE,
+    bgt_project_verwijder
+        DATE
+);
+
+ALTER TABLE prs_kostenplaatsgrp ADD bgt_project_key NUMBER(10) CONSTRAINT prs_r_bgt_project_key2 REFERENCES bgt_project (bgt_project_key);
+
+CREATE_TABLE(bgt_kostenrubriek,0)
+(
+    bgt_kostenrubriek_key
+        NUMBER (10) PRIMARY KEY NOT NULL,
+    bgt_project_key
+        NUMBER (10)
+        CONSTRAINT bgt_c_bgt_kostenrubriek1 NOT NULL
+        CONSTRAINT bgt_r_bgt_project_key1 REFERENCES bgt_project (bgt_project_key),
+    bgt_kostenrubriek_code
+        VARCHAR2 (20 BYTE),
+    bgt_kostenrubriek_oms
+        VARCHAR2 (60 BYTE) NOT NULL
+);
+
+ALTER TABLE prs_kostensoortgrp ADD bgt_kostenrubriek_key NUMBER(10) CONSTRAINT prs_r_bgt_kostenrubriek_key1 REFERENCES bgt_kostenrubriek (bgt_kostenrubriek_key);
+
+CREATE_TABLE(bgt_budget,1)
+(
+    bgt_budget_key
+        NUMBER (10) PRIMARY KEY NOT NULL,
+    ins_discipline_key
+        NUMBER (10)
+        CONSTRAINT prs_r_ins_discipline_key1 REFERENCES ins_tab_discipline (ins_discipline_key),  /* ik denk nog not null?*/
+    bgt_project_key
+        NUMBER (10)
+        CONSTRAINT prs_r_bgt_project_key1 REFERENCES bgt_project (bgt_project_key),           /* ik denk nog not null?*/
+    bgt_kostenrubriek_key
+        NUMBER (10)
+        CONSTRAINT prs_r_bgt_kostenrubriek_key2 REFERENCES bgt_kostenrubriek (bgt_kostenrubriek_key),
+    prs_kostensoortgrp_key
+        NUMBER (10)
+        CONSTRAINT prs_r_kostensoortgrp_key2 REFERENCES prs_kostensoortgrp (prs_kostensoortgrp_key),
+    prs_kostensoort_key
+        NUMBER (10)
+        CONSTRAINT prs_r_kostensoort_key2 REFERENCES prs_kostensoort (prs_kostensoort_key),
+    prs_kostenplaatsgrp_key
+        NUMBER (10)
+        CONSTRAINT prs_r_kostenplaatsgrp_key3 REFERENCES prs_kostenplaatsgrp (prs_kostenplaatsgrp_key),
+    prs_kostenplaats_key
+        NUMBER (10)
+        CONSTRAINT prs_r_kostenplaats_key5 REFERENCES prs_kostenplaats (prs_kostenplaats_key),
+    bgt_budget_bedrag
+        NUMBER (12,2),
+    bgt_budget_btwbedrag
+        NUMBER (12,2),
+    bgt_budget_isreserve
+        NUMBER(1)
+        DEFAULT (0)
+        NOT NULL
+        CONSTRAINT bgt_c_bgt_budget_isreserve CHECK(bgt_budget_isreserve IN (0,1)),
+    bgt_budget_begin
+        DATE,
+    bgt_budget_eind
+        DATE,
+    bgt_budget_aanmaak
+        DATE DEFAULT SYSDATE,
+    bgt_budget_vervaldatum
+        DATE,                                         -- of gewoon verwijderdatum?
+    CONSTRAINT bgt_c_bgt_budget1 CHECK (  (bgt_budget_isreserve = 0 AND (   bgt_kostenrubriek_key IS NOT NULL
+                                                                        OR (bgt_kostenrubriek_key IS NOT NULL AND prs_kostensoortgrp_key IS NOT NULL)
+                                                                        OR (bgt_kostenrubriek_key IS NOT NULL AND prs_kostensoortgrp_key IS NOT NULL AND prs_kostensoort_key IS NOT NULL)
+                                                                        OR prs_kostenplaatsgrp_key IS NOT NULL
+                                                                        OR (prs_kostenplaatsgrp_key IS NOT NULL AND prs_kostenplaats_key IS NOT NULL)
+                                                                        )
+                                          )
+                                       OR (bgt_budget_isreserve = 1 AND prs_kostensoortgrp_key IS NULL AND prs_kostenplaats_key IS NULL)
+                                       )
+);
+
+-- under construction
+CREATE_TABLE(bgt_budgetmutatie, 1)
+(
+   bgt_budgetmutatie_key
+        NUMBER (10) PRIMARY KEY,
+   bgt_budgetmutatie_datum
+        DATE NOT NULL,
+   bgt_budgetmutatie_omschrijving
+        VARCHAR2 (100) NOT NULL,
+   prs_perslid_key
+        NUMBER (10)
+        NOT NULL
+        CONSTRAINT bgt_r_prs_perslid_key2 REFERENCES prs_perslid (prs_perslid_key),
+   bgt_budget_key_van
+        NUMBER (10)
+        CONSTRAINT bgt_r_bgt_budget1 REFERENCES bgt_budget (bgt_budget_key),
+   bgt_budget_bedrag_van
+        NUMBER (12, 2),
+   bgt_budget_btwbedrag_van
+        NUMBER (12, 2),
+   bgt_budget_key_naar
+        NUMBER (10)
+        CONSTRAINT bgt_r_bgt_budget2 REFERENCES bgt_budget (bgt_budget_key),
+   bgt_budget_bedrag_naar
+        NUMBER (12, 2),
+   bgt_budget_btwbedrag_naar
+        NUMBER (12, 2),
+   CONSTRAINT bgt_c_bgt_budget_key1 CHECK(bgt_budget_key_van IS NOT NULL OR bgt_budget_key_naar IS NOT NULL)
+);
+
+REGISTERONCE('$Id$')
+
+#endif // BGT

BGT/BGT_TRI.SRC

@@ -0,0 +1,78 @@
+#ifdef  BGT
+/*
+ * $Revision$
+ * $Id$
+ */
+
+
+AUDIT_BEGIN(bgt_disc_params)
+AUDIT_VALUE(bgt_disc_params, bgt_ins_discipline_key)
+AUDIT_END()
+
+CREATE_TRIGGER(bgt_t_bgt_disc_params_b_i)
+BEFORE INSERT ON bgt_disc_params
+FOR EACH ROW
+BEGIN
+   UPDATE_PRIMARY_KEY(bgt_disc_params_key, bgt_s_bgt_disc_params_key);
+END;
+/
+
+CREATE_TRIGGER(bgt_t_bgt_project_B_I)
+BEFORE INSERT ON bgt_project
+FOR EACH ROW
+BEGIN
+    UPDATE_PRIMARY_KEY(bgt_project_key,bgt_s_bgt_project_key);
+END;
+/
+
+CREATE_TRIGGER(bgt_t_bgt_kostenrubriek_B_I)
+BEFORE INSERT ON bgt_kostenrubriek
+FOR EACH ROW
+BEGIN
+    UPDATE_PRIMARY_KEY(bgt_kostenrubriek_key,bgt_s_bgt_kostenrubriek_key);
+END;
+/
+
+CREATE_TRIGGER(bgt_t_bgt_budget_B_I)
+BEFORE INSERT ON bgt_budget
+FOR EACH ROW
+BEGIN
+    UPDATE_PRIMARY_KEY(bgt_budget_key,bgt_s_bgt_budget_key);
+END;
+/
+
+CREATE_TRIGGER(bgt_t_bgt_budgetmutatie_B_I)
+BEFORE INSERT ON bgt_budgetmutatie
+FOR EACH ROW
+BEGIN
+    UPDATE_PRIMARY_KEY(bgt_budgetmutatie_key,bgt_s_bgt_budgetmutatie_key);
+END;
+/
+
+CREATE_TRIGGER(bgt_t_bgt_budgetmutatie_B_IU)
+BEFORE INSERT OR UPDATE ON bgt_budgetmutatie
+FOR EACH ROW
+BEGIN
+    IF (:new.bgt_budget_key_van IS NOT NULL) THEN
+        UPDATE bgt_budget SET bgt_budget_bedrag = NVL(bgt_budget_bedrag, 0) + NVL(:new.bgt_budget_bedrag_van, 0) WHERE bgt_budget_key = :new.bgt_budget_key_van;
+        UPDATE bgt_budget SET bgt_budget_btwbedrag = NVL(bgt_budget_btwbedrag, 0) + NVL(:new.bgt_budget_btwbedrag_van, 0) WHERE bgt_budget_key = :new.bgt_budget_key_van;
+    END IF;
+    IF (:new.bgt_budget_key_naar IS NOT NULL) THEN
+        UPDATE bgt_budget SET bgt_budget_bedrag = NVL(bgt_budget_bedrag, 0) + NVL(:new.bgt_budget_bedrag_naar, 0) WHERE bgt_budget_key = :new.bgt_budget_key_naar;
+        UPDATE bgt_budget SET bgt_budget_btwbedrag = NVL(bgt_budget_btwbedrag, 0) + NVL(:new.bgt_budget_btwbedrag_naar, 0) WHERE bgt_budget_key = :new.bgt_budget_key_naar;
+    END IF;
+END;
+/
+
+CREATE_TRIGGER(bgt_t_bgt_budgetmutatie_B_D)
+BEFORE DELETE ON bgt_budgetmutatie
+FOR EACH ROW
+BEGIN
+    UPDATE bgt_budget SET bgt_budget_bedrag = bgt_budget_bedrag - :old.bgt_budget_bedrag_van WHERE bgt_budget_key = :old.bgt_budget_key_van;
+    UPDATE bgt_budget SET bgt_budget_bedrag = bgt_budget_bedrag - :old.bgt_budget_bedrag_naar WHERE bgt_budget_key = :old.bgt_budget_key_naar;
+END;
+/
+
+REGISTERRUN('$Id$')
+
+#endif  // BGT

BGT/BGT_VIE.SRC

@@ -0,0 +1,16 @@
+#ifdef BGT
+/*
+ * $Revision$
+ * $Id$
+ */
+
+CREATE_VIEW(ctr_discipline, 0)
+AS
+ SELECT * FROM ins_tab_discipline WHERE ins_discipline_module = 'BGT';
+
+DEFINIEER_VIEW_AANWEZIG(ctr_discipline, ins_discipline_verwijder,
+    bgt_v_aanwezigdiscipline, 0);
+
+REGISTERRUN('$Id$')
+
+#endif // BGT

CAD/CAD_VIE.SRC

@@ -11,51 +11,6 @@ CREATE_VIEW(cad_v_cad_aanwezigtekening,0) AS
                                    FROM ins_discipline)
      OR C_T.ins_discipline_key IS NULL);
 
-CREATE_VIEW(cad_v_cad_tekening_gegevens,0)
-   (cad_tekening_key,
-    alg_locatie_key,
-    alg_locatie_code,
-    alg_gebouw_key,
-    alg_gebouw_code,
-    alg_verdieping_key,
-    alg_verdieping_omschrijving,
-    ins_discipline_key,
-    ins_discipline_omschrijving) AS
-   SELECT C_T.cad_tekening_key,
-          C_T.alg_locatie_key,
-          ALG_L.alg_locatie_code,
-          ALG_G.alg_gebouw_key,
-          ALG_G.alg_gebouw_code,
-          C_T.alg_verdieping_key,
-          ALG_V.alg_verdieping_omschrijving,
-          C_T.ins_discipline_key,
-          INS_D.ins_discipline_omschrijving
-     FROM alg_locatie ALG_L,
-          alg_verdieping ALG_V,
-          alg_gebouw ALG_G,
-          ins_discipline INS_D,
-          cad_v_cad_aanwezigtekening C_T
-    WHERE C_T.alg_locatie_key = ALG_L.alg_locatie_key
-      AND C_T.alg_verdieping_key = ALG_V.alg_verdieping_key (+)
-      AND ALG_V.alg_gebouw_key = ALG_G.alg_gebouw_key (+)
-      AND C_T.ins_discipline_key = INS_D.ins_discipline_key (+);
-
-CREATE_VIEW(cad_v_plattegrond,0) AS
-  SELECT * FROM cad_tekening
-   WHERE cad_tekening_verwijder IS NULL
-     AND UPPER(cad_tekening_type) = 'P';
-
-CREATE_VIEW(cad_v_contour,0) AS
-  SELECT * FROM cad_tekening
-   WHERE cad_tekening_verwijder IS NULL
-     AND UPPER(cad_tekening_type) = 'C';
-
-CREATE_VIEW(cad_v_discipline,0) AS
-  SELECT * FROM cad_tekening
-   WHERE cad_tekening_verwijder IS NULL
-     AND UPPER(cad_tekening_type) = 'D';
-
-
 /* mapping van labels in tekening met ruimtenr in database
  * let op: de applicatie kan van een specifieke variant gebruikmaken
  * deze heet dan XXXX_V_SYNC..
@@ -81,84 +36,6 @@ SELECT
    t.alg_terreinsector_code
   FROM alg_v_aanwezigterreinsector t;
 
-
-
-/* View met ALLE tekeningen, ongeacht de autorisatie; minimale kolommen, gebruikt in CAD_PAC.SRC */
-CREATE_VIEW(cad_v_cad_tekening,0) AS
-  SELECT ins_discipline_key,
-         alg_locatie_key,
-         alg_verdieping_key,
-         cad_tekening_type,
-         cad_tekening_filenaam
-  FROM cad_tekening C_T
- WHERE cad_tekening_verwijder IS NULL;
-
-/* 29-06-1998 KTH LOG#1905
- * View CAD_V_INS_DEEL wordt door de AutoCAD Map-user FCLTCAD geraadpleegd.
- * Bij die user heet de SYNONYM ernaar toe anders (zie CAD_ROL).
- */
-CREATE_VIEW(cad_v_ins_deel,0)
-  (ins_deel_key,
-   ins_deel_cadlabel,
-   ins_srtdeel_omschrijving,
-   ins_deel_oppervlak,
-   ins_deel_omtrek
-) AS
-  SELECT D.ins_deel_key,
-         D.ins_deel_omschrijving,
-         SD.ins_srtdeel_omschrijving,
-         NVL(TO_CHAR(D.ins_deel_oppervlak),'-')||' m2',
-         NVL(TO_CHAR(D.ins_deel_omtrek),'-')||' m'
-  FROM all_v_aanwezigdeel D, ins_srtdeel SD
-  WHERE SD.ins_srtdeel_key=D.ins_srtdeel_key;
-
-CREATE_VIEW(cad_v_lpn_ins_deel_2,0) AS
-SELECT
-  D.ins_deel_key,
-  ins_srtkenmerk_omschrijving,
-  KD.ins_kenmerkdeel_waarde ||' '|| SK.ins_srtkenmerk_dimensie INS_KENMERKDEEL_WAARDE2
-FROM
-  ins_srtkenmerk SK,
-  ins_kenmerk K,
-  ins_kenmerkdeel KD,
-  ins_deel D
-WHERE SK.ins_srtkenmerk_key=K.ins_srtkenmerk_key
-  AND K.ins_kenmerk_key=KD.ins_kenmerk_key
-  AND KD.ins_deel_key=D.ins_deel_key
-  AND KD.ins_kenmerkdeel_verwijder IS NULL;
-
-CREATE_VIEW(cad_v_lpn_ins_deel_1,0) AS
-SELECT
-  D.ins_deel_key,
-  SD.ins_srtdeel_omschrijving,
-  D.ins_deel_omschrijving
-FROM
-  ins_srtdeel SD,
-  ins_deel D
-WHERE D.ins_srtdeel_key = SD.ins_srtdeel_key;
-
-
-CREATE_VIEW(cad_v_prs_werkplek,0)
-  (prs_werkplek_key,
-   prs_werkplek_cadlabel,
-   prs_werkplek_volgnr,
-   prs_werkplek_omschrijving,
-   prs_werkplek_opp
-) AS
- SELECT W.prs_werkplek_key,
-        W.prs_werkplek_volgnr,
-        W.prs_werkplek_volgnr,
-        W.prs_werkplek_omschrijving,
-        W.prs_werkplek_opp   /* Alleen een waarde indien prs_werkplek_vastopp 1 is, anders te traag? */
-   FROM prs_werkplek W;
-
-CREATE_VIEW(cad_v_lpn_prs_werkplek_1,0) AS
- SELECT W.prs_werkplek_key,
-        W.prs_werkplek_volgnr,
-        W.prs_werkplek_omschrijving
-   FROM prs_werkplek W;
-
-
 /* Standard thema/label views */
 //  Zowel label-views als thema-views hebben de kolommen alg_ruimte_key en waarde
 //  Feature: Sommige thema views kunnen updatable zijn!

CARE/CARE_INI.SRC

@@ -1587,7 +1587,27 @@ INSERT INTO fac_usrrap
              fac_functie_key,
              0
     FROM fac_functie WHERE fac_functie_code = 'WEB_MLDBAC';
-
+	
+	-- BONS#40385: Totaallijst clienten in zorg met medewerker (outerjoin uren):
+INSERT INTO fac_usrrap
+            (fac_usrrap_omschrijving,
+             fac_usrrap_view_name,
+             fac_usrrap_vraagbegindatum,
+             fac_usrrap_vraageinddatum,
+             fac_usrrap_functie,
+             fac_usrrap_info,
+             fac_functie_key,
+             fac_usrrap_autorefresh
+            )
+     SELECT  'Totaal lijst cli<6C>nten in zorg MDW',
+             'care_v_rap_tot_clientzorg_mdw',
+             0,
+             0,
+             1,
+             'Totaal lijst cli<6C>nten in zorg met gekoppelde medewerker',
+             fac_functie_key,
+             0
+    FROM fac_functie WHERE fac_functie_code = 'WEB_MLDBAC';
 
 ----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
 ----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------

CARE/CARE_VIE.SRC

@@ -633,183 +633,196 @@ CREATE_VIEW( care_v_beschikking_all, 0)
    ins_discipline_omschrijving
 )
 AS
-   SELECT   m.mld_melding_key,
-            m.mld_melding_status,
-            gemeente.alg_locatie_key,
-            gemeente.alg_locatie_code,
-            gemeente.alg_locatie_omschrijving,
-            gemeente.alg_locatie_adres,
-            gemeente.alg_locatie_postcode,
-            gemeente.alg_locatie_plaats,
-            gemeente.alg_locatie_post_adres,
-            gemeente.alg_locatie_post_postcode,
-            gemeente.alg_locatie_post_plaats,
-            gemeente.alg_locatie_verantw,
-            (SELECT ok.alg_onrgoedkenmerk_waarde
-            FROM alg_onrgoedkenmerk ok
-                    WHERE ok.alg_onrgoed_key = gemeente.alg_locatie_key
-            AND ok.alg_onrgoed_niveau = 'L'
-            AND ok.alg_kenmerk_key = 1004
-            AND ok.alg_onrgoedkenmerk_verwijder IS NULL),
-            (SELECT ok.alg_onrgoedkenmerk_waarde
-            FROM alg_onrgoedkenmerk ok
-                    WHERE ok.alg_onrgoed_key = gemeente.alg_locatie_key
-            AND ok.alg_onrgoed_niveau = 'L'
-            AND ok.alg_kenmerk_key = 1005
-            AND ok.alg_onrgoedkenmerk_verwijder IS NULL),
-            gemeente.alg_locatie_x,
-            gemeente.alg_locatie_y,
-            gemeente.alg_locatie_veiling,
-            gemeente.gemeente_budget,
-            gemeente.gemeente_ob,
-            client.prs_perslid_key prs_client_key,
-            client.prs_perslid_naam prs_client_naam,
-            client.prs_perslid_tussenvoegsel prs_client_tussenvoegsel,
-            client.prs_perslid_voorletters prs_client_voorletters,
-            client.prs_perslid_voornaam prs_client_voornaam,
-            client.prs_perslid_nr prs_client_nr,
-            client.fac_profiel_key prs_client_cak_actie,
-            (SELECT   kl.prs_kenmerklink_waarde
-               FROM   prs_kenmerklink kl
-              WHERE       kl.prs_link_key = client.prs_perslid_key
-                      AND kl.prs_kenmerklink_niveau = 'P'
-                      AND kl.prs_kenmerklink_verwijder IS NULL
-                      AND prs_kenmerk_key = 1020)
-               client_bsn,
-            (SELECT   kl.prs_kenmerklink_waarde
-               FROM   prs_kenmerklink kl
-              WHERE       kl.prs_link_key = client.prs_perslid_key
-                      AND kl.prs_kenmerklink_niveau = 'P'
-                      AND kl.prs_kenmerklink_verwijder IS NULL
-                      AND prs_kenmerk_key = 1001)
-               client_meisjesnaam,
-            (SELECT   DECODE (kl.prs_kenmerklink_waarde, 21, 'M', 22, 'V', NULL)
-               FROM   prs_kenmerklink kl
-              WHERE       kl.prs_link_key = client.prs_perslid_key
-                      AND kl.prs_kenmerklink_niveau = 'P'
-                      AND kl.prs_kenmerklink_verwijder IS NULL
-                      AND prs_kenmerk_key = 1061)
-               client_mv,
-            (SELECT   kl.prs_kenmerklink_waarde
-               FROM   prs_kenmerklink kl
-              WHERE       kl.prs_link_key = client.prs_perslid_key
-                      AND kl.prs_kenmerklink_niveau = 'P'
-                      AND kl.prs_kenmerklink_verwijder IS NULL
-                      AND prs_kenmerk_key = 1002)
-               client_geboortedatum,
-            (SELECT   kl.prs_kenmerklink_waarde
-               FROM   prs_kenmerklink kl
-              WHERE       kl.prs_link_key = client.prs_perslid_key
-                      AND kl.prs_kenmerklink_niveau = 'P'
-                      AND kl.prs_kenmerklink_verwijder IS NULL
-                      AND prs_kenmerk_key = 1003)
-               client_adres,
-            (SELECT   kl.prs_kenmerklink_waarde
-               FROM   prs_kenmerklink kl
-              WHERE       kl.prs_link_key = client.prs_perslid_key
-                      AND kl.prs_kenmerklink_niveau = 'P'
-                      AND kl.prs_kenmerklink_verwijder IS NULL
-                      AND prs_kenmerk_key = 1040)
-               client_huisnr,
-            (SELECT   kl.prs_kenmerklink_waarde
-               FROM   prs_kenmerklink kl
-              WHERE       kl.prs_link_key = client.prs_perslid_key
-                      AND kl.prs_kenmerklink_niveau = 'P'
-                      AND kl.prs_kenmerklink_verwijder IS NULL
-                      AND prs_kenmerk_key = 1004)
-               client_postcode,
-            (SELECT   kl.prs_kenmerklink_waarde
-               FROM   prs_kenmerklink kl
-              WHERE       kl.prs_link_key = client.prs_perslid_key
-                      AND kl.prs_kenmerklink_niveau = 'P'
-                      AND kl.prs_kenmerklink_verwijder IS NULL
-                      AND prs_kenmerk_key = 1005)
-               client_woonplaats,
-            (SELECT   kl.prs_kenmerklink_waarde
-               FROM   prs_kenmerklink kl
-              WHERE       kl.prs_link_key = client.prs_perslid_key
-                      AND kl.prs_kenmerklink_niveau = 'P'
-                      AND kl.prs_kenmerklink_verwijder IS NULL
-                      AND prs_kenmerk_key = 1006)
-               client_telefoon_thuis,
-            client.prs_perslid_telefoonnr client_telefoon_werk,
-            client.prs_perslid_mobiel prs_client_mobiel,
-            client.prs_perslid_email prs_client_email,
-            (SELECT   kl.prs_kenmerklink_waarde
-               FROM   prs_kenmerklink kl
-              WHERE       kl.prs_link_key = client.prs_perslid_key
-                      AND kl.prs_kenmerklink_niveau = 'P'
-                      AND kl.prs_kenmerklink_verwijder IS NULL
-                      AND prs_kenmerk_key = 1041)
-               client_bijzonderheden,
-            (SELECT   kl.prs_kenmerklink_waarde
-               FROM   prs_kenmerklink kl
-              WHERE       kl.prs_link_key = client.prs_perslid_key
-                      AND kl.prs_kenmerklink_niveau = 'P'
-                      AND kl.prs_kenmerklink_verwijder IS NULL
-                      AND prs_kenmerk_key = 2000)
-               client_contactpersonen,               
-            m.mld_melding_datum beschikking_datum_van,
-            TO_NUMBER (TO_CHAR (m.mld_melding_datum, 'IW')) beschikking_week_van,
-            TO_NUMBER (TO_CHAR (m.mld_melding_datum, 'IYYY')) beschikking_jaar_van,
-            (  TRUNC (mld_melding_datum)
-             - DECODE (TO_CHAR (mld_melding_datum, 'D'), '1', 8, TO_CHAR (mld_melding_datum, 'D'))
-             + 2)
-               beschikking_maandag_van_std,
-            care.goodmonday_start(m.mld_melding_key) beschikking_maandag_van,
-            m.mld_melding_einddatum beschikking_datum_tot,
-            TO_NUMBER (TO_CHAR (m.mld_melding_einddatum, 'IW')) beschikking_week_tot,
-            TO_NUMBER (TO_CHAR (m.mld_melding_einddatum, 'IYYY')) beschikking_jaar_tot,
-            (  TRUNC (mld_melding_einddatum)
-             + 7
-             - DECODE (TO_CHAR (mld_melding_einddatum, 'D'), '1', 8, TO_CHAR (mld_melding_einddatum, 'D'))
-             + 2)
-               beschikking_maandag_tot_std,
-            care.goodmonday_end(m.mld_melding_key) beschikking_maandag_tot,
-            fac.gettrackingdate ('MLDAFM', m.mld_melding_key),
-            m.prs_kostenplaats_key pgb,
-            (SELECT   TO_NUMBER (km.mld_kenmerkmelding_waarde)
-                     FROM   mld_kenmerkmelding km
-                    WHERE       km.mld_melding_key = m.mld_melding_key
-                            AND km.mld_kenmerkmelding_verwijder IS NULL
-                            AND mld_kenmerk_key = 2)
-            product_code,
-            (SELECT   ud.fac_usrdata_code
-               FROM   mld_kenmerkmelding km, fac_usrdata ud
-              WHERE       km.mld_melding_key = m.mld_melding_key
-                      AND km.mld_kenmerkmelding_verwijder IS NULL
-                      AND mld_kenmerk_key = 2
-                      AND ud.fac_usrdata_key = TO_NUMBER (km.mld_kenmerkmelding_waarde))
-               product,
-            COALESCE(
-               (SELECT   TO_NUMBER (km.mld_kenmerkmelding_waarde)
-                  FROM   mld_kenmerkmelding km
-                 WHERE       km.mld_melding_key = m.mld_melding_key
-                         AND km.mld_kenmerkmelding_verwijder IS NULL
-                         AND mld_kenmerk_key = 4), 0) tarief,
-            (SELECT   TO_NUMBER (km.mld_kenmerkmelding_waarde)
-               FROM   mld_kenmerkmelding km
-              WHERE       km.mld_melding_key = m.mld_melding_key
-                      AND km.mld_kenmerkmelding_verwijder IS NULL
-                      AND mld_kenmerk_key = 3)
-               uren_beschikking,
-            (SELECT   km.mld_kenmerkmelding_waarde
-               FROM   mld_kenmerkmelding km
-              WHERE       km.mld_melding_key = m.mld_melding_key
-                      AND km.mld_kenmerkmelding_verwijder IS NULL
-                      AND mld_kenmerk_key = 1)
-               beschikking_nr,
-            mld_melding_omschrijving,
-            std.mld_ins_discipline_key,
-            ins_discipline_omschrijving
-     FROM   care_v_gemeente gemeente, prs_perslid client, mld_melding m, mld_stdmelding std, ins_tab_discipline d
-    WHERE   m.mld_alg_locatie_key = gemeente.alg_locatie_key
-    AND m.mld_stdmelding_key = std.mld_stdmelding_key
-    AND m.mld_melding_status <> 1
-    AND d.ins_discipline_key = std.mld_ins_discipline_key
-    AND d.ins_srtdiscipline_key = 1
-    AND m.prs_perslid_key = client.prs_perslid_key;
-
+   SELECT m.mld_melding_key,
+          m.mld_melding_status,
+          gemeente.alg_locatie_key,
+          gemeente.alg_locatie_code,
+          gemeente.alg_locatie_omschrijving,
+          gemeente.alg_locatie_adres,
+          gemeente.alg_locatie_postcode,
+          gemeente.alg_locatie_plaats,
+          gemeente.alg_locatie_post_adres,
+          gemeente.alg_locatie_post_postcode,
+          gemeente.alg_locatie_post_plaats,
+          gemeente.alg_locatie_verantw,
+          (SELECT ok.alg_onrgoedkenmerk_waarde
+             FROM alg_onrgoedkenmerk ok
+            WHERE     ok.alg_onrgoed_key = gemeente.alg_locatie_key
+                  AND ok.alg_onrgoed_niveau = 'L'
+                  AND ok.alg_kenmerk_key = 1004
+                  AND ok.alg_onrgoedkenmerk_verwijder IS NULL),
+          (SELECT ok.alg_onrgoedkenmerk_waarde
+             FROM alg_onrgoedkenmerk ok
+            WHERE     ok.alg_onrgoed_key = gemeente.alg_locatie_key
+                  AND ok.alg_onrgoed_niveau = 'L'
+                  AND ok.alg_kenmerk_key = 1005
+                  AND ok.alg_onrgoedkenmerk_verwijder IS NULL),
+          gemeente.alg_locatie_x,
+          gemeente.alg_locatie_y,
+          gemeente.alg_locatie_veiling,
+          gemeente.gemeente_budget,
+          gemeente.gemeente_ob,
+          client.prs_perslid_key prs_client_key,
+          client.prs_perslid_naam prs_client_naam,
+          client.prs_perslid_tussenvoegsel prs_client_tussenvoegsel,
+          client.prs_perslid_voorletters prs_client_voorletters,
+          client.prs_perslid_voornaam prs_client_voornaam,
+          client.prs_perslid_nr prs_client_nr,
+          client.fac_profiel_key prs_client_cak_actie,
+          (SELECT kl.prs_kenmerklink_waarde
+             FROM prs_kenmerklink kl
+            WHERE     kl.prs_link_key = client.prs_perslid_key
+                  AND kl.prs_kenmerklink_niveau = 'P'
+                  AND kl.prs_kenmerklink_verwijder IS NULL
+                  AND prs_kenmerk_key = 1020)
+             client_bsn,
+          (SELECT kl.prs_kenmerklink_waarde
+             FROM prs_kenmerklink kl
+            WHERE     kl.prs_link_key = client.prs_perslid_key
+                  AND kl.prs_kenmerklink_niveau = 'P'
+                  AND kl.prs_kenmerklink_verwijder IS NULL
+                  AND prs_kenmerk_key = 1001)
+             client_meisjesnaam,
+          (SELECT DECODE (kl.prs_kenmerklink_waarde, 21, 'M', 22, 'V', NULL)
+             FROM prs_kenmerklink kl
+            WHERE     kl.prs_link_key = client.prs_perslid_key
+                  AND kl.prs_kenmerklink_niveau = 'P'
+                  AND kl.prs_kenmerklink_verwijder IS NULL
+                  AND prs_kenmerk_key = 1061)
+             client_mv,
+          (SELECT kl.prs_kenmerklink_waarde
+             FROM prs_kenmerklink kl
+            WHERE     kl.prs_link_key = client.prs_perslid_key
+                  AND kl.prs_kenmerklink_niveau = 'P'
+                  AND kl.prs_kenmerklink_verwijder IS NULL
+                  AND prs_kenmerk_key = 1002)
+             client_geboortedatum,
+          (SELECT kl.prs_kenmerklink_waarde
+             FROM prs_kenmerklink kl
+            WHERE     kl.prs_link_key = client.prs_perslid_key
+                  AND kl.prs_kenmerklink_niveau = 'P'
+                  AND kl.prs_kenmerklink_verwijder IS NULL
+                  AND prs_kenmerk_key = 1003)
+             client_adres,
+          (SELECT kl.prs_kenmerklink_waarde
+             FROM prs_kenmerklink kl
+            WHERE     kl.prs_link_key = client.prs_perslid_key
+                  AND kl.prs_kenmerklink_niveau = 'P'
+                  AND kl.prs_kenmerklink_verwijder IS NULL
+                  AND prs_kenmerk_key = 1040)
+             client_huisnr,
+          (SELECT kl.prs_kenmerklink_waarde
+             FROM prs_kenmerklink kl
+            WHERE     kl.prs_link_key = client.prs_perslid_key
+                  AND kl.prs_kenmerklink_niveau = 'P'
+                  AND kl.prs_kenmerklink_verwijder IS NULL
+                  AND prs_kenmerk_key = 1004)
+             client_postcode,
+          (SELECT kl.prs_kenmerklink_waarde
+             FROM prs_kenmerklink kl
+            WHERE     kl.prs_link_key = client.prs_perslid_key
+                  AND kl.prs_kenmerklink_niveau = 'P'
+                  AND kl.prs_kenmerklink_verwijder IS NULL
+                  AND prs_kenmerk_key = 1005)
+             client_woonplaats,
+          (SELECT kl.prs_kenmerklink_waarde
+             FROM prs_kenmerklink kl
+            WHERE     kl.prs_link_key = client.prs_perslid_key
+                  AND kl.prs_kenmerklink_niveau = 'P'
+                  AND kl.prs_kenmerklink_verwijder IS NULL
+                  AND prs_kenmerk_key = 1006)
+             client_telefoon_thuis,
+          client.prs_perslid_telefoonnr client_telefoon_werk,
+          client.prs_perslid_mobiel prs_client_mobiel,
+          client.prs_perslid_email prs_client_email,
+          (SELECT kl.prs_kenmerklink_waarde
+             FROM prs_kenmerklink kl
+            WHERE     kl.prs_link_key = client.prs_perslid_key
+                  AND kl.prs_kenmerklink_niveau = 'P'
+                  AND kl.prs_kenmerklink_verwijder IS NULL
+                  AND prs_kenmerk_key = 1041)
+             client_bijzonderheden,
+          (SELECT kl.prs_kenmerklink_waarde
+             FROM prs_kenmerklink kl
+            WHERE     kl.prs_link_key = client.prs_perslid_key
+                  AND kl.prs_kenmerklink_niveau = 'P'
+                  AND kl.prs_kenmerklink_verwijder IS NULL
+                  AND prs_kenmerk_key = 2000)
+             client_contactpersonen,
+          m.mld_melding_datum beschikking_datum_van,
+          TO_NUMBER (TO_CHAR (m.mld_melding_datum, 'IW'))
+             beschikking_week_van,
+          TO_NUMBER (TO_CHAR (m.mld_melding_datum, 'IYYY'))
+             beschikking_jaar_van,
+          (TRUNC (mld_melding_datum)
+           - DECODE (TO_CHAR (mld_melding_datum, 'D'),
+                     '1', 8,
+                     TO_CHAR (mld_melding_datum, 'D'))
+           + 2)
+             beschikking_maandag_van_std,
+          care.goodmonday_start (m.mld_melding_key) beschikking_maandag_van,
+          m.mld_melding_einddatum beschikking_datum_tot,
+          TO_NUMBER (TO_CHAR (m.mld_melding_einddatum, 'IW'))
+             beschikking_week_tot,
+          TO_NUMBER (TO_CHAR (m.mld_melding_einddatum, 'IYYY'))
+             beschikking_jaar_tot,
+          (TRUNC (mld_melding_einddatum) + 7
+           - DECODE (TO_CHAR (mld_melding_einddatum, 'D'),
+                     '1', 8,
+                     TO_CHAR (mld_melding_einddatum, 'D'))
+           + 2)
+             beschikking_maandag_tot_std,
+          care.goodmonday_end (m.mld_melding_key) beschikking_maandag_tot,
+          fac.gettrackingdate ('MLDAFM', m.mld_melding_key),
+          m.prs_kostenplaats_key pgb,
+          (SELECT FAC.SAFE_TO_NUMBER (km.mld_kenmerkmelding_waarde)
+             FROM mld_kenmerkmelding km
+            WHERE     km.mld_melding_key = m.mld_melding_key
+                  AND km.mld_kenmerkmelding_verwijder IS NULL
+                  AND mld_kenmerk_key = 2)
+             product_code,
+          (SELECT ud.fac_usrdata_code
+             FROM mld_kenmerkmelding km, fac_usrdata ud
+            WHERE     km.mld_melding_key = m.mld_melding_key
+                  AND km.mld_kenmerkmelding_verwijder IS NULL
+                  AND mld_kenmerk_key = 2
+                  AND ud.fac_usrdata_key =
+                        FAC.SAFE_TO_NUMBER (km.mld_kenmerkmelding_waarde))
+             product,
+          COALESCE (
+             (SELECT FAC.SAFE_TO_NUMBER (km.mld_kenmerkmelding_waarde)
+                FROM mld_kenmerkmelding km
+               WHERE     km.mld_melding_key = m.mld_melding_key
+                     AND km.mld_kenmerkmelding_verwijder IS NULL
+                     AND mld_kenmerk_key = 4),
+             0)
+             tarief,
+          (SELECT FAC.SAFE_TO_NUMBER (km.mld_kenmerkmelding_waarde)
+             FROM mld_kenmerkmelding km
+            WHERE     km.mld_melding_key = m.mld_melding_key
+                  AND km.mld_kenmerkmelding_verwijder IS NULL
+                  AND mld_kenmerk_key = 3)
+             uren_beschikking,
+          (SELECT km.mld_kenmerkmelding_waarde
+             FROM mld_kenmerkmelding km
+            WHERE     km.mld_melding_key = m.mld_melding_key
+                  AND km.mld_kenmerkmelding_verwijder IS NULL
+                  AND mld_kenmerk_key = 1)
+             beschikking_nr,
+          mld_melding_omschrijving,
+          std.mld_ins_discipline_key,
+          ins_discipline_omschrijving
+     FROM care_v_gemeente gemeente,
+          prs_perslid client,
+          mld_melding m,
+          mld_stdmelding std,
+          ins_tab_discipline d
+    WHERE     m.mld_alg_locatie_key = gemeente.alg_locatie_key
+          AND m.mld_stdmelding_key = std.mld_stdmelding_key
+          AND m.mld_melding_status <> 1
+          AND d.ins_discipline_key = std.mld_ins_discipline_key
+          AND d.ins_srtdiscipline_key = 1
+          AND m.prs_perslid_key = client.prs_perslid_key;
 
 -- Deze view is de totale view van alle productieve, bestede uren op beschikkingen, op welke opdracht, door wie op welk moment
 
@@ -4232,7 +4245,100 @@ AS
             beschikking_datum_tot,
             product,
             uren_beschikking;
-            
+
+-- view die ook de gekoppelde medewerker per opdracht laat zien			
+CREATE_VIEW( care_v_rap_tot_clientzorg_mdw, 0)            
+(
+   fclt_f_periode,
+   fclt_f_gemeente,
+   fclt_f_status,
+   bsn,
+   voorletters,
+   tussenvoegsel,
+   naam,
+   meisjes_naam,
+   naam2,
+   geboortedatum,
+   geslacht,
+   straat,
+   huisnummer,
+   postcode,
+   woonplaats,
+   telefoonnummer,
+   mobielnummer,
+   contactpersoon,
+   email,
+   opmerking,
+   bijzonderheden,
+   beschikkingsnummer,
+   fclt_f_start_indicatie,
+   eind_indicatie,
+   soort_hv,
+   indicatie_uren,
+   uren_besteed,
+   fclt_f_medewerker
+)
+AS
+     SELECT COALESCE (periode, 'nvt'),
+            gemeente_omschrijving,
+            DECODE (mld_melding_status, 5, 'Afgemeld', 6, 'Afgemeld', 'Open')
+               status,
+            MIN (client_bsn),
+            prs_client_voorletters,
+            prs_client_tussenvoegsel,
+            prs_client_naam,
+            MIN (client_meisjesnaam),
+               b.prs_client_naam
+            || ','
+            || b.prs_client_voorletters
+            || ' '
+            || b.prs_client_tussenvoegsel,
+            MIN (client_geboortedatum),
+            MIN (client_mv),
+            MIN (client_adres),
+            MIN (client_huisnr),
+            MIN (client_postcode),
+            MIN (client_woonplaats),
+            MIN (client_telefoon_thuis),
+            MIN (prs_client_mobiel),
+            MIN (client_contactpersonen),
+            MIN (prs_client_email),
+            MIN (beschikking_omschr),
+            MIN (client_bijzonderheden),
+            beschikking_nr,
+            beschikking_datum_van,
+            beschikking_datum_tot,
+            product,
+            uren_beschikking,
+            SUM (uur.uren_besteed) besteed,
+            p.prs_perslid_naam_full
+       FROM care_v_beschikking_all b,
+            (SELECT mld_melding_key,
+                    mld_opdr_key,
+                    jaar || '-' || LPAD (periodenr, 2, '0') periode,
+                    uren_besteed
+               FROM care_v_bestede_uren_all
+              WHERE uren_status = 3) uur,
+            mld_opdr o,
+            prs_v_perslid_fullnames_all p
+      WHERE     mld_melding_status != 1
+            AND pgb IS NULL
+            AND uur.mld_melding_key(+) = b.mld_melding_key
+            AND o.mld_opdr_key(+) = uur.mld_opdr_key
+            AND o.mld_uitvoerende_keys = p.prs_perslid_key
+   GROUP BY periode,
+            gemeente_omschrijving,
+            mld_melding_status,
+            prs_client_naam,
+            prs_client_voorletters,
+            prs_client_tussenvoegsel,
+            beschikking_nr,
+            beschikking_datum_van,
+            beschikking_datum_tot,
+            product,
+            uren_beschikking,
+            p.prs_perslid_naam_full;
+			
 -- mbmb
 -- Rapport Q) FACTUURrapport voor de gemaakte uren per datum - variant Q (Bernisse):
 CREATE_VIEW( care_v_rap2_factuur_uren_q, 0)

CNT/CNT_IND.SRC

@@ -21,9 +21,6 @@ create index cnt_i_cnt_contract_plaats2 on cnt_contract_plaats(cnt_contract_key)
 create index cnt_i_cnt_contract_object1 on cnt_contract_object(cnt_contract_key);
 CREATE INDEX cnt_i_cnt_contract_object2 ON cnt_contract_object(cnt_ins_deel_key);
 
-CREATE INDEX cnt_i_cnt_contract_onrg1 ON cnt_contract_onrgoed(cnt_contract_key);
-CREATE INDEX cnt_i_cnt_contract_onrg2 ON cnt_contract_onrgoed(alg_onrgoed_key);
-
 CREATE INDEX cnt_i_cnt_contract_note1 ON cnt_contract_note(cnt_contract_key);
 CREATE UNIQUE INDEX cnt_i_cnt_factuurschema1 ON cnt_factuurschema(cnt_contract_key, cnt_factuurschema_boekmaand);
 

CNT/CNT_INI.SRC

@@ -63,16 +63,7 @@ DEF_FAC_MESSAGE ('cnt_r_cnt_contract_stdmld'    ,'De aangegeven dienst bestaat n
 DEF_FAC_MESSAGE ('cnt_r_cnt_contract_bedrijf'   ,'Het aangegeven bedrijf bestaat niet.'                               ,'That company does not exist.');
 DEF_FAC_MESSAGE ('cnt_r_cnt_contractint'        ,'De aangegeven interne contactpersoon bestaat niet.'                 ,'That internal contact person does not exist');
 
-INSERT INTO cnt_mutatie_status VALUES (0, 'Vervallen');
-INSERT INTO cnt_mutatie_status VALUES (1, 'Open');
-INSERT INTO cnt_mutatie_status VALUES (2, 'Concept');
-INSERT INTO cnt_mutatie_status VALUES (3, 'Ontvangen/Ok');
-INSERT INTO cnt_mutatie_status VALUES (4, 'Ontvangen/NietOk');
-INSERT INTO cnt_mutatie_status VALUES (5, 'Voltooid');
-INSERT INTO cnt_mutatie_status VALUES (6, 'Geexporteerd');
-
 INSERT INTO cnt_typecontract VALUES (1, 'Onderhoud/Maintenance');
-INSERT INTO cnt_typecontract VALUES (2, 'Huur/Rental');
 INSERT INTO cnt_typecontract VALUES (3, 'Ondersteuning/Support');
 INSERT INTO cnt_typecontract VALUES (4, 'Algemeen/Generic');
 INSERT INTO cnt_typecontract VALUES (5, 'Leverancier/Supplier');

CNT/CNT_PAC.SRC

@@ -11,18 +11,15 @@ CREATE OR REPLACE PACKAGE cnt AS
   FUNCTION cnt_getOpzegdatum (pcnt_contract_key IN NUMBER) RETURN DATE;
   FUNCTION cnt_getRappeldatum (pcnt_contract_key IN NUMBER) RETURN DATE;
   FUNCTION cnt_contract_status (van IN DATE, rappel IN DATE, opzeg IN DATE, tot IN DATE) RETURN NUMBER;
-  FUNCTION cnt_contract_items (cntKey IN NUMBER) RETURN VARCHAR2;
 
-  PROCEDURE cnt_complete_mutatie(p_mutaite_key IN NUMBER);
   PROCEDURE splitscontract (p_key IN NUMBER, p_datum IN DATE, p_user IN NUMBER, p_amount NUMBER);
   PROCEDURE generatefactuurschema (pcontractkey IN NUMBER,ptermijnbedrag   IN NUMBER DEFAULT NULL);
 
   FUNCTION getnieuwsteversiekey(p_key IN NUMBER) RETURN NUMBER;
   FUNCTION sprintf (ps IN VARCHAR2 , p_contract_key IN NUMBER) RETURN VARCHAR2;
 
-  PRAGMA RESTRICT_REFERENCES (cnt_contract_items, WNDS, WNPS);
   PRAGMA RESTRICT_REFERENCES (cnt_contract_status, WNDS, WNPS);
-END Cnt;
+END cnt;
 /
 
 CREATE OR REPLACE PACKAGE BODY cnt AS
@@ -235,104 +232,6 @@ CREATE OR REPLACE PACKAGE BODY cnt AS
       RETURN 4;
    END;
 
-   FUNCTION cnt_contract_items (cntKey IN NUMBER)
-      RETURN VARCHAR2
-   AS
-      ret    VARCHAR2(512);
-      var_ckey   NUMBER;
-   CURSOR query(cntKey NUMBER) IS
-      SELECT 1 ckey, S.INS_SRTDEEL_CODE || ' ' ||S.INS_SRTDEEL_OMSCHRIJVING cntText
-        from CNT_CONTRACT_OBJECT O, INS_V_AANWEZIGSRTDEEL S
-       WHERE O.CNT_CONTRACT_KEY = cntKey
-         AND S.ins_srtdeel_key   = O.cnt_ins_srtdeel_key
-         AND O.cnt_ins_DEEL_key IS NULL
-   UNION
-      SELECT 2 ckey, D.INS_DEEL_OMSCHRIJVING cntText
-        from CNT_CONTRACT_OBJECT O, INS_V_AANWEZIGDEEL D
-       WHERE O.CNT_CONTRACT_KEY = cntKey
-         AND D.ins_DEEL_key   = O.cnt_ins_DEEL_key
-   UNION
-      SELECT 3 ckey, g.alg_locatie_omschrijving cntText
-        FROM alg_v_aanweziglocatie g, CNT_v_aanwezigCONTRACT_PLAATS P
-       WHERE p.CNT_CONTRACT_KEY = cntKey
-         AND p.cnt_alg_plaats_key = g.alg_locatie_key
-         AND p.CNT_ALG_PLAATS_CODE = 'L'
-   UNION
-      SELECT 4 ckey, l.alg_locatie_omschrijving || ' ' ||g.alg_gebouw_omschrijving cntText
-        FROM alg_v_aanweziggebouw g, CNT_v_aanwezigCONTRACT_PLAATS P, alg_locatie l
-       WHERE p.CNT_CONTRACT_KEY = cntKey
-         AND p.cnt_alg_plaats_key = g.alg_gebouw_key
-         AND p.CNT_ALG_PLAATS_CODE = 'G'
-         AND l.alg_locatie_key = g.alg_locatie_key
-   UNION
-      SELECT 5 ckey, l.alg_locatie_omschrijving || ' ' ||alg_terreinsector_naam cntText
-        FROM alg_v_aanwezigterreinsector T, CNT_v_aanwezigCONTRACT_PLAATS P, alg_locatie l
-       WHERE p.CNT_CONTRACT_KEY = cntKey
-         AND p.cnt_alg_plaats_key = T.alg_terreinsector_key
-         AND p.CNT_ALG_PLAATS_CODE = 'T'
-         AND l.alg_locatie_key = t.alg_locatie_key
-       ORDER BY 2;
-
-   BEGIN
-      ret   := null;
-      var_ckey  := -1;
-      FOR cntitem_rec IN query(cntKey) LOOP
-        IF var_ckey = -1 THEN
-           ret := cntitem_rec.cntText;
-        ELSE
-           IF LENGTH(ret)+LENGTH(cntitem_rec.cntText)<(512-5) THEN
-              ret := ret || CHR(10) || cntitem_rec.cntText;
-           ELSE
-              ret := ret || CHR(10) || '...';
-              RETURN ret;
-           END IF;
-        END IF;
-        var_ckey := cntitem_rec.ckey;
-      END LOOP;
-
-      RETURN ret;
-   END;
-
-
-   PROCEDURE cnt_complete_mutatie(p_mutaite_key IN NUMBER)
-   IS
-   -- The following actions should be executed when the state becomes 'Voltooid':
-   -- Find the matching records in the CNT_CONTRACT_ONRGOED table where one row without a mutation_key
-   -- filled in matches a row with a mutation_key filled in.
-   -- The match will be successful if both rows have the same ALG_ONRGOED_KEY,
-   -- the same ALG_ONRGOED_NIVEAU and the same CNT_CONTRACT_KEY.
-   -- From these matching records the one without CNT_MUTATION_KEY should be deleted
-   BEGIN
-      DELETE
-      cnt_contract_onrgoed
-      WHERE cnt_contract_onrgoed_key IN (
-      SELECT a.cnt_contract_onrgoed_key
-      FROM  cnt_contract_onrgoed b, cnt_contract_onrgoed a
-      WHERE a.cnt_contract_key = b.cnt_contract_key
-      AND   a.alg_onrgoed_key = b.alg_onrgoed_key
-      AND   a.alg_onrgoed_niveau = b.alg_onrgoed_niveau
-      AND   b.cnt_mutatie_key = p_mutaite_key
-      AND   a.cnt_mutatie_key  IS  NULL);
-
-      -- Delete the entries in the CNT_CONTRACT_ONRGOED table with the mutation_key equal
-      -- to the CNT_MUTATION that will be accepted and where the area size (CNT_CONTRACT_ONRGOED_OPP) = 0.
-      DELETE
-      cnt_contract_onrgoed
-      WHERE cnt_mutatie_key = p_mutaite_key
-      AND CNT_CONTRACT_ONRGOED_OPP = 0;
-
-      -- Set the Mutation_key to NULL from the rows where the CNT_MUTATION_KEY will be equal to the CNT_MUTATION that was accepted.
-      UPDATE
-      cnt_contract_onrgoed
-      SET cnt_mutatie_key = NULL
-      WHERE cnt_mutatie_key = p_mutaite_key;
-      -- The state of the mutation should be set to 'Voltooid'
-      UPDATE cnt_mutatie
-      SET CNT_MUTATIE_DATUM_VOLTOOID = SYSDATE,
-          CNT_MUTATIE_STATUS = 5
-      WHERE cnt_mutatie_key = p_mutaite_key;
-   END cnt_complete_mutatie;
-
    PROCEDURE splitscontract (p_key IN NUMBER, p_datum IN DATE, p_user IN NUMBER, p_amount NUMBER)
    IS
       begin1 DATE;
@@ -468,18 +367,6 @@ CREATE OR REPLACE PACKAGE BODY cnt AS
            FROM   cnt_contract_object cob
           WHERE   cob.cnt_contract_key = p_key AND cob.cnt_contract_object_verwijder IS NULL;
 
-      --cnt_contract_onrgoed
-      INSERT INTO cnt_contract_onrgoed (cnt_contract_key, alg_onrgoed_key, alg_onrgoed_niveau, alg_srtonrgoed_key, cnt_contract_onrgoed_opp, cnt_srtruimte_prijs
-                                       )
-         SELECT   newkey,
-                  cog.alg_onrgoed_key,
-                  cog.alg_onrgoed_niveau,
-                  cog.alg_srtonrgoed_key,
-                  cog.cnt_contract_onrgoed_opp,
-                  cog.cnt_srtruimte_prijs
-           FROM   cnt_contract_onrgoed cog
-          WHERE   cog.cnt_contract_key = p_key AND cog.cnt_mutatie_key IS NULL;
-
       --cnt_contract_plaats
       INSERT INTO cnt_contract_plaats (cnt_contract_key, cnt_alg_plaats_code, cnt_alg_plaats_key, cnt_contract_plaats_gewicht
                                       )

CNT/CNT_SEQ.SRC

@@ -16,9 +16,6 @@ CREATE SEQUENCE cnt_s_cnt_srtkenmerk_key MINVALUE 1;
 CREATE SEQUENCE cnt_s_cnt_kenmerk_key MINVALUE 1;
 CREATE SEQUENCE cnt_s_cnt_kenmerkcontract_key MINVALUE 1;
 
-CREATE SEQUENCE cnt_s_cnt_onrgoed_key           MINVALUE 1;
-CREATE SEQUENCE cnt_s_cnt_mutatie_key           MINVALUE 1;
-
 CREATE SEQUENCE cnt_s_cnt_contract_note_key     MINVALUE 1;
 CREATE SEQUENCE cnt_s_cnt_factuurschema_key     MINVALUE 1;
 

CNT/CNT_TAB.SRC

@@ -258,10 +258,9 @@ ALTER TABLE mld_opdr ADD
 );
 
 ALTER TABLE mld_opdr DROP CONSTRAINT mld_r_mld_melding_key1;
-
 ALTER TABLE mld_opdr ADD
 (
-    CONSTRAINT MLD_R_MLD_MELDING_KEY3 CHECK(mld_melding_key IS NOT NULL OR cnt_contract_key IS NOT NULL)
+    CONSTRAINT mld_r_mld_melding_key3 CHECK(mld_melding_key IS NOT NULL OR cnt_contract_key IS NOT NULL OR prs_kostensoort_key IS NOT NULL)
 );
 
 CREATE_TABLE(cnt_srtkenmerk, 0)
@@ -380,65 +379,6 @@ CREATE_TABLE(cnt_kenmerkcontract, 0)
 ,  CONSTRAINT cnt_r_kenmerk_contract       FOREIGN KEY (cnt_contract_key) REFERENCES cnt_contract(cnt_contract_key) ON DELETE CASCADE
 );
 
-
-CREATE_TABLE(cnt_mutatie, 0)
-( cnt_mutatie_key             NUMBER(10)
-    CONSTRAINT cnt_k_cnt_mutatie_key PRIMARY KEY,
-  cnt_mutatie_omschrijving    VARCHAR2(50),
-  cnt_mutatie_datum           DATE,
-  cnt_mutatie_datum_concept   DATE,
-  cnt_mutatie_datum_ontvangen DATE,
-  cnt_mutatie_datum_voltooid  DATE,
-  cnt_mutatie_datum_ingang    DATE,
-  prs_perslid_key             NUMBER(10)
-    CONSTRAINT cnt_r_prs_perslid_key REFERENCES prs_perslid(prs_perslid_key),
-  cnt_mutatie_status  NUMBER(1) -- Open = 1      Concept = 2   OntvangenOK = 3   OntvangenNOK = 4  Voltooid = 5
-);
-
-
-CREATE_TABLE(cnt_mutatie_status,0)
-(
-  cnt_mutatie_status
-      NUMBER(10)
-      CONSTRAINT cnt_k_cnt_mutatie_status_key PRIMARY KEY,
-  cnt_mutatie_status_omschrijv
-    VARCHAR2(30)
-);
-
-
-CREATE_TABLE(cnt_contract_onrgoed, 0)
-  ( cnt_contract_onrgoed_key
-      NUMBER(10)
-      CONSTRAINT cnt_k_cnt_contract_onrgoed_key PRIMARY KEY,
-    cnt_contract_key
-      NUMBER(10)
-      CONSTRAINT cnt_r_cnt_contract_key REFERENCES cnt_contract(cnt_contract_key),
-    alg_onrgoed_key
-      NUMBER(10),
-    alg_onrgoed_niveau
-      VARCHAR2(1)
-      CONSTRAINT cnt_c_cnt_onrgoed_niveau     CHECK(alg_onrgoed_niveau IN ('R', 'T')),
-    cnt_mutatie_key
-      NUMBER(10)
-      CONSTRAINT cnt_r_cnt_mutatie_key REFERENCES cnt_mutatie(cnt_mutatie_key) on delete cascade,
-    cnt_contract_onrgoed_opp
-      NUMBER(8,2),
-    alg_srtonrgoed_key
-      NUMBER(10),
-    cnt_mld_melding_key
-      NUMBER(10)
-      CONSTRAINT cnt_r_mld_melding_key REFERENCES mld_melding(mld_melding_key),
-    cnt_mutatie_status_key
-      NUMBER(10)
-        DEFAULT 1
-      CONSTRAINT cnt_r_cnt_mutatie_status REFERENCES cnt_mutatie_status(cnt_mutatie_status),
-    cnt_srtruimte_prijs
-        NUMBER(8,2),
-   cnt_contract_onrgoed_key_org
-      NUMBER(10)
-      CONSTRAINT cnt_r_cnt_contract_onrgoed_key  REFERENCES cnt_contract_onrgoed(cnt_contract_onrgoed_key)
-);
-
 CREATE_TABLE(cnt_contract_note, 0)
 (
    cnt_contract_note_key            NUMBER (10) PRIMARY KEY,

CNT/CNT_TRI.SRC

@@ -3,6 +3,16 @@
  *  $Id$
  */
 
+AUDIT_BEGIN(cnt_disc_params)
+AUDIT_VALUE(cnt_disc_params, cnt_srtcontract_type)
+AUDIT_VALUE(cnt_disc_params, cnt_disc_params_factuurschema)
+AUDIT_VALUE(cnt_disc_params, cnt_disc_params_factuurpct)
+AUDIT_VALUE(cnt_disc_params, cnt_disc_params_factuurmarge)
+AUDIT_VALUE(cnt_disc_params, cnt_disc_params_factuurappr)
+AUDIT_VALUE(cnt_disc_params, cnt_disc_params_factuurgrens)
+AUDIT_VALUE(cnt_disc_params, cnt_disc_params_opmerking)
+AUDIT_END()
+
 CREATE_TRIGGER(cnt_t_cnt_disc_params_b_iu)
 BEFORE INSERT OR UPDATE ON cnt_disc_params
 FOR EACH ROW
@@ -75,14 +85,6 @@ BEGIN
 
   SET_VERWIJDER_CHILDREN(cnt_contract_object,cnt_contract_key,cnt_contract_verwijder,cnt_contract_object_verwijder,cnt_contract);
   SET_VERWIJDER_CHILDREN(cnt_contract_plaats,cnt_contract_key,cnt_contract_verwijder,cnt_contract_plaats_verwijder,cnt_contract);
-  BEGIN IF :new.cnt_contract_verwijder IS NOT NULL
-        OR (   :new.cnt_contract_verwijder IS NULL
-           AND :old.cnt_contract_verwijder IS NOT NULL)
-        THEN
-          DELETE cnt_contract_onrgoed
-           WHERE cnt_contract_onrgoed.cnt_contract_key = :new.cnt_contract_key;
-        END IF;
-  END;
 END;
 /
 
@@ -329,26 +331,6 @@ BEGIN
 END;
 /
 
-CREATE_TRIGGER(cnt_t_cnt_contract_onrg_B_IU)
-BEFORE INSERT OR UPDATE ON cnt_contract_onrgoed
-FOR EACH ROW
-BEGIN
-  UPDATE_PRIMARY_KEY(cnt_contract_onrgoed_key,cnt_s_cnt_onrgoed_key);
-END;
-/
-
-CREATE_TRIGGER(cnt_t_cnt_mutatie_B_IU)
-BEFORE INSERT OR UPDATE ON cnt_mutatie
-FOR EACH ROW
-BEGIN
-  :new.cnt_mutatie_datum := SYSDATE;
-  UPDATE_PRIMARY_KEY(cnt_mutatie_key,cnt_s_cnt_mutatie_key);
-  IF :new.cnt_mutatie_key IS NOT NULL AND :old.cnt_mutatie_key IS NULL THEN
-     :new.cnt_mutatie_datum_ingang := SYSDATE;
-  END IF;
-END;
-/
-
 CREATE_TRIGGER(cnt_t_cnt_termijn_B_IU)
 BEFORE INSERT OR UPDATE ON cnt_termijn
 FOR EACH ROW

COMSQL.H

@@ -21,10 +21,10 @@
  * It is now defined by external macro _DBV
  */
 /* The minimum required software version */
-#define _VERSIONMAJ 2016
-#define _VERSIONMIN 2
+#define _VERSIONMAJ 2017
+#define _VERSIONMIN 1
 #define _VERSIONPATCH '0'
-#define _VERSION '2016.2.0'
+#define _VERSION '2017.1.0'
 #define _DBV_STRING _MKSTRING(_DBV)
 
 #define REGISTERONCE(svnid) \
@@ -701,4 +701,43 @@ END; ~\
 / ~ \
 COMMIT;
 
+#define AUDIT_BEGIN(table)                          ~\
+CREATE OR REPLACE TRIGGER aud_t_##table##           ~\
+AFTER UPDATE OR DELETE ON table                     ~\
+FOR EACH ROW                                        ~\
+ DECLARE                                            ~\
+   isdeleting NUMBER(1) := 0;                       ~\
+ BEGIN                                              ~\
+   IF DELETING THEN                                 ~\
+      isdeleting := 1;                              ~\
+   END IF;
+
+#define AUDIT_VALUE_K(table, tablekey, column)      ~\
+      aud.auditaction(STRINGIZE(table),             ~\
+                      :old.tablekey,                ~\
+                      :new.tablekey,                ~\
+                      STRINGIZE(column),            ~\
+                      :old.column,                  ~\
+                      :new.column,                  ~\
+                      isdeleting);
+
+#define AUDIT_VALUE(table, column)                  ~\
+      AUDIT_VALUE_K(table, table##_key, column)
+
+#define AUDIT_DELETE(table, column)                 ~\
+   IF DELETING THEN                                 ~\
+      aud.auditaction(STRINGIZE(table),             ~\
+                      :old.table##_key,             ~\
+                      :new.table##_key,             ~\
+                      STRINGIZE(column),            ~\
+                      :old.column,                  ~\
+                      :new.column,                  ~\
+                      1);                           ~\
+   END IF;
+
+#define AUDIT_END()                                 ~\
+END; ~\
+/ ~ \
+
+
 #endif  // _COMSQL_H

CTR/CTR_TRI.SRC

@@ -5,6 +5,12 @@
  */
 
 
+AUDIT_BEGIN(ctr_disc_params)
+AUDIT_VALUE(ctr_disc_params, ctr_ins_discipline_key)
+AUDIT_VALUE(ctr_disc_params, ctr_disc_params_controle_type)
+AUDIT_VALUE(ctr_disc_params, ctr_disc_params_ismjob)
+AUDIT_END()
+
 CREATE_TRIGGER(ctr_t_ctr_disc_params_b_iu)
 BEFORE INSERT OR UPDATE ON ctr_disc_params
 FOR EACH ROW

CTR/CTR_VIE.SRC

@@ -7,7 +7,7 @@
 
 CREATE_VIEW(ctr_discipline, 0)
 AS
- SELECT * FROM all_discipline WHERE ins_discipline_module = 'CTR';
+ SELECT * FROM ins_tab_discipline WHERE ins_discipline_module = 'CTR';
 
 DEFINIEER_VIEW_AANWEZIG(ctr_discipline, ins_discipline_verwijder,
     ctr_v_aanwezigdiscipline, 0);

FAC/FAC_IND.SRC

@@ -2,10 +2,17 @@
  *  $Id$
  */
 
+CREATE INDEX fac_i_audit_perslidkey1 ON fac_audit(prs_perslid_key);
+CREATE INDEX fac_i_audit_tabel1 ON fac_audit(fac_audit_tabelnaam, fac_audit_tabelkey);
+
+CREATE UNIQUE INDEX fac_i_fac_bookmark1 ON fac_bookmark(fac_bookmark_id);
+
 CREATE UNIQUE INDEX fac_i_fac_gebruikersgroep1 ON fac_gebruikersgroep(prs_perslid_key, fac_groep_key);
 
 CREATE INDEX fac_i_fac_selectie1  ON fac_selectie(fac_selectie_node,fac_selectie_tabel);
 
+create index fac_i_fac_result1 on fac_result(fac_result_sessionid);
+
 CREATE UNIQUE INDEX fac_i_fac_profielwaarde1 ON fac_profielwaarde (fac_profiel_key, ins_discipline_key);
 
 create index fac_i_fac_perfmon_sample1 on fac_perfmon_sample(fac_perfmon_sample_datum);
@@ -19,6 +26,9 @@ CREATE INDEX fac_i_notificatie2 ON fac_notificatie(fac_srtnotificatie_key);
 
 CREATE UNIQUE INDEX fac_i_fac_xml1 ON fac_xml(fac_session_id, fac_xml_volgnr);
 CREATE INDEX fac_i_fac_session1 ON fac_session(prs_perslid_key);
+CREATE UNIQUE INDEX fac_i_fac_session2 ON fac_session(fac_session_sessionid_hash);
+
+CREATE UNIQUE INDEX fac_i_fac_sequence1 ON fac_sequence(fac_sequence_name);
 
 CREATE UNIQUE INDEX fac_i_fac_import_app1
    ON fac_import_app (fac_import_app_code,
@@ -28,7 +38,8 @@ CREATE UNIQUE INDEX fac_i_fac_import_app1
 
 CREATE INDEX imp_i_log_importkey1 ON imp_log(fac_import_key);
 CREATE INDEX imp_i_imp_log2 ON imp_log(imp_log_applicatie);
-CREATE INDEX fac_i_import_appkey1 ON fac_import(fac_import_app_key);
+-- Maakt opruimen efficienter:
+CREATE INDEX fac_i_import_appkey1 ON fac_import(fac_import_app_key, fac_import_key);
 
 CREATE INDEX fac_i_tracking_refkey1 ON fac_tracking(fac_tracking_refkey);
 CREATE INDEX fac_i_tracking_perslidkey1 ON fac_tracking(prs_perslid_key);
@@ -49,4 +60,6 @@ CREATE UNIQUE INDEX fac_i_idp_code ON fac_idp(fac_idp_code);
 
 CREATE UNIQUE INDEX fac_i_imp_usrdata1 ON fac_imp_usrdata (fac_usrtab_naam, fac_usrdata_code);
 
+CREATE UNIQUE INDEX fac_i_fac_api1 ON fac_api (fac_api_name);
+
 REGISTERONCE('$Id$')

FAC/FAC_INI.SRC

@@ -1790,6 +1790,11 @@ DEF_FAC_FUNCTIE3('WEB_PRJMAN', 'PRJ', 11, 0,    1);
 DEF_FAC_FUNCTIE3('WEB_PRSBOF', 'PRS', 15, 0,    1);
 DEF_FAC_FUNCTIE3('WEB_FAQBOF', 'FAQ',  3, 0,    1);
 
+DEF_FAC_FUNCTIE3('WEB_BGTMAN', 'BGT',  3, 1,    1);
+DEF_FAC_FUNCTIE3('WEB_BGTUSE', 'BGT',  3, 1,    1);
+DEF_FAC_FUNCTIE3('WEB_BGTMGT', 'BGT',  3, 1,    1);
+DEF_FAC_FUNCTIE3('WEB_BGTORD', 'BGT',  3, 1,    1);
+
 /* Management Info functions */
 DEF_FAC_FUNCTIE3('WEB_RESBAC', 'RES', 13, 1,    1);
 DEF_FAC_FUNCTIE3('WEB_MLDBAC', 'MLD', 13, 1,    1);
@@ -1923,6 +1928,9 @@ DEF_FAC_FUNCTIE3('WEB_FINMSU', 'FIN', 3, 0, 2);
  *   10 als het niet zoveel uitmaakt
  *   60 als er een gerede kans is dat er vlot een notificatie volgt die deze zou kunnen inhalen (in putnotificationsrtprio)
  */
+
+DEF_FAC_SRTNOT('ADMLIC', 0, 'lcl_noti_ADMLIC', '', '0', null, 10);
+
 DEF_FAC_SRTNOT('BESACP', 1, 'lcl_noti_BESACP', 'bes/bes_bestelling.asp?bes_key=', '0', 'bestelling', 60);
 DEF_FAC_SRTNOT('BESAP1', 1, 'lcl_noti_BESAP1', 'bes/bes_bestelling.asp?bes_key=', '0', 'bestelling', 10);
 DEF_FAC_SRTNOT('BESAP2', 1, 'lcl_noti_BESAP2', 'bes/bes_bestelling.asp?bes_key=', '0', 'bestelling', 10);
@@ -1999,11 +2007,14 @@ DEF_FAC_SRTNOT('ORDMLE', 2, 'lcl_noti_ORDMLE', '',                           '0'
 DEF_FAC_SRTNOT('ORDAFM', 1, 'lcl_noti_ORDAFM', 'mld/mld_opdr.asp?opdr_key=', '0', 'opdracht', 10);
 DEF_FAC_SRTNOT('ORDNEW', 0, 'lcl_noti_ORDNEW', 'mld/mld_opdr.asp?opdr_key=', '0', 'opdracht', 10);
 DEF_FAC_SRTNOT('ORDUPD', 0, 'lcl_noti_ORDUPD', 'mld/mld_opdr.asp?opdr_key=', '0', 'opdracht', 60);
+DEF_FAC_SRTNOT('ORDDAT', 0, 'lcl_noti_ORDDAT', 'mld/mld_opdr.asp?opdr_key=', '0', 'opdracht', 60);
 DEF_FAC_SRTNOT('ORDFIA', 0, 'lcl_noti_ORDFIA', 'mld/mld_opdr.asp?opdr_key=', '0', 'opdracht', 10);
 DEF_FAC_SRTNOT('ORDFOK', 0, 'lcl_noti_ORDFOK', 'mld/mld_opdr.asp?opdr_key=', '0', 'opdracht', 10);
 DEF_FAC_SRTNOT('ORDFNO', 0, 'lcl_noti_ORDFNO', 'mld/mld_opdr.asp?opdr_key=', '0', 'opdracht', 10);
 DEF_FAC_SRTNOT('ORDREJ', 0, 'lcl_noti_ORDREJ', 'mld/mld_opdr.asp?opdr_key=', '0', 'opdracht', 10);
 DEF_FAC_SRTNOT('ORDACP', 0, 'lcl_noti_ORDACP', 'mld/mld_opdr.asp?opdr_key=', '0', 'opdracht', 10);
+DEF_FAC_SRTNOT('ORDHLT', 0, 'lcl_noti_ORDHLT', 'mld/mld_opdr.asp?opdr_key=', '0', 'opdracht', 10);
+DEF_FAC_SRTNOT('ORDRSM', 0, 'lcl_noti_ORDRSM', 'mld/mld_opdr.asp?opdr_key=', '0', 'opdracht', 10);
 DEF_FAC_SRTNOT('ORDVER', 0, 'lcl_noti_ORDVER', 'mld/mld_opdr.asp?opdr_key=', '0', 'opdracht', 10);
 DEF_FAC_SRTNOT('ORDSNT', 0, 'lcl_noti_ORDSNT', 'mld/mld_opdr.asp?opdr_key=', '0', 'opdracht', 10);
 DEF_FAC_SRTNOT('ORDSNX', 0, 'lcl_noti_ORDSNX', 'mld/mld_opdr.asp?opdr_key=', '0', 'opdracht', 10);
@@ -2039,6 +2050,7 @@ DEF_FAC_SRTNOT('RESMLT', 1, 'lcl_noti_RESMLT', 'res/res_reservering.asp?rsv_ruim
 DEF_FAC_SRTNOT('RESKTO', 3, 'lcl_noti_RESKTO', 'mld/mld_melding.asp?kto=1&res_key=',  '0', 'reservering',  10);
 DEF_FAC_SRTNOT('RESCLN', 0, 'lcl_noti_RESCLN', 'res/res_reservering.asp?rsv_ruimte_key=', '0', 'reservering',  10);
 DEF_FAC_SRTNOT('RESROK', 0, 'lcl_noti_RESROK', 'res/res_reservering.asp?rsv_ruimte_key=', '0', 'reservering',  10);
+DEF_FAC_SRTNOT('RES2BO', 0, 'lcl_noti_RES2BO', 'res/res_reservering.asp?rsv_ruimte_key=', '0', 'reservering',  10);  //GOUD#37603
 
 DEF_FAC_SRTNOT('INSNEW', 0, 'lcl_noti_INSNEW', 'ins/ins_deel.asp?ins_key=', '0', 'deel', 10);
 DEF_FAC_SRTNOT('INSUPD', 0, 'lcl_noti_INSUPD', 'ins/ins_deel.asp?ins_key=', '0', 'deel', 60);
@@ -2119,6 +2131,10 @@ INSERT INTO fac_notificatie_job (fac_notificatie_job_view, fac_notificatie_job_o
 INSERT INTO fac_notificatie_job (fac_notificatie_job_view, fac_notificatie_job_oms, fac_notificatie_job_interval, fac_notificatie_job_mode)
      VALUES ('fac_v_noti_finreminder', 'Fiatteringsverzoek voor facturen naar budgethouder', 24, 0);
 
+-- Eens per kwartaal gaat er een mail naar de helpdesk als het aantal licenties van een klant niet overeenkomt met het daadwerkelijk aantal gebruikers.
+INSERT INTO fac_notificatie_job (fac_notificatie_job_view, fac_notificatie_job_oms, fac_notificatie_job_mode, fac_notificatie_job_interval, fac_notificatie_job_nextrun, fac_notificatie_job_flags)
+     VALUES ('fac_v_noti_licentie', 'Notificatie bij afwijkende licenties.', 2, 2160, (select add_months (trunc(SYSDATE, 'Q') + 0, 4) + 3/4  from dual), 1);
+
 // Settings hebben fac_functies nodig dus na fac_ini.src
 #include "fac_set.src"
 
@@ -2643,7 +2659,6 @@ INSERT INTO fac_usrrap (fac_usrrap_omschrijving, fac_usrrap_view_name,fac_usrrap
  SELECT 'UDR: Objecten','INS_V_UDR_DEEL','Basisrapport voor objectrapportages', fac_functie_key, 32
    FROM fac_functie WHERE fac_functie_code='WEB_UDRMAN'
     AND NOT EXISTS (SELECT '' FROM fac_usrrap WHERE UPPER(fac_usrrap_view_name)='INS_V_UDR_DEEL');
-
 INSERT INTO fac_usrrap (fac_usrrap_omschrijving, fac_usrrap_view_name,fac_usrrap_info, fac_functie_key, fac_usrrap_functie)
  SELECT 'UDR: Meldingen','MLD_V_UDR_MELDING','Basisrapport voor meldingsrapportages', fac_functie_key, 32
    FROM fac_functie WHERE fac_functie_code='WEB_UDRMAN'
@@ -2684,7 +2699,6 @@ INSERT INTO fac_usrrap (fac_usrrap_omschrijving, fac_usrrap_view_name,fac_usrrap
    SELECT 'UDR: Kostenoverzicht', 'FIN_V_UDR_KOSTENOVERZICHT', 'Basisrapport voor kostenrapportages', fac_functie_key, 32
      FROM fac_functie WHERE fac_functie_code = 'WEB_UDRMAN'
       AND NOT EXISTS (SELECT '' FROM fac_usrrap WHERE UPPER (fac_usrrap_view_name)='FIN_V_UDR_KOSTENOVERZICHT');
-
 INSERT INTO fac_usrrap (fac_usrrap_omschrijving, fac_usrrap_view_name,fac_usrrap_info, fac_functie_key, fac_usrrap_functie)
  SELECT 'UDR: Objectmeldingen','INS_V_UDR_DEELMELDING','Basisrapport voor objecten met hun meldinggegevens', fac_functie_key, 32
    FROM fac_functie WHERE fac_functie_code='WEB_UDRMAN'
@@ -2693,6 +2707,19 @@ INSERT INTO fac_usrrap (fac_usrrap_omschrijving, fac_usrrap_view_name,fac_usrrap
  SELECT 'UDR: Objecten plus','INS_V_UDR_DEELKENMERK_CND','Basisrapport voor object+kenmerk rapportages', fac_functie_key, 32
    FROM fac_functie WHERE fac_functie_code='WEB_UDRMAN'
     AND NOT EXISTS (SELECT '' FROM fac_usrrap WHERE UPPER(fac_usrrap_view_name)='INS_V_UDR_DEELKENMERK_CND');
+INSERT INTO fac_usrrap (fac_usrrap_omschrijving, fac_usrrap_view_name,fac_usrrap_info, fac_functie_key, fac_usrrap_functie)
+ SELECT 'UDR: Object inspecties','INS_V_UDR_DEELINSPECT','Basisrapport voor object inspectie rapportages', fac_functie_key, 32
+   FROM fac_functie WHERE fac_functie_code='WEB_UDRMAN'
+    AND NOT EXISTS (SELECT '' FROM fac_usrrap WHERE UPPER(fac_usrrap_view_name)='INS_V_UDR_DEELINSPECT');
+INSERT INTO fac_usrrap (fac_usrrap_omschrijving, fac_usrrap_view_name,fac_usrrap_info, fac_functie_key, fac_usrrap_functie)
+ SELECT 'UDR: Object soort controles','INS_V_UDR_DEELSRTCONTROLE','Basisrapport voor object soort controle rapportages', fac_functie_key, 32
+   FROM fac_functie WHERE fac_functie_code='WEB_UDRMAN'
+    AND NOT EXISTS (SELECT '' FROM fac_usrrap WHERE UPPER(fac_usrrap_view_name)='INS_V_UDR_DEELSRTCONTROLE');
+
+INSERT INTO fac_usrrap (fac_usrrap_omschrijving, fac_usrrap_view_name,fac_usrrap_info, fac_functie_key, fac_usrrap_functie)
+ SELECT 'UDR: Bezoekers bij reserveringen','BEZ_V_UDR_RESERVERINGBEZOEKER','Basisrapport voor bezoekers met reserveringsgegevens', fac_functie_key, 32
+   FROM fac_functie WHERE fac_functie_code='WEB_UDRMAN'
+    AND NOT EXISTS (SELECT '' FROM fac_usrrap WHERE UPPER(fac_usrrap_view_name)='BEZ_V_UDR_RESERVERINGBEZOEKER');
 
 /*  STANDAARD MENUOPTIES */
 // De regel: vereis R-recht voor overzicht en W-recht voor mutatie
@@ -2803,6 +2830,11 @@ DEF_MENUITEM(1, 'lcl_menu_fac_qlikview_mld'     , '', 'FAC', 'appl/qvw/qlikview.
 DEF_MENUITEM(1, 'lcl_menu_fac_qlikview_bes'     , '', 'FAC', 'appl/qvw/qlikview.asp?module=BES', 0, 0, 'WEB_MGTRAP', 'R', '1', '');
 DEF_MENUITEM(1, 'lcl_menu_fac_qlikview_res'     , '', 'FAC', 'appl/qvw/qlikview.asp?module=RES', 0, 0, 'WEB_MGTRAP', 'R', '1', '');
 
+DEF_MENUKOP(1, 'lcl_bgt');
+DEF_MENUITEM(1, 'lcl_menu_bgt_disciplines_1'   , '', 'BGT', 'appl/bgt/bgt_search.asp?mode=wrap&id={1}', 0, 1, 'WEB_BGTMAN', 'R', '1', '');
+//DEF_MENUITEM(1, 'lcl_menu_bgt_budget'           , '', 'BGT', 'appl/bgt/bgt_budget.asp', 0, 0, 'WEB_BGTMAN', 'R', '1', '');  // TODO ws weg
+DEF_MENUITEM(1, 'lcl_menu_bgt_disciplines'     , '', 'BGT', 'appl/bgt/bgt_discipline.asp', 0, 0, 'WEB_BGTMGT', 'W', '1', '');
+
 DEF_MENUKOP(1, 'lcl_fin');
 DEF_MENUITEM(1, 'lcl_menu_fin_kpn_overview'     , '', 'FIN', 'appl/prs/kpn_overview.asp', 0, 0, 'WEB_PRSUSE', 'R', '1', '');
 DEF_MENUITEM(1, 'lcl_menu_fin_fo'               , '', 'FIN', 'appl/fin/fin_factuur.asp?urole=fo', 0, 0, 'WEB_FINFOF', 'W', '1', '');
@@ -2877,12 +2909,12 @@ DEF_MENUITEM(2, 'lcl_menu_alg_gebouwfuncties'   , '', 'ALG', 'appl/mgt/alg_srtge
 DEF_MENUITEM(2, 'lcl_menu_alg_ruimtefuncties'   , '', 'ALG', 'appl/alg/alg_srtruimte_search.asp', 0, 0, 'WEB_ALGMSU', 'W', '1', '');
 DEF_MENUITEM(2, 'lcl_menu_alg_ruimtetarieven'   , '', 'ALG', 'appl/alg/alg_ruimtefunctie_search.asp', 0, 0, 'WEB_ALGMSU', 'R', '1', '');
 DEF_MENUITEM(2, 'lcl_menu_alg_terreinsoorten'   , '', 'ALG', 'appl/mgt/alg_srtterreinsector.asp', 0, 0, 'WEB_ALGMSU', 'W', '1', '');
-DEF_MENUITEM(2, 'lcl_menu_alg_districtkenmerken', '', 'ALG', 'appl/mgt/alg_kenmerk.asp?ALG_KENMERK_NIVEAU=D', 0, 0, 'WEB_PRSSYS', 'W', '1', '');
-DEF_MENUITEM(2, 'lcl_menu_alg_locatiekenmerken' , '', 'ALG', 'appl/mgt/alg_kenmerk.asp?ALG_KENMERK_NIVEAU=L', 0, 0, 'WEB_PRSSYS', 'W', '1', '');
-DEF_MENUITEM(2, 'lcl_menu_alg_terreinkenmerken' , '', 'ALG', 'appl/mgt/alg_kenmerk.asp?ALG_KENMERK_NIVEAU=T', 0, 0, 'WEB_PRSSYS', 'W', '1', '');
-DEF_MENUITEM(2, 'lcl_menu_alg_gebouwkenmerken'  , '', 'ALG', 'appl/mgt/alg_kenmerk.asp?ALG_KENMERK_NIVEAU=G', 0, 0, 'WEB_PRSSYS', 'W', '1', '');
-DEF_MENUITEM(2, 'lcl_menu_alg_verdiepkenmerken' , '', 'ALG', 'appl/mgt/alg_kenmerk.asp?ALG_KENMERK_NIVEAU=V', 0, 0, 'WEB_PRSSYS', 'W', '1', '');
-DEF_MENUITEM(2, 'lcl_menu_alg_ruimtekenmerken'  , '', 'ALG', 'appl/mgt/alg_kenmerk.asp?ALG_KENMERK_NIVEAU=R', 0, 0, 'WEB_PRSSYS', 'W', '1', '');
+DEF_MENUITEM(2, 'lcl_menu_alg_districtkenmerken', '', 'ALG', 'appl/mgt/alg_kenmerk.asp?level=D', 0, 0, 'WEB_PRSSYS', 'W', '1', '');
+DEF_MENUITEM(2, 'lcl_menu_alg_locatiekenmerken' , '', 'ALG', 'appl/mgt/alg_kenmerk.asp?level=L', 0, 0, 'WEB_PRSSYS', 'W', '1', '');
+DEF_MENUITEM(2, 'lcl_menu_alg_terreinkenmerken' , '', 'ALG', 'appl/mgt/alg_kenmerk.asp?level=T', 0, 0, 'WEB_PRSSYS', 'W', '1', '');
+DEF_MENUITEM(2, 'lcl_menu_alg_gebouwkenmerken'  , '', 'ALG', 'appl/mgt/alg_kenmerk.asp?level=G', 0, 0, 'WEB_PRSSYS', 'W', '1', '');
+DEF_MENUITEM(2, 'lcl_menu_alg_verdiepkenmerken' , '', 'ALG', 'appl/mgt/alg_kenmerk.asp?level=V', 0, 0, 'WEB_PRSSYS', 'W', '1', '');
+DEF_MENUITEM(2, 'lcl_menu_alg_ruimtekenmerken'  , '', 'ALG', 'appl/mgt/alg_kenmerk.asp?level=R', 0, 0, 'WEB_PRSSYS', 'W', '1', '');
 DEF_MENUITEM(2, 'lcl_menu_alg_kenmerkdomeinen'  , '', 'ALG', 'appl/fac/fac_kenmerkdomein_search.asp?fkdmodule=ALG', 0, 0, 'WEB_PRSSYS', 'W', '1', '');
 DEF_MENUITEM(2, 'lcl_menu_alg_setting'          , '', 'ALG', 'appl/fac/fac_setting_search.asp?module=ALG', 0, 0, 'WEB_PRSSYS', 'W', '0', '');
 
@@ -2891,10 +2923,10 @@ DEF_MENUITEM(2, 'lcl_menu_prs_functies'         , '', 'PRS', 'appl/mgt/prs_srtpe
 DEF_MENUITEM(2, 'lcl_menu_prs_diensten'         , '', 'PRS', 'appl/mgt/prs_dienst.asp', 0, 0, 'WEB_PRSMSU', 'W', '1', '');
 DEF_MENUITEM(2, 'lcl_menu_prs_staffels'         , '', 'PRS', 'appl/mgt/prs_staffel.asp', 0, 0, 'WEB_PRSMGT', 'W', '1', '');
 DEF_MENUITEM(2, 'lcl_menu_prs_relatietypes'     , '', 'PRS', 'appl/mgt/prs_relatietype.asp', 0, 0, 'WEB_PRSMGT', 'W', '1', '');
-DEF_MENUITEM(2, 'lcl_menu_prs_bedrijfkenmerken' , '', 'PRS', 'appl/mgt/prs_kenmerk.asp?PRS_KENMERK_NIVEAU=B', 0, 0, 'WEB_PRSSYS', 'W', '1', '');
-DEF_MENUITEM(2, 'lcl_menu_prs_afdelingskenmerke', '', 'PRS', 'appl/mgt/prs_kenmerk.asp?PRS_KENMERK_NIVEAU=A', 0, 0, 'WEB_PRSSYS', 'W', '1', '');
-DEF_MENUITEM(2, 'lcl_menu_prs_persoonskenmerken', '', 'PRS', 'appl/mgt/prs_kenmerk.asp?PRS_KENMERK_NIVEAU=P', 0, 0, 'WEB_PRSSYS', 'W', '1', '');
-DEF_MENUITEM(2, 'lcl_menu_prs_contactkenmerken' , '', 'PRS', 'appl/mgt/prs_kenmerk.asp?PRS_KENMERK_NIVEAU=C', 0, 0, 'WEB_PRSSYS', 'W', '1', '');
+DEF_MENUITEM(2, 'lcl_menu_prs_bedrijfkenmerken' , '', 'PRS', 'appl/mgt/prs_kenmerk.asp?level=B', 0, 0, 'WEB_PRSSYS', 'W', '1', '');
+DEF_MENUITEM(2, 'lcl_menu_prs_afdelingskenmerke', '', 'PRS', 'appl/mgt/prs_kenmerk.asp?level=A', 0, 0, 'WEB_PRSSYS', 'W', '1', '');
+DEF_MENUITEM(2, 'lcl_menu_prs_persoonskenmerken', '', 'PRS', 'appl/mgt/prs_kenmerk.asp?level=P', 0, 0, 'WEB_PRSSYS', 'W', '1', '');
+DEF_MENUITEM(2, 'lcl_menu_prs_contactkenmerken' , '', 'PRS', 'appl/mgt/prs_kenmerk.asp?level=C', 0, 0, 'WEB_PRSSYS', 'W', '1', '');
 DEF_MENUITEM(2, 'lcl_menu_prs_kenmerkdomeinen'  , '', 'PRS', 'appl/fac/fac_kenmerkdomein_search.asp?fkdmodule=PRS', 0, 0, 'WEB_PRSSYS', 'W', '1', '');
 DEF_MENUITEM(2, 'lcl_menu_prs_setting'          , '', 'PRS', 'appl/fac/fac_setting_search.asp?module=PRS', 0, 0, 'WEB_PRSSYS', 'W', '0', '');
 
@@ -2913,7 +2945,7 @@ DEF_MENUITEM(2, 'lcl_menu_ins_setting'          , '', 'INS', 'appl/fac/fac_setti
 DEF_MENUKOP(2, 'lcl_facmgt_mld');
 DEF_MENUITEM(2, 'lcl_menu_mld_vakgroeptypes'    , '', 'MLD', 'appl/mgt/mld_srtdiscipline.asp', 0, 0, 'WEB_PRSSYS', 'W', '1', '');
 DEF_MENUITEM(2, 'lcl_menu_mld_vakgroepen'       , '', 'MLD', 'appl/mgt/mld_discipline.asp', 0, 0, 'WEB_MLDMGT', 'W', '1', '');
-DEF_MENUITEM(2, 'lcl_menu_mld_stdmeldinggroep'  , '', 'MLD', 'appl/mgt/mld_stdmelding_groep.asp', 0, 0, 'WEB_MLDMGT', 'W', '1', '');
+DEF_MENUITEM(2, 'lcl_menu_mld_stdmeldinggroep'  , '', 'MLD', 'appl/mgt/mld_stdmeldinggroep.asp', 0, 0, 'WEB_MLDMGT', 'W', '1', '');
 DEF_MENUITEM(2, 'lcl_menu_mld_behandelgroep'    , '', 'MLD', 'appl/mgt/mld_behandelgroep.asp', 0, 0, 'WEB_MLDMGT', 'W', '1', '');
 DEF_MENUITEM(2, 'lcl_menu_mld_meldingen'        , '', 'MLD', 'appl/mld/mld_stdmelding_search.asp', 0, 0, 'WEB_MLDMGT', 'W', '1', '');
 DEF_MENUITEM(2, 'lcl_menu_mld_dienst_niveaus'   , '', 'MLD', 'appl/mgt/mld_dienstniveau.asp', 0, 0, 'WEB_MLDMGT', 'W', '1', '');
@@ -3006,8 +3038,8 @@ DEF_MENUITEM(2, 'lcl_menu_faq_setting'          , '', 'FAQ', 'appl/fac/fac_setti
 
 DEF_MENUKOP(2, 'lcl_facmgt_overig');
 DEF_MENUITEM(2, 'lcl_menu_fac_rapportages'      , '', 'FAC', 'appl/fac/fac_reportx.asp', 0, 0, 'WEB_UDRMAN', 'W', '1', '');
-DEF_MENUITEM(2, 'lcl_menu_fac_graphs'           , '', 'FAC', 'appl/mgt/fac_usergraph.asp', 0, 0, 'WEB_PRSSYS', 'W', '1', '');
-DEF_MENUITEM(2, 'lcl_menu_fac_notificatiejobs'  , '', 'FAC', 'appl/mgt/fac_notificatiejob.asp', 0, 0, 'WEB_PRSSYS', 'W', '1', '');
+DEF_MENUITEM(2, 'lcl_menu_fac_graphs'           , '', 'FAC', 'appl/mgt/fac_usrgraph.asp', 0, 0, 'WEB_PRSSYS', 'W', '1', '');
+DEF_MENUITEM(2, 'lcl_menu_fac_notificatiejobs'  , '', 'FAC', 'appl/mgt/fac_notificatie_job.asp', 0, 0, 'WEB_PRSSYS', 'W', '1', '');
 DEF_MENUITEM(2, 'lcl_menu_fac_importfuncties'   , '', 'FAC', 'appl/imp/imp_search.asp', 0, 0, 'WEB_IMPORT', 'W', '1', '');
 DEF_MENUITEM(2, 'lcl_menu_fac_jobs'             , '', 'FAC', 'appl/fac/job_search.asp', 0, 0, 'WEB_PRSSYS', 'W', '1', '');
 DEF_MENUITEM(2, 'lcl_menu_fac_vrije_dagen'      , '', 'FAC', 'appl/mgt/mld_vrije_dagen.asp', 0, 0, 'WEB_PRSSYS', 'W', '1', '');
@@ -3039,8 +3071,11 @@ DEF_MENUENTRY(2, 99070, 'lcl_menu_cad_verify'          , '', 'FAC', 'appl/cad/ca
 DEF_MENUENTRY(2, 99080, 'lcl_menu_fac_verify_data'     , '', 'FAC', 'appl/fac/fac_verify_data.asp', 0, 0, 'WEB_FACTAB');
 DEF_MENUENTRY(2, 99090, 'lcl_menu_fac_email_setting'   , '', 'FAC', 'appl/mgt/fac_email_setting.asp', 0, 0, 'WEB_FACTAB');
 DEF_MENUENTRY(2, 99100, 'lcl_menu_fac_custnotificaties'  , '', 'FAC', 'appl/mgt/fac_srtnotificatie.asp?cust=1', 0, 0, 'WEB_FACTAB');
-DEF_MENUENTRY(2, 99110, 'lcl_menu_fac_idp'             , '', 'FAC', 'appl/mgt/fac_idp.asp', 0, 0, 'WEB_FACFAC');
+DEF_MENUENTRY(2, 99110, 'lcl_menu_aut_idp'             , '', 'FAC', 'appl/mgt/aut_idp.asp', 0, 0, 'WEB_FACTAB');
+DEF_MENUENTRY(2, 99110, 'lcl_menu_aut_client'          , '', 'FAC', 'appl/mgt/aut_client.asp', 0, 0, 'WEB_FACTAB');
 DEF_MENUENTRY(2, 99120, 'lcl_menu_fac_anytable'        , '', 'FAC', 'appl/mgt/user_tables.asp', 0, 0, 'WEB_FACFAC');
+DEF_MENUENTRY(2, 99130, 'lcl_menu_fac_anysql'          , '', 'FAC', 'appl/mgt/mgt_genericsql.asp', 0, 0, 'WEB_FACFAC');
+DEF_MENUENTRY(2, 99140, 'lcl_menu_prs_bedrijf_bedrijf' , '', 'FAC', 'appl/mgt/prs_bedrijf_bedrijf.asp', 0, 0, 'WEB_PRSSYS');
 
 
 

FAC/FAC_PAC.SRC

@@ -29,6 +29,7 @@
  */
 
 #include "comsql.h"
+#include "fac_paca.src"
 #include "fac_pacx.src"
 #include "fac_pacf.src"
 #include "fac_pacl.src"
@@ -122,6 +123,7 @@ CREATE OR REPLACE PACKAGE fac
     FUNCTION gettrackingdate (peventcode IN VARCHAR2, pkey IN number) RETURN date;
     FUNCTION gettrackinguserkey (peventcode IN VARCHAR2, pkey IN number) RETURN number;
     PROCEDURE initsession (flcode IN VARCHAR2);
+    PROCEDURE initsession (pkey NUMBER, flcode IN VARCHAR2, usertimezone IN VARCHAR2);
     PROCEDURE registerversion (pmaj IN NUMBER, pmin IN NUMBER, ppatch IN VARCHAR2, pschema IN VARCHAR2, plang IN VARCHAR2);
     PROCEDURE registercustversion (pcustid IN VARCHAR2, pcustnr IN NUMBER);
     FUNCTION getdbversion RETURN VARCHAR2;
@@ -135,7 +137,6 @@ CREATE OR REPLACE PACKAGE fac
     FUNCTION testhash (p_hash VARCHAR2, p_in VARCHAR2) RETURN NUMBER;
     PROCEDURE createlikebookmark (pxmlnode VARCHAR2, prefkey NUMBER);
     PROCEDURE sequence_nextval(p_seqname IN VARCHAR2, p_initval IN NUMBER DEFAULT 1, p_initexpire IN DATE DEFAULT NULL);
-
 END fac;
 /
 
@@ -277,7 +278,7 @@ CREATE OR REPLACE PACKAGE BODY fac AS
     -- where the value might be an invalid number like '206E9547' ('Numeric overflow')
     FUNCTION safe_To_Integer( str IN VARCHAR2 ) RETURN NUMBER IS
     BEGIN
-     RETURN TO_NUMBER(REGEXP_SUBSTR(str, '^\d+') ); // alleen leading cijfers
+     RETURN TO_NUMBER(REGEXP_SUBSTR(str, '^\d+') ); -- alleen leading cijfers
     EXCEPTION
      WHEN OTHERS THEN RETURN NULL;
     END;
@@ -464,12 +465,12 @@ CREATE OR REPLACE PACKAGE BODY fac AS
     BEGIN
       IF BeginWerkUur IS NULL OR EindWerkUur IS NULL
       THEN
-          BeginWerkUur := fac.safe_to_number (fac.getsetting ('fac_t_startofworkday')); // half 8 is 7.5 en niet 7.30
+          BeginWerkUur := fac.safe_to_number (fac.getsetting ('fac_t_startofworkday')); -- half 8 is 7.5 en niet 7.30
           EindWerkUur  := fac.safe_to_number (fac.getsetting ('fac_t_endofworkday'));
           DBMS_OUTPUT.put_line ('Recaching Werkuren ' || BeginWerkUur||'..'||EindWerkUur);
       END IF;
       RETURN datumtijdplusuitvoertijd (begindatum, uitvoertijd, uitvoertijdtype,
-                      BeginWerkUur, EindWerkUur, 1); // 1=alleen werkdagen excl. vrije dagen
+                      BeginWerkUur, EindWerkUur, 1); -- 1=alleen werkdagen excl. vrije dagen
     END;
 
    -- Bereken de einddatum gegeven de begindatum en uitvoertijd. De mode bepaalt
@@ -659,12 +660,12 @@ CREATE OR REPLACE PACKAGE BODY fac AS
     BEGIN
       IF BeginWerkUur IS NULL OR EindWerkUur IS NULL
       THEN
-          BeginWerkUur := fac.safe_to_number (fac.getsetting ('fac_t_startofworkday')); // half 8 is 7.5 en niet 7.30
+          BeginWerkUur := fac.safe_to_number (fac.getsetting ('fac_t_startofworkday')); -- half 8 is 7.5 en niet 7.30
           EindWerkUur  := fac.safe_to_number (fac.getsetting ('fac_t_endofworkday'));
           DBMS_OUTPUT.put_line ('Recaching Werkuren ' || BeginWerkUur||'..'||EindWerkUur);
       END IF;
       RETURN datumtijdnaaruitvoertijd (begindatum, einddatum, uitvoertijdtype,
-                      BeginWerkUur, EindWerkUur, 1); // 1=alleen werkdagen excl. vrije dagen
+                      BeginWerkUur, EindWerkUur, 1); -- 1=alleen werkdagen excl. vrije dagen
     END datumtijdnaaruitvoertijd;
 
     FUNCTION datumtijdnaaruitvoertijd (begindatum        IN DATE,
@@ -1111,12 +1112,12 @@ CREATE OR REPLACE PACKAGE BODY fac AS
 
       DELETE FROM cnt_contract_plaats;
 
-      DELETE FROM cnt_contract_onrgoed;
-
       DELETE FROM mld_kenmerkmelding;
 
       DELETE FROM mld_melding_object;
 
+      DELETE FROM mld_opdr_materiaal;
+
       DELETE FROM mld_opdr;
 
       DELETE FROM mld_melding;
@@ -1125,6 +1126,8 @@ CREATE OR REPLACE PACKAGE BODY fac AS
 
       DELETE FROM prs_perslidwerkplek;
 
+      DELETE FROM prs_werkplek;
+
       IF (p_mode < 2)
       THEN
          DELETE FROM prs_contactpersoon_locatie;
@@ -1768,10 +1771,12 @@ CREATE OR REPLACE PACKAGE BODY fac AS
       lphone       fac_notificatie.fac_notificatie_receiver_phone%TYPE;
       llang        prs_perslid.prs_perslid_lang%TYPE;
       lsysteem     prs_perslid.prs_perslid_systeemadres%TYPE;
+      immediate    NUMBER(1);
    BEGIN
       IF pcode IS NOT NULL
       THEN
          BEGIN
+            immediate := 0;
             IF poptstatus IS NULL
             THEN
                -- Geen status/mode meegegeven, bepaal em zelf
@@ -1806,7 +1811,12 @@ CREATE OR REPLACE PACKAGE BODY fac AS
                END IF;
             ELSE
                -- Wel status meegegeven; die is dan vast
+               -- Als status=2 en pcode=xxxMAI, dan moet de mail altijd vertuurd worden.
                smode := poptstatus;
+               IF SUBSTR(pcode, -3) = 'MAI' AND poptstatus = 2
+               THEN
+                 immediate := 1;
+               END IF;
 
                SELECT lcl.x('fac_srtnotificatie_oms', sn.fac_srtnotificatie_key, sn.fac_srtnotificatie_oms),
                       sn.fac_srtnotificatie_key
@@ -1888,7 +1898,7 @@ CREATE OR REPLACE PACKAGE BODY fac AS
          -- Voorkom e-mail/sms van deze zwakkere *UPD als de *NEW nog niet eens de deur uit is door Putorders
          -- of meer algemeen: elke e-mail/sms die nog niet de deur is.
          -- Je wilt wel op alle gedefinieerde kanalen precies een bericht houden
-         IF BITAND (smode, 2 + 4) <> 0
+         IF ((BITAND (smode, 2 + 4) <> 0) AND (immediate = 0))
          THEN
             -- Zoek de lmode van een al/nog aanwezige fac_notificatie die over hetzelfde gaat
             BEGIN
@@ -1936,15 +1946,15 @@ CREATE OR REPLACE PACKAGE BODY fac AS
             CASE pcode
             WHEN 'MLDAFM'
             THEN
-                fac.clrnotifications('MLD%', pref);
+                fac.clrnotifications('MLD%', pref, 'MLDMAI');
             WHEN 'MLD2BO'
             THEN
                 fac.clrnotifications('MLD2B3', pref);
             WHEN 'RESAFM'
             THEN
-                fac.clrnotifications('RESUPD', pref);
-                fac.clrnotifications('RESOPT', pref);
-                fac.clrnotifications('RESBEV', pref);
+                fac.clrnotifications('RESUPD', pref, 'RESMAI');
+                fac.clrnotifications('RESOPT', pref, 'RESMAI');
+                fac.clrnotifications('RESBEV', pref, 'RESMAI');
             WHEN 'RESOPT'
             THEN
                 fac.clrnotifications('RESUPD', pref);
@@ -1956,7 +1966,7 @@ CREATE OR REPLACE PACKAGE BODY fac AS
                 fac.clrnotifications('RESUPD', pref);
             WHEN 'BESAFM'
             THEN
-                fac.clrnotifications('BESUPD', pref);
+                fac.clrnotifications('BESUPD', pref, 'BESMAI');
             WHEN 'ORDAFM'
             THEN
                 fac.clrnotifications('ORDUPD', pref);
@@ -2804,7 +2814,7 @@ CREATE OR REPLACE PACKAGE BODY fac AS
         lbenotify                mld_disc_params.mld_disc_params_benotify%TYPE;
         lworkflowstep_key        mld_melding.mld_workflowstep_key%TYPE;
         lstart_key               mld_melding.mld_melding_start_key%TYPE;
-        lintern                  mld_v_uitvoerende.intern%TYPE;
+        luitvtype                mld_v_uitvoerende.TYPE%TYPE;
         lemail                   prs_bedrijf.prs_bedrijf_email%TYPE;
         lemail3                  alg_gebouw.alg_gebouw_email%TYPE;
         lphone                   prs_bedrijf.prs_bedrijf_telefoon2%TYPE;
@@ -3000,7 +3010,9 @@ CREATE OR REPLACE PACKAGE BODY fac AS
                 -- tot notificeren van tracking
                 -- Echter: wie houden we hiervan nou actief op de hoogte?
                 -- Dat wordt de interne contacpersoon van de opdracht
-                -- behalve ORDMLE/ORDMLI en ORDONO/ORDOOK, die naar de uitvoerder
+                -- behalve:
+                -- 1) ORDMLE/ORDMLI en ORDONO/ORDOOK, die naar de uitvoerder
+                -- 2) ORDDAT, die naar de gebouwverantwoordelijke van het betreffende gebouw van de onderliggende melding
                 IF lcode IN ('ORDMLI', 'ORDMLE', 'ORDONO', 'ORDOOK')
                 THEN
                     SELECT mld_uitvoerende_keys
@@ -3008,14 +3020,14 @@ CREATE OR REPLACE PACKAGE BODY fac AS
                       FROM mld_opdr
                      WHERE mld_opdr_key = prefkey;
 
-                    SELECT u.intern
-                      INTO lintern
+                    SELECT u.TYPE
+                      INTO luitvtype
                       FROM mld_v_uitvoerende u
                      WHERE u.mld_uitvoerende_key = lreceiver;
 
-                    IF lintern = 0 -- Extern
+                    IF luitvtype = 'B'
                     THEN
-                        -- Het gaat om een externe receiver
+                        -- Het gaat om een bedrijf receiver
                         BEGIN
                             SELECT prs_bedrijf_email, prs_bedrijf_telefoon2
                               INTO lemail, lphone
@@ -3035,6 +3047,25 @@ CREATE OR REPLACE PACKAGE BODY fac AS
                                 RETURN;
                         END;
                     END IF;
+                ELSIF lcode = 'ORDDAT'
+                THEN
+                    BEGIN
+                        SELECT COALESCE(g.prs_perslid_key_verantw, g.prs_perslid_key_verantw2) verantwoordelijke
+                          INTO lreceiver
+                          FROM mld_opdr o,
+                               mld_melding m,
+                               alg_v_onroerendgoed org,
+                               alg_gebouw g
+                         WHERE o.mld_melding_key = m.mld_melding_key
+                           AND m.mld_alg_onroerendgoed_keys = org.alg_onroerendgoed_keys
+                           AND org.alg_gebouw_key = g.alg_gebouw_key
+                           AND COALESCE(g.prs_perslid_key_verantw, g.prs_perslid_key_verantw2) IS NOT NULL
+                           AND o.mld_opdr_key = prefkey;
+                    EXCEPTION
+                        WHEN NO_DATA_FOUND
+                        THEN
+                            RETURN;
+                    END;
                 ELSE
                     -- ons intern contactpersoon krijgt in alle andere gevallen het bericht
                     SELECT prs_perslid_key
@@ -3123,7 +3154,8 @@ CREATE OR REPLACE PACKAGE BODY fac AS
                            lalg_ruimte_key,
                            lreskey
                       FROM res_rsv_ruimte
-                     WHERE res_rsv_ruimte_key = prefkey AND (res_rsv_ruimte_dirtlevel = 0 OR lcode = 'RESDIR');
+                     WHERE res_rsv_ruimte_key = prefkey
+                       AND (res_rsv_ruimte_dirtlevel = 0 OR lcode = 'RESDIR');
                 EXCEPTION
                     WHEN NO_DATA_FOUND
                     THEN
@@ -3132,15 +3164,18 @@ CREATE OR REPLACE PACKAGE BODY fac AS
 
                 -- de afzender, en moeten we wel?
                 lnotify := NULL;
-
+                lbonotify := 0;
                 BEGIN
                     -- Bepaal afzender, afhankelijk van catalogus (als res_ruimte) of anders de locatie
                     -- en check of er voor deze ruimtecatalogus uberhaupt moet worden genotificeerd
                     IF lres_ruimte_opstel_key IS NOT NULL
                     THEN
                         SELECT COALESCE (MAX (d.ins_discipline_email), MAX (l.alg_locatie_email)),
-                               MAX (res_disc_params_notify)
-                          INTO lsender, lnotify
+                               MAX (res_disc_params_notify),
+                               MAX (res_disc_params_bonotify)
+                          INTO lsender,
+                               lnotify,
+                               lbonotify
                           FROM res_ruimte_opstelling ro,
                                res_ruimte rr,
                                res_alg_ruimte rag,
@@ -3163,10 +3198,16 @@ CREATE OR REPLACE PACKAGE BODY fac AS
                     THEN
                         -- Een voorzieningenreservering kan uit meerdere catalogi items hebben,
                         -- maar bij maar 1 afzender. Zwaarst geldt een cateringcatalogusafzender
-                        SELECT MAX (d.ins_discipline_email)
-                          INTO lsender
-                          FROM ins_tab_discipline d, res_artikel a, res_rsv_artikel ra
+                        SELECT MAX (d.ins_discipline_email),
+                               MAX (res_disc_params_bonotify)
+                          INTO lsender,
+                               lbonotify
+                          FROM ins_tab_discipline d,
+                               res_artikel a,
+                               res_rsv_artikel ra,
+                               res_disc_params rdp
                          WHERE     d.ins_discipline_key = a.res_discipline_key
+                               AND a.res_discipline_key = rdp.res_ins_discipline_key
                                AND a.res_artikel_key = ra.res_artikel_key
                                AND ra.res_rsv_artikel_verwijder IS NULL
                                AND ra.res_rsv_ruimte_key = prefkey;
@@ -3174,10 +3215,16 @@ CREATE OR REPLACE PACKAGE BODY fac AS
                         -- Als die er niet is, dan de voorzieningscatalogusafzender
                         IF lsender IS NULL
                         THEN
-                            SELECT MAX (d.ins_discipline_email)
-                              INTO lsender
-                              FROM ins_tab_discipline d, res_deel r, res_rsv_deel rd
+                            SELECT MAX (d.ins_discipline_email),
+                                   MAX (res_disc_params_bonotify)
+                              INTO lsender,
+                                   lbonotify
+                              FROM ins_tab_discipline d,
+                                   res_deel r,
+                                   res_rsv_deel rd,
+                                   res_disc_params rdp
                              WHERE     d.ins_discipline_key = r.res_discipline_key
+                                   AND r.res_discipline_key = rdp.res_ins_discipline_key
                                    AND r.res_deel_key = rd.res_deel_key
                                    AND rd.res_rsv_deel_verwijder IS NULL
                                    AND rd.res_rsv_ruimte_key = prefkey;
@@ -3206,6 +3253,11 @@ CREATE OR REPLACE PACKAGE BODY fac AS
                         lsender := NULL;
                 END;
 
+                IF (lbonotify > 0) AND (lcode = 'RESNEW') -- Bij aanmaken van de reservering, of bij wijzigen van een bestaande reservering door toevoegen van voorzieningen.
+                THEN
+                    res.notifybackoffice (prefkey, lcode);
+                END IF;
+
                 -- Reserveringen worden eventueel niet genotificeerd als settings daartoe aanleiding geven.
                 -- We weten genoeg om te checken of dat zo is
                 IF (lnotify = 0)
@@ -3700,6 +3752,7 @@ CREATE OR REPLACE PACKAGE BODY fac AS
        RETURN retkey;
     END;
 
+   -- Keep initsession (flcode IN VARCHAR2) for branches (OLD)
    PROCEDURE initsession (flcode IN VARCHAR2)
    AS
       setsql VARCHAR2(200);
@@ -3710,7 +3763,25 @@ CREATE OR REPLACE PACKAGE BODY fac AS
         setsql := 'ALTER SESSION SET '
              || ' NLS_NUMERIC_CHARACTERS = ''.,'''
              || ' NLS_SORT = ''BINARY'''
-             || ' NLS_TERRITORY=''AMERICA''';
+             || ' NLS_TERRITORY = ''AMERICA'''
+             || ' NLS_DATE_FORMAT = ''YYYY-MM-DD HH24:MI:SS''';
+        EXECUTE IMMEDIATE setsql;
+   END;
+
+   PROCEDURE initsession (pkey NUMBER, flcode IN VARCHAR2, usertimezone IN VARCHAR2)
+   AS
+      setsql VARCHAR2(200);
+   BEGIN
+        DBMS_SESSION.SET_IDENTIFIER(pkey);
+        -- Initialiseert deze Oracle session met de vereiste parameters
+        -- De flcode (FACILITOR Language code) mag null zijn, dan wordt de databasedefault gebruikt
+        lcl.setuserlanguage(flcode);
+        setsql := 'ALTER SESSION SET '
+             || ' NLS_NUMERIC_CHARACTERS = ''.,'''
+             || ' NLS_SORT = ''BINARY'''
+             || ' NLS_TERRITORY = ''AMERICA'''
+             || ' NLS_DATE_FORMAT = ''YYYY-MM-DD HH24:MI:SS'''
+             || ' TIME_ZONE = ''' || COALESCE(REPLACE(usertimezone, '''', ''''''), 'Europe/Amsterdam') || '''';
         EXECUTE IMMEDIATE setsql;
    END;
 
@@ -3744,7 +3815,7 @@ CREATE OR REPLACE PACKAGE BODY fac AS
        END IF;
     END;
 
-    // fac_version_custnr is deprecated sinds 2016.3
+    -- fac_version_custnr is deprecated sinds 2016.3
     PROCEDURE registercustversion (pcustid IN VARCHAR2, pcustnr IN NUMBER)
     AS
     BEGIN
@@ -3762,7 +3833,7 @@ CREATE OR REPLACE PACKAGE BODY fac AS
        verstring VARCHAR2(100);
        maxdate DATE;
     BEGIN
-       // Hoogste klant-sql. Onderken ook uwva_prs.sql
+       -- Hoogste klant-sql. Onderken ook uwva_prs.sql
        SELECT MAX(adm_tracking_date)
          INTO maxdate
          FROM adm_tracking, fac_version
@@ -4545,7 +4616,6 @@ CREATE OR REPLACE PACKAGE BODY fac AS
                       p_initval,
                       p_initexpire);
    END;
-
 END fac;
 /
 

FAC/FAC_PACA.SRC

@@ -0,0 +1,46 @@
+/*  $Revision$
+ *  $Id$
+ */
+
+/*  FAC_PACA, (A means Audit) to be included from fac_pac.src, isolated for convenience only
+ *  The Audit-package source. Contains all functions for audit.
+ *
+ *  Usage: aud.auditaction(...);
+ *
+ */
+
+
+CREATE OR REPLACE PACKAGE aud
+AS
+    PROCEDURE auditaction (tabelnaam VARCHAR2, tabelkey_oud NUMBER, tabelkey_nieuw NUMBER, veldnaam VARCHAR2, waarde_oud VARCHAR2, waarde_nieuw VARCHAR2, isdeleting NUMBER, opmerk VARCHAR2 DEFAULT NULL);
+END aud;
+/
+CREATE OR REPLACE PACKAGE BODY aud
+AS
+   PROCEDURE auditaction (tabelnaam VARCHAR2, tabelkey_oud NUMBER, tabelkey_nieuw NUMBER, veldnaam VARCHAR2, waarde_oud VARCHAR2, waarde_nieuw VARCHAR2, isdeleting NUMBER, opmerk VARCHAR2 DEFAULT NULL)
+   IS
+   BEGIN
+      IF COALESCE(waarde_oud, 'bUSnDIaVjRS56D3z') <> COALESCE(waarde_nieuw, 'bUSnDIaVjRS56D3z')
+      THEN
+         INSERT INTO fac_audit (fac_audit_tabelnaam,
+                                fac_audit_tabelkey,
+                                fac_audit_veldnaam,
+                                fac_audit_actie,
+                                fac_audit_waarde_oud,
+                                fac_audit_waarde_nieuw,
+                                prs_perslid_key,
+                                fac_audit_opmerking)
+                        VALUES (tabelnaam,
+                                COALESCE(tabelkey_nieuw, tabelkey_oud),
+                                veldnaam,
+                                CASE WHEN isdeleting = 1 OR SUBSTR(veldnaam, -9) = 'verwijder' THEN 'D' ELSE 'U' END,
+                                waarde_oud,
+                                waarde_nieuw,
+                                sys_context('USERENV', 'CLIENT_IDENTIFIER'),
+                                opmerk);
+      END IF;
+   END;
+END aud;
+/
+
+REGISTERRUN('$Id$')

FAC/FAC_PACFLEX.SRC

@@ -36,7 +36,7 @@ AS
     PROCEDURE deleteflex (pmodule IN VARCHAR2,
                           p_kenmerk_key   IN NUMBER,
                           p_ref_key       IN NUMBER,
-                          p_niveau        IN NUMBER);
+                          p_niveau        IN VARCHAR2);
     FUNCTION getflexexpression (pmodule IN VARCHAR2,
                                 p_kenmerk_key   IN NUMBER,
                                 p_niveau        IN VARCHAR2 DEFAULT NULL) RETURN VARCHAR2;
@@ -70,6 +70,9 @@ AS
           THEN o_kvtable       := 'alg_onrgoedkenmerk';
                o_kvtable_refkey  := 'alg_onrgoed_key';
                o_kvtable_kniveau := 'alg_onrgoed_niveau';
+          WHEN pmodule = 'BEZ'
+          THEN o_kvtable       := 'bez_kenmerkwaarde';
+               o_kvtable_refkey  := 'bez_bezoekers_key';
           WHEN pmodule = 'BES'
           THEN o_kvtable       := 'bes_kenmerkbestell';
                o_kvtable_refkey  := 'bes_bestelling_key';
@@ -188,13 +191,13 @@ AS
                           '           )' ||
                           '    VALUES (' || p_ref_key ||
                           '          , ' || p_kenmerk_key ||
-                          '          , ' || '''' || p_waarde || '''' ||
+                          '          , :pwaarde'||
                                             l_niveau_val ||
                           '           )';
           l_sql := l_sql_insert;
        ELSE
           l_sql_update := 'UPDATE ' || l_kenmval_tablename ||
-                          '   SET ' || l_kcolumnname_waarde || ' = ''' || p_waarde || '''' ||
+                          '   SET ' || l_kcolumnname_waarde || ' = :pwaarde' ||
                           ' WHERE ' || l_kcolumnname_refkey || ' = ' || p_ref_key ||
                           '   AND ' || l_kcolumnname_kkey || ' = ' || p_kenmerk_key ||
                           '   AND ' || l_kcolumnname_delete || ' IS NULL';
@@ -202,7 +205,7 @@ AS
        END IF;
 
        DBMS_SQL.parse (l_cursor_upsert, l_sql, DBMS_SQL.native);
-
+       DBMS_SQL.BIND_VARIABLE(l_cursor_upsert,':pwaarde', p_waarde);
        l_rowsprocessed := DBMS_SQL.execute (l_cursor_upsert);
        DBMS_SQL.close_cursor(l_cursor_upsert);
     END;
@@ -210,7 +213,7 @@ AS
     PROCEDURE deleteflex (pmodule IN VARCHAR2,
                           p_kenmerk_key   IN NUMBER,
                           p_ref_key       IN NUMBER,
-                          p_niveau        IN NUMBER)
+                          p_niveau        IN VARCHAR2)
     AS
        l_module              VARCHAR2 (3);
        l_sql_delete          VARCHAR2 (4500);
@@ -234,7 +237,7 @@ AS
 
        IF l_kcolumnname_niveau IS NOT NULL
        THEN
-          l_niveau := ' AND ' || l_kcolumnname_niveau || ' = ' || p_niveau;
+          l_niveau := ' AND ' || l_kcolumnname_niveau || ' = ''' || p_niveau || '''';
        ELSE
           l_niveau := '';
        END IF;

FAC/FAC_PACL.SRC

@@ -65,7 +65,7 @@ AS
    AS
       nlslang   VARCHAR2 (30);
       setsql    VARCHAR2 (60);
-      lflcode   VARCHAR2 (3);  -- locale kopie
+      lflcode   VARCHAR2 (10);  -- locale kopie
    BEGIN
       -- Zet de sessie in de juiste taal, gegeven de FACILITOR-tweeletterige taalcode
 
@@ -77,7 +77,7 @@ AS
           INTO lflcode
           FROM fac_version;
       ELSE
-        lflcode := flcode;
+        lflcode := SUBSTR(flcode, 1, 10);
       END IF;
 
 

FAC/FAC_PACX.SRC

@@ -103,7 +103,7 @@ AS
       p_withchildren   IN   BOOLEAN
    );
 
-   PROCEDURE create_mld_opdr_node (p_key IN NUMBER, p_extra_key IN NUMBER, p_concise IN BOOLEAN);
+   PROCEDURE create_mld_opdr_node (p_key IN NUMBER, p_extra_key IN NUMBER, p_concise IN BOOLEAN, p_bgtmode IN BOOLEAN DEFAULT FALSE);
    PROCEDURE create_bes_bestelling_node (p_key       IN NUMBER, p_concise IN BOOLEAN);
    PROCEDURE create_bes_bestelopdr_node (p_key IN NUMBER, p_concise IN BOOLEAN);
    PROCEDURE create_bez_afspraak_node (p_key       IN NUMBER,
@@ -111,7 +111,8 @@ AS
                                        p_concise   IN BOOLEAN);
    PROCEDURE create_res_rsv_ruimte_node (p_key IN NUMBER, p_concise IN BOOLEAN);
    PROCEDURE create_cnt_contract_node (p_key IN NUMBER, p_concise IN BOOLEAN);
-   PROCEDURE create_fin_factuur_node (p_key IN NUMBER, p_concise IN BOOLEAN);
+   PROCEDURE create_fin_factuur_node (p_key IN NUMBER, p_concise IN BOOLEAN, p_bgtmode IN BOOLEAN DEFAULT FALSE);
+   PROCEDURE create_bgt_discipline_node (p_key IN NUMBER);
 
    PROCEDURE xml_node (p_xmlnode     IN VARCHAR2,
                        p_key         IN NUMBER,
@@ -336,13 +337,16 @@ AS
       v_return     VARCHAR2 (1000);
       l_timezone   VARCHAR2 (20);
       v_utc        TIMESTAMP;
+      user_ts        TIMESTAMP;
    BEGIN
       IF p_date IS NOT NULL
       THEN
          createopentag (p_tag);
          createxmltagvalue ('datum', TO_CHAR (p_date, 'dd-mm-yyyy'));
          createxmltagvalue ('tijd', TO_CHAR (p_date, 'hh24:mi'));
-         -- veronderstel origineel CentralEuropeTime. Die heeft de goede zomer/wintertijd
+         user_ts := FROM_TZ (CAST (p_date AS TIMESTAMP), TO_CHAR (SYSTIMESTAMP, 'tzr')) AT TIME ZONE SESSIONTIMEZONE;
+         createxmltagvalue ('localdatum', TO_CHAR (user_ts, 'dd-mm-yyyy'));
+         createxmltagvalue ('localtijd', TO_CHAR (user_ts, 'hh24:mi'));
          v_utc :=
             SYS_EXTRACT_UTC (FROM_TZ (CAST (p_date AS TIMESTAMP), 'CET'));
          createxmltagvalue ('utcdatum', TO_CHAR (v_utc, 'YYYYMMDD'));
@@ -676,6 +680,9 @@ AS
       createxmltagvalue ('custId', l_custid);
       createxmltagvalue ('env', l_otap);
       createxmltagvalue ('language', lcl.getuserlanguage ());
+      -- Cannot retrieve server timezone as region name, so display both as offsets
+      createxmltagvalue ('servertimezone', TO_CHAR (SYSTIMESTAMP, 'tzr'));
+      createxmltagvalue ('usertimezone', SUBSTR(TZ_OFFSET(SESSIONTIMEZONE),1,6));
       createxmltagvalue ('version', fac.getdbversion ());
       createclosetag ('header');
    END;
@@ -760,17 +767,18 @@ AS
                     INTO v_adres_key
                     FROM mld_adres
                    WHERE mld_adres_key IN
-                               (SELECT NVL (
-                                          fa5.prs_kenmerklink_waarde,
-                                          NVL (
-                                             fa4.prs_kenmerklink_waarde,
-                                             NVL (
-                                                fa3.prs_kenmerklink_waarde,
-                                                NVL (
-                                                   fa2.prs_kenmerklink_waarde,
-                                                   NVL (
-                                                      fa1.prs_kenmerklink_waarde,
-                                                      abd.mld_adres_key_fac)))))
+                               (SELECT fac.safe_to_number(
+                                           NVL (
+                                              fa5.prs_kenmerklink_waarde,
+                                              NVL (
+                                                 fa4.prs_kenmerklink_waarde,
+                                                 NVL (
+                                                    fa3.prs_kenmerklink_waarde,
+                                                    NVL (
+                                                       fa2.prs_kenmerklink_waarde,
+                                                       NVL (
+                                                          fa1.prs_kenmerklink_waarde,
+                                                          abd.mld_adres_key_fac))))))
                                   FROM prs_bedrijf abd,
                                        mld_opdr o,
                                        mld_melding m,
@@ -1019,8 +1027,248 @@ AS
       END IF;
    END;
 
-   PROCEDURE create_prs_kostensoort_node (p_key IN NUMBER)
+   PROCEDURE create_bgt_ancestor_node(p_child IN VARCHAR2, p_key IN NUMBER)
    AS
+      CURSOR c_soort(p_child_key NUMBER)
+      IS
+         SELECT s.prs_kostensoort_key
+              , s.prs_kostensoort_altcode
+              , s.prs_kostensoort_oms
+           FROM prs_kostensoort s
+          WHERE s.prs_kostensoort_key = p_child_key;
+      CURSOR c_groep(p_child_key NUMBER)
+      IS
+         SELECT g.prs_kostensoortgrp_key
+              , g.prs_kostensoortgrp_altcode
+              , g.prs_kostensoortgrp_oms
+           FROM prs_kostensoortgrp g
+              , prs_kostensoort s
+          WHERE g.prs_kostensoortgrp_key = s.prs_kostensoortgrp_key
+            AND s.prs_kostensoort_key = p_child_key;
+      CURSOR c_rubriek(p_child_key NUMBER)
+      IS
+         SELECT r.bgt_kostenrubriek_key
+              , r.bgt_kostenrubriek_code
+              , r.bgt_kostenrubriek_oms
+           FROM bgt_kostenrubriek r
+              , prs_kostensoortgrp g
+          WHERE r.bgt_kostenrubriek_key = g.bgt_kostenrubriek_key
+            AND g.prs_kostensoortgrp_key = p_child_key;
+      CURSOR c_project(p_child_key NUMBER)
+      IS
+         SELECT p.bgt_project_key
+              , p.bgt_project_code
+              , p.bgt_project_omschrijving
+           FROM bgt_project p
+              , bgt_kostenrubriek r
+          WHERE p.bgt_project_key = r.bgt_project_key
+            AND r.bgt_kostenrubriek_key = p_child_key;
+      CURSOR c_discipline(p_child_key NUMBER)
+      IS
+         SELECT d.ins_discipline_key
+              , d.ins_discipline_omschrijving
+              , p.bgt_disc_params_code
+              , p.bgt_disc_params_opdrachtgever
+           FROM ins_tab_discipline d
+              , bgt_disc_params p
+              , bgt_project s
+          WHERE d.ins_discipline_key = p.bgt_ins_discipline_key
+            AND d.ins_discipline_key = s.ins_discipline_key
+            AND s.bgt_project_key = p_child_key;
+
+      v_key    NUMBER(10);
+      v_child  VARCHAR2(30);
+   BEGIN
+     createopentag ('ancestor');
+        v_key := p_key;
+        v_child := p_child;
+        IF v_child = 'soort_key' -- als je alleen de kostensoort_key hebt, maar geen kostensoort gegevens.
+        THEN
+           FOR c5 IN c_soort(v_key)
+           LOOP
+              createopentag('soort');
+              createxmltagvalue('key',  c5.prs_kostensoort_key);
+              createxmltagvalue('code', c5.prs_kostensoort_altcode);
+              createxmltagvalue('name', c5.prs_kostensoort_oms);
+              createclosetag('soort');
+              v_child := 'soort';
+              v_key := c5.prs_kostensoort_key;
+           END LOOP;
+        END IF;
+        IF v_child = 'soort'
+        THEN
+           FOR c4 IN c_groep(v_key)
+           LOOP
+              createopentag('groep');
+              createxmltagvalue('key',  c4.prs_kostensoortgrp_key);
+              createxmltagvalue('code', c4.prs_kostensoortgrp_altcode);
+              createxmltagvalue('name', c4.prs_kostensoortgrp_oms);
+              createclosetag('groep');
+              v_child := 'groep';
+              v_key := c4.prs_kostensoortgrp_key;
+           END LOOP;
+        END IF;
+        IF v_child = 'groep'
+        THEN
+           FOR c3 IN c_rubriek(v_key)
+           LOOP
+              createopentag('rubriek');
+              createxmltagvalue('key',  c3.bgt_kostenrubriek_key);
+              createxmltagvalue('code', c3.bgt_kostenrubriek_code);
+              createxmltagvalue('name', c3.bgt_kostenrubriek_oms);
+              createclosetag('rubriek');
+              v_child := 'rubriek';
+              v_key := c3.bgt_kostenrubriek_key;
+           END LOOP;
+        END IF;
+        IF v_child = 'rubriek'
+        THEN
+           FOR c2 IN c_project(v_key)
+           LOOP
+              createopentag('project');
+              createxmltagvalue('key', c2.bgt_project_key);
+              createxmltagvalue('code', c2.bgt_project_code);
+              createxmltagvalue('name', c2.bgt_project_omschrijving);
+              createclosetag('project');
+              v_child := 'project';
+              v_key := c2.bgt_project_key;
+           END LOOP;
+        END IF;
+        if v_child = 'project'
+        THEN
+           FOR c1 IN c_discipline(v_key)
+           LOOP
+              createopentag('discipline');
+              createxmltagvalue('key', c1.ins_discipline_key);
+              createxmltagvalue('code', c1.bgt_disc_params_code);
+              createxmltagvalue('name', c1.ins_discipline_omschrijving);
+              createxmltagvalue('principal', c1.bgt_disc_params_opdrachtgever);
+              createclosetag('discipline');
+              v_child := 'discipline';
+              v_key := c1.ins_discipline_key;
+           END LOOP;
+        END IF;
+        -- IF v_child = 'discipline' :: Dan heb je alle gegevens al.
+     createclosetag ('ancestor');
+   END;
+
+   PROCEDURE create_bgt_budgetmutatie_node (p_budget_key IN NUMBER, p_mutatie_key IN NUMBER)
+   AS
+      v_datum         bgt_budgetmutatie.bgt_budgetmutatie_datum%TYPE;
+      v_omschrijving  bgt_budgetmutatie.bgt_budgetmutatie_omschrijving%TYPE;
+      v_key_van       bgt_budgetmutatie.bgt_budget_key_van%TYPE;
+      v_key_naar      bgt_budgetmutatie.bgt_budget_key_naar%TYPE;
+      v_bedrag_van    bgt_budgetmutatie.bgt_budget_bedrag_van%TYPE;
+      v_bedrag_naar   bgt_budgetmutatie.bgt_budget_bedrag_naar%TYPE;
+      v_persoon       prs_perslid.prs_perslid_key%TYPE;
+   BEGIN
+      IF p_mutatie_key IS NOT NULL
+      THEN
+         SELECT bgt_budgetmutatie_datum
+              , bgt_budgetmutatie_omschrijving
+              , prs_perslid_key
+              , bgt_budget_key_van
+              , bgt_budget_key_naar
+              , bgt_budget_bedrag_van
+              , bgt_budget_bedrag_naar
+           INTO v_datum
+              , v_omschrijving
+              , v_persoon
+              , v_key_van
+              , v_key_naar
+              , v_bedrag_van
+              , v_bedrag_naar
+           FROM bgt_budgetmutatie
+          WHERE bgt_budgetmutatie_key = p_mutatie_key;
+         createopentag ('mutation');
+         createxmltagvalue ('key', mynumbertochar (p_mutatie_key));
+         mydatetochar ('date', v_datum);
+         IF (p_budget_key = v_key_van) THEN
+            createxmltagvalue ('amount', mynumbertochar (v_bedrag_van));
+         END IF;
+         IF (p_budget_key = v_key_naar) THEN
+            createxmltagvalue ('amount', mynumbertochar (v_bedrag_naar));
+         END IF;
+         createclosetag ('mutation');
+      END IF;
+   END;
+   PROCEDURE create_bgt_budget_node (p_key IN NUMBER)
+   AS
+      CURSOR c_mutatie
+      IS
+         SELECT bgt_budgetmutatie_key
+           FROM bgt_budgetmutatie
+          WHERE bgt_budget_key_van = p_key
+             OR bgt_budget_key_naar = p_key;
+      v_disc_key      bgt_budget.ins_discipline_key%TYPE;
+      v_project_key   bgt_budget.bgt_project_key%TYPE;
+      v_rubriek_key   bgt_budget.bgt_kostenrubriek_key%TYPE;
+      v_groep_key     bgt_budget.prs_kostensoortgrp_key%TYPE;
+      v_soort_key     bgt_budget.prs_kostensoort_key%TYPE;
+      v_begin         bgt_budget.bgt_budget_begin%TYPE;
+      v_eind          bgt_budget.bgt_budget_eind%TYPE;
+      v_aanmaak       bgt_budget.bgt_budget_aanmaak%TYPE;
+      v_verval        bgt_budget.bgt_budget_vervaldatum%TYPE;
+      v_bedrag        bgt_budget.bgt_budget_bedrag%TYPE;
+      v_btwbedrag     bgt_budget.bgt_budget_btwbedrag%TYPE;
+      v_isreserve     bgt_budget.bgt_budget_isreserve%TYPE;
+   BEGIN
+      IF p_key IS NOT NULL
+      THEN
+         SELECT ins_discipline_key
+              , bgt_project_key
+              , bgt_kostenrubriek_key
+              , prs_kostensoortgrp_key
+              , prs_kostensoort_key
+              , bgt_budget_begin
+              , bgt_budget_eind
+              , bgt_budget_aanmaak
+              , bgt_budget_vervaldatum
+              , bgt_budget_bedrag
+              , bgt_budget_btwbedrag
+              , bgt_budget_isreserve
+           INTO v_disc_key
+              , v_project_key
+              , v_rubriek_key
+              , v_groep_key
+              , v_soort_key
+              , v_begin
+              , v_eind
+              , v_aanmaak
+              , v_verval
+              , v_bedrag
+              , v_btwbedrag
+              , v_isreserve
+           FROM bgt_budget
+          WHERE bgt_budget_key = p_key;
+         createopentag ('budget');
+         mydatetochar ('startdate', v_begin);
+         mydatetochar ('enddate', v_eind);
+         mydatetochar ('created', v_aanmaak);
+         mydatetochar ('expires', v_verval);
+         createxmltagvalue ('amount', mynumbertochar (v_bedrag));
+         createxmltagvalue ('withvat', mynumbertochar (v_btwbedrag));
+         FOR rec1 IN c_mutatie
+         LOOP
+            create_bgt_budgetmutatie_node (p_key, rec1.bgt_budgetmutatie_key);
+         END LOOP;
+         createclosetag ('budget');
+      END IF;
+   END;
+   PROCEDURE create_prs_kostensoort_node (p_key IN NUMBER, p_concise IN BOOLEAN DEFAULT FALSE)
+   AS
+      CURSOR c_opdracht
+      IS
+         SELECT mld_opdr_key
+           FROM mld_opdr
+          WHERE prs_kostensoort_key = p_key;
+
+      CURSOR c_budget
+      IS
+         SELECT bgt_budget_key
+           FROM bgt_budget
+          WHERE prs_kostensoort_key = p_key;
+
       v_omschrijving      prs_kostensoort.prs_kostensoort_oms%TYPE;
       v_omschrijving_alt  prs_kostensoort.prs_kostensoort_altcode%TYPE;
       v_groep             prs_kostensoortgrp.prs_kostensoortgrp_oms%TYPE;
@@ -1033,7 +1281,12 @@ AS
       IF p_key IS NOT NULL
       THEN
          createopentag ('kostensoort');
-
+         --
+         IF p_concise  -- dan ook parent_info
+         THEN
+            create_bgt_ancestor_node('soort', p_key);
+         END IF;
+         --
          SELECT k.prs_kostensoort_oms,
                 k.prs_kostensoort_altcode,
                 g.prs_kostensoortgrp_oms,
@@ -1063,6 +1316,18 @@ AS
          createxmltagvalue ('refcode', v_refcode);
          createxmltagvalue ('doorbelasten', v_doorbelasten);
          createxmltagvalue ('btw', v_btw);
+         --
+         IF p_concise THEN
+            FOR rec1 IN c_opdracht
+            LOOP
+               create_mld_opdr_node (rec1.mld_opdr_key, NULL, TRUE, TRUE);
+            END LOOP;
+            --
+            FOR rec2 IN c_budget
+            LOOP
+               create_bgt_budget_node (rec2.bgt_budget_key);
+            END LOOP;
+         END IF;
          createclosetag ('kostensoort');
       END IF;
    END;
@@ -3371,21 +3636,22 @@ AS
                          k.mld_kenmerk_key,
                          mld_kenmerk_hint)
                      hint,
-                  v.mld_kenmerkmelding_waarde
-             FROM mld_kenmerk k,
+                  /* Het lijkt logischer hieronder mld_kenmerkmelding te linken op k.kenmerk_key
+                     maar bij een zojuist doorgestuurde melding zijn de flexkenmerk_keys nog niet
+                     bijgewerkt. Daarom koppeling op srtkenmerk + groep
+                  */
+                  (SELECT v.mld_kenmerkmelding_waarde
+                     FROM mld_kenmerkmelding v, mld_kenmerk vk
+                    WHERE     vk.mld_kenmerk_groep = k.mld_kenmerk_groep
+                          AND vk.mld_srtkenmerk_key = k.mld_srtkenmerk_key
+                          AND v.mld_kenmerk_key = vk.mld_kenmerk_key
+                          AND v.mld_melding_key = m.mld_melding_key
+                          AND v.mld_kenmerkmelding_verwijder IS NULL) mld_kenmerkmelding_waarde
+              FROM mld_kenmerk k,
                   mld_srtkenmerk s,
                   mld_melding m,
                   mld_stdmelding stdm,
-                  mld_discipline d,
-                  (SELECT v.mld_melding_key
-                        , v.mld_kenmerkmelding_waarde
-                        , vk.mld_srtkenmerk_key
-                        , vk.mld_kenmerk_groep
-                     FROM mld_kenmerkmelding v
-                        , mld_kenmerk vk
-                    WHERE v.mld_kenmerk_key(+) = vk.mld_kenmerk_key
-                      AND v.mld_kenmerkmelding_verwijder IS NULL
-                  ) v
+                  mld_discipline d
             WHERE ( (stdm.mld_ins_discipline_key = k.mld_stdmelding_key
                      AND k.mld_kenmerk_niveau = 'D')
                    OR (m.mld_stdmelding_key = k.mld_stdmelding_key
@@ -3398,10 +3664,6 @@ AS
               AND k.mld_kenmerk_verwijder IS NULL
               AND s.mld_srtkenmerk_verwijder IS NULL
               AND k.mld_srtkenmerk_key = s.mld_srtkenmerk_key
-              AND v.mld_srtkenmerk_key = k.mld_srtkenmerk_key
-              AND v.mld_kenmerk_groep = k.mld_kenmerk_groep
-              AND (  v.mld_melding_key = m.mld_melding_key
-                  OR v.mld_melding_key IS NULL)
          ORDER BY volgnummer;
 
       v_kenmerk_waarde       mld_kenmerkmelding.mld_kenmerkmelding_waarde%TYPE;
@@ -4376,7 +4638,7 @@ AS
          mydatetochar ('begindatum', v_datum);
          createxmltagvalue ('onderwerp', v_onderwerp);
          createxmltagvalue ('omschrijving', v_omschrijving);
-         createxmltagvalue ('behandelwijze', fac.getsetting('mld_note_mode'));  //1=oldstyle via opmerking, 2=newstyle via notes
+         createxmltagvalue ('behandelwijze', fac.getsetting('mld_note_mode'));  --1=oldstyle via opmerking, 2=newstyle via notes
          createxmltagvalue ('opmerking', v_opmerking);
          createxmltagvalue ('geprint', v_geprint);
          createxmltagvalue ('kosten_klant', v_kosten_klant);
@@ -4614,7 +4876,7 @@ AS
    -- * create_MLD_OPDR_node
    -- select xml.create_MLD_OPDR_node(7120) FROM DUAL
 
-   PROCEDURE create_mld_opdr_node (p_key IN NUMBER, p_extra_key IN NUMBER, p_concise IN BOOLEAN)
+   PROCEDURE create_mld_opdr_node (p_key IN NUMBER, p_extra_key IN NUMBER, p_concise IN BOOLEAN, p_bgtmode IN BOOLEAN DEFAULT FALSE)
    AS
       v_mld_melding_key           mld_opdr.mld_melding_key%TYPE;
       v_mld_uitvoerende_keys      mld_opdr.mld_uitvoerende_keys%TYPE;
@@ -4660,6 +4922,12 @@ AS
          SELECT ma.mld_opdr_materiaal_key
            FROM mld_opdr_materiaal ma
           WHERE ma.mld_opdr_key = p_key;
+
+      CURSOR c2
+      IS
+        SELECT fin_factuur_key
+          FROM fin_factuur
+         WHERE mld_opdr_key = p_key;
    BEGIN
       IF p_key IS NOT NULL
       THEN
@@ -4778,10 +5046,19 @@ AS
          create_prs_kostenplaats_node (v_prs_kostenplaats_key, FALSE);
          createxmltagvalue ('ordernr', v_ordernr);
          create_mld_typeopdr_node (v_typeopdr_key);
-         create_prs_dienst_node (v_cnt_contract_dienst_key);
-         create_prs_perslid_node (v_prs_perslid_key,
-                                  'backoffice_contact',
-                                  FALSE);
+
+         IF p_bgtmode THEN
+            FOR rec2 IN c2
+            LOOP
+               create_fin_factuur_node (rec2.fin_factuur_key, TRUE, TRUE);
+            END LOOP;
+         ELSE
+            create_prs_dienst_node (v_cnt_contract_dienst_key);
+            create_prs_perslid_node (v_prs_perslid_key,
+                                     'backoffice_contact',
+                                     FALSE);
+         END IF;
+
          create_mld_uitvoerende_node (v_mld_uitvoerende_keys, 'uitvoerende');
          create_cnt_contract_node (v_cnt_contract_key, TRUE);
          create_prs_contactpersoon_node (v_prs_contactpersoon_key);
@@ -7767,7 +8044,6 @@ AS
            FROM cnt_contract_object
           WHERE cnt_contract_object_verwijder IS NULL
                 AND cnt_contract_key = p_key;
-
       CURSOR c2
       IS
          SELECT cnt_contract_plaats_key,
@@ -7777,23 +8053,6 @@ AS
            FROM cnt_contract_plaats
           WHERE cnt_contract_plaats_verwijder IS NULL
                 AND cnt_contract_key = p_key;
-
-      CURSOR c3
-      IS
-         SELECT cnt_contract_onrgoed_key,
-                alg_onrgoed_key,
-                alg_onrgoed_niveau,
-                cnt_mutatie_key,
-                cnt_contract_onrgoed_opp,
-                alg_srtonrgoed_key,
-                cnt_mld_melding_key,
-                co.cnt_mutatie_status_key,
-                ms.cnt_mutatie_status_omschrijv,
-                cnt_srtruimte_prijs,
-                cnt_contract_onrgoed_key_org
-           FROM cnt_contract_onrgoed co, cnt_mutatie_status ms
-          WHERE co.cnt_mutatie_status_key = ms.cnt_mutatie_status
-                AND cnt_contract_key = p_key;
    BEGIN
       IF p_key IS NOT NULL
       THEN
@@ -7803,7 +8062,6 @@ AS
          ELSE
             createopentag ('contract');
          END IF;
-
          SELECT cnt_contract_nummer,
                 cnt_contract_omschrijving,
                 cnt_contract_looptijd_tot,
@@ -7884,7 +8142,6 @@ AS
                 AND c.cnt_contract_opzegtermijn = t2.cnt_termijn_key(+)
                 AND c.cnt_contract_termijntermijn = t3.cnt_termijn_key(+)
                 AND cnt_contract_key = p_key;
-
          createxmltagvalue ('key', mynumbertochar (p_key));
          createxmltagvalue ('nummer', v_nummer);
          createxmltagvalue ('nummer_intern', v_nummer_intern);
@@ -7928,13 +8185,11 @@ AS
          create_prs_kostensoort_node (v_kostensoort_key);
          createxmltagvalue ('opmerking', v_opmerking);
          create_cnt_contract_node (v_mantel_key, p_concise);
-
          IF NOT p_concise
          THEN
             create_bes_bestelopdr_node (v_bestelopdr_key, FALSE);
             create_cnt_kenmerken (p_key);
             create_fac_tracking_node ('contract', p_key);
-
             FOR rec1 IN c1
             LOOP
                -- object/objectsoort
@@ -7943,7 +8198,6 @@ AS
                   createxmltagvalue (
                      'key',
                      mynumbertochar (rec1.cnt_contract_object_key));
-
                   IF rec1.cnt_ins_deel_key IS NOT NULL
                   THEN
                      create_ins_deel_node (rec1.cnt_ins_deel_key, TRUE);
@@ -7952,21 +8206,17 @@ AS
                      create_ins_srtdeel_node (rec1.cnt_ins_srtdeel_key,
                                               FALSE);
                   END IF;
-
                   createclosetag ('contract_object');
                END;
             END LOOP;
-
             SELECT SUM (COALESCE (cnt_contract_plaats_gewicht, 0))
               INTO l_totaalgewicht
               FROM cnt_contract_plaats
              WHERE cnt_contract_key = p_key;
-
             SELECT cnt_contract_kosten
               INTO l_totaalkosten                        -- mag dus null zijn?
               FROM cnt_contract
              WHERE cnt_contract_key = p_key;
-
             FOR rec2 IN c2
             LOOP
                -- plaats
@@ -7978,7 +8228,6 @@ AS
                   createxmltagvalue (
                      'gewicht',
                      mynumbertochar (rec2.cnt_contract_plaats_gewicht));
-
                   IF l_totaalgewicht <> 0              -- niet delen door 0 he
                   THEN
                      l_locatiekosten :=
@@ -7988,7 +8237,6 @@ AS
                      createxmltagvalue ('kosten',
                                         mynumbertochar (l_locatiekosten));
                   END IF;
-
                   IF (rec2.cnt_alg_plaats_code = 'L')
                   THEN
                      create_alg_onroerendgoed_node (rec2.cnt_alg_plaats_key,
@@ -8003,47 +8251,10 @@ AS
                                                     FALSE,
                                                     FALSE);
                   END IF;
-
                   createclosetag ('contract_plaats');
                END;
             END LOOP;
-
-            FOR rec3 IN c3
-            LOOP
-               -- cnt_contract_onrgoed
-               BEGIN
-                  createopentag ('contract_onrgoed');
-                  createxmltagvalue (
-                     'key',
-                     mynumbertochar (rec3.cnt_contract_onrgoed_key));
-
-                  IF rec3.alg_onrgoed_niveau = 'R'
-                  THEN
-                     create_alg_ruimte_node (rec3.alg_onrgoed_key);
-                  ELSE
-                     create_alg_terreinsector_node (rec3.alg_onrgoed_key);
-                  END IF;
-
-                  createxmltagvalue ('mutatie_key',
-                                     mynumbertochar (rec3.cnt_mutatie_key));
-                  createxmltagvalue (
-                     'opp',
-                     mynumbertochar (rec3.cnt_contract_onrgoed_opp));
-                  create_mld_melding_node (rec3.cnt_mld_melding_key, NULL, FALSE);
-                  createxmltagvalue (
-                     'status_key',
-                     mynumbertochar (rec3.cnt_mutatie_status_key));
-                  createxmltagvalue ('status',
-                                     rec3.cnt_mutatie_status_omschrijv);
-                  -- verwijzing naar  parent cnt_contract_onrgoed record; ooit opnemen?
-                  createxmltagvalue (
-                     'key_org',
-                     mynumbertochar (rec3.cnt_contract_onrgoed_key_org));
-                  createclosetag ('contract_onrgoed');
-               END;
-            END LOOP;
          END IF;
-
          create_cnt_contract_note_node (p_key);
          createclosetag ('contract');
       END IF;
@@ -8242,7 +8453,7 @@ AS
       END IF;
    END;
 
-   PROCEDURE create_fin_factuur_node (p_key IN NUMBER, p_concise IN BOOLEAN)
+   PROCEDURE create_fin_factuur_node (p_key IN NUMBER, p_concise IN BOOLEAN, p_bgtmode IN BOOLEAN DEFAULT FALSE)
    AS
       v_nr                 fin_factuur.fin_factuur_nr%TYPE;
       v_totaal             fin_factuur.fin_factuur_totaal%TYPE;
@@ -8309,7 +8520,6 @@ AS
          mydatetochar ('datum', v_datum);
          createxmltagvalue ('boekmaand', v_boekmaand);
          createxmltagvalue ('debiteurnr', v_debiteur_nr);
-         create_prs_kostensoort_node (v_kostensoort_key);
          createxmltagvalue ('opmerking', v_opmerking);
          createxmltagvalue ('status', v_status);
          create_fin_kenmerken (p_key, 'F');
@@ -8319,9 +8529,12 @@ AS
             create_fin_factuurregel_node (rec1.fin_factuurregel_key);
          END LOOP;
 
-         create_mld_opdr_node (v_opdr_key, NULL, FALSE);
-         create_cnt_contract_node (v_contract_key, FALSE);
-         create_bes_bestelopdr_node (v_bestelopdr_key, FALSE);
+         IF NOT p_bgtmode THEN
+            create_prs_kostensoort_node (v_kostensoort_key);
+            create_mld_opdr_node (v_opdr_key, NULL, FALSE);
+            create_cnt_contract_node (v_contract_key, FALSE);
+            create_bes_bestelopdr_node (v_bestelopdr_key, FALSE);
+         END IF;
          create_prs_perslid_node (v_perslid_key_user, 'invoerder', TRUE);
          create_fin_factuur_note_node (p_key);
          createclosetag ('factuur');
@@ -8466,6 +8679,194 @@ AS
       END IF;
    END;
 
+   PROCEDURE create_prs_kostensoortgrp_node (p_key IN NUMBER, p_parent_info BOOLEAN DEFAULT FALSE)
+   AS
+      CURSOR c_soort
+      IS
+         SELECT prs_kostensoort_key
+           FROM prs_kostensoort
+          WHERE prs_kostensoortgrp_key = p_key;
+      v_oms      prs_kostensoortgrp.prs_kostensoortgrp_oms%TYPE;
+      v_altcode  prs_kostensoortgrp.prs_kostensoortgrp_altcode%TYPE;
+   BEGIN
+      IF p_key IS NOT NULL
+      THEN
+         IF p_parent_info
+         THEN
+            create_bgt_ancestor_node('groep', p_key);
+         END IF;
+         --
+         SELECT prs_kostensoortgrp_altcode
+              , prs_kostensoortgrp_oms
+           INTO v_altcode
+              , v_oms
+           FROM prs_kostensoortgrp
+          WHERE prs_kostensoortgrp_key = p_key;
+         createopentag ('kostengroep');
+         createxmltagvalue ('key', mynumbertochar (p_key));
+         createxmltagvalue ('code', v_altcode);
+         createxmltagvalue ('name', v_oms);
+         FOR rec1 IN c_soort
+         LOOP
+            create_prs_kostensoort_node (rec1.prs_kostensoort_key, TRUE);
+         END LOOP;
+         createclosetag ('kostengroep');
+      END IF;
+   END;
+   PROCEDURE create_bgt_kostenrubriek_node (p_key IN NUMBER, p_parent_info BOOLEAN DEFAULT FALSE)
+   AS
+      CURSOR c_groep
+      IS
+         SELECT prs_kostensoortgrp_key
+           FROM prs_kostensoortgrp
+          WHERE bgt_kostenrubriek_key = p_key;
+
+      CURSOR c_budget
+      IS
+         SELECT bgt_budget_key
+           FROM bgt_budget
+          WHERE bgt_kostenrubriek_key = p_key;
+
+      v_code  bgt_kostenrubriek.bgt_kostenrubriek_code%TYPE;
+      v_oms   bgt_kostenrubriek.bgt_kostenrubriek_oms%TYPE;
+   BEGIN
+      IF p_key IS NOT NULL
+      THEN
+         IF p_parent_info
+         THEN
+            create_bgt_ancestor_node('rubriek', p_key);
+         END IF;
+         --
+         SELECT bgt_kostenrubriek_code
+              , bgt_kostenrubriek_oms
+           INTO v_code
+              , v_oms
+           FROM bgt_kostenrubriek
+          WHERE bgt_kostenrubriek_key = p_key;
+         createopentag ('kostenrubriek');
+         createxmltagvalue ('key', mynumbertochar (p_key));
+         createxmltagvalue ('code', v_code);
+         createxmltagvalue ('name', v_oms);
+         FOR rec1 IN c_groep
+         LOOP
+            create_prs_kostensoortgrp_node (rec1.prs_kostensoortgrp_key);
+         END LOOP;
+         FOR rec2 IN c_budget
+         LOOP
+            create_bgt_budget_node (rec2.bgt_budget_key);
+         END LOOP;
+         createclosetag ('kostenrubriek');
+      END IF;
+   END;
+   PROCEDURE create_bgt_project_node (p_key IN NUMBER, p_parent_info BOOLEAN DEFAULT FALSE)
+   AS
+      CURSOR c_rubriek
+      IS
+         SELECT bgt_kostenrubriek_key
+           FROM bgt_kostenrubriek
+          WHERE bgt_project_key = p_key;
+      v_code            bgt_project.bgt_project_code%TYPE;
+      v_omschrijving    bgt_project.bgt_project_omschrijving%TYPE;
+      v_volgnr          bgt_project.bgt_project_volgnr%TYPE;
+      v_prijspeildatum  bgt_project.bgt_project_prijspeildatum%TYPE;
+      v_info            bgt_project.bgt_project_info%TYPE;
+      v_notes           bgt_project.bgt_project_notes%TYPE;
+   BEGIN
+      IF p_key IS NOT NULL
+      THEN
+         IF p_parent_info
+         THEN
+            create_bgt_ancestor_node('project', p_key);
+         END IF;
+         --
+         SELECT bgt_project_code
+              , bgt_project_omschrijving
+              , bgt_project_volgnr
+              , bgt_project_prijspeildatum
+              , bgt_project_info
+              , bgt_project_notes
+           INTO v_code
+              , v_omschrijving
+              , v_volgnr
+              , v_prijspeildatum
+              , v_info
+              , v_notes
+           FROM bgt_project
+          WHERE bgt_project_key = p_key;
+         createopentag ('project');
+         createxmltagvalue ('key', mynumbertochar (p_key));
+         createxmltagvalue ('code', v_code);
+         createxmltagvalue ('name', v_omschrijving);
+         createxmltagvalue ('sequence', mynumbertochar (v_volgnr));
+         mydatetochar ('priceleveldate', v_prijspeildatum);
+         createxmltagvalue ('info', v_info);
+         createxmltagvalue ('notes', v_notes);
+         FOR rec1 IN c_rubriek
+         LOOP
+            create_bgt_kostenrubriek_node (rec1.bgt_kostenrubriek_key);
+         END LOOP;
+         createclosetag ('project');
+      END IF;
+   END;
+   PROCEDURE create_bgt_discipline_node (p_key IN NUMBER)
+   AS
+      CURSOR c_project
+      IS
+         SELECT bgt_project_key
+           FROM bgt_project
+          WHERE ins_discipline_key = p_key;
+      v_omschrijving   ins_tab_discipline.ins_discipline_omschrijving%TYPE;
+      v_opmerking      ins_tab_discipline.ins_discipline_opmerking%TYPE;
+      v_code           bgt_disc_params.bgt_disc_params_code%TYPE;
+      v_opdrachtgever  bgt_disc_params.bgt_disc_params_opdrachtgever%TYPE;
+      v_startdatum     bgt_disc_params.bgt_disc_params_startdatum%TYPE;
+   BEGIN
+      IF p_key IS NOT NULL
+      THEN
+         SELECT d.ins_discipline_omschrijving
+              , d.ins_discipline_opmerking
+              , p.bgt_disc_params_code
+              , p.bgt_disc_params_opdrachtgever
+              , p.bgt_disc_params_startdatum
+           INTO v_omschrijving
+              , v_opmerking
+              , v_code
+              , v_opdrachtgever
+              , v_startdatum
+           FROM ins_tab_discipline d
+              , bgt_disc_params p
+          WHERE d.ins_discipline_key = p.bgt_ins_discipline_key
+            AND d.ins_discipline_key = p_key;
+         createopentag ('discipline');
+         createxmltagvalue ('key', mynumbertochar (p_key));
+         createxmltagvalue ('code', v_code);
+         createxmltagvalue ('name', v_omschrijving);
+         createxmltagvalue ('remark', v_opmerking);
+         createxmltagvalue ('principal', v_opdrachtgever);
+         mydatetochar ('startdate', v_startdatum);
+         FOR rec1 IN c_project
+         LOOP
+            create_bgt_project_node (rec1.bgt_project_key);
+         END LOOP;
+         createclosetag ('discipline');
+      END IF;
+   END;
+   PROCEDURE create_bgt_node (p_key IN NUMBER, p_where IN VARCHAR2)
+   AS
+   BEGIN
+      createopentag('start_in');
+      createxmltagvalue ('node', p_where);
+      createclosetag('start_in');
+      CASE p_where
+         WHEN 'discipline'         THEN create_bgt_discipline_node(p_key);
+         WHEN 'project'            THEN create_bgt_project_node(p_key, TRUE);
+         WHEN 'kostenrubriek'      THEN create_bgt_kostenrubriek_node(p_key, TRUE);
+         WHEN 'kostengroep'        THEN create_prs_kostensoortgrp_node(p_key, TRUE);
+         WHEN 'kostensoort'        THEN create_prs_kostensoort_node(p_key, TRUE);
+         ELSE create_bgt_discipline_node(-1);
+      END CASE;
+   END;
+
    PROCEDURE xml_node (p_xmlnode     IN VARCHAR2,
                        p_key         IN NUMBER,
                        p_custid      IN VARCHAR2,
@@ -8577,6 +8978,10 @@ AS
                                            p_key,
                                            FALSE,
                                            p_concise);
+         WHEN 'budget'
+         THEN
+--            create_bgt_discipline_node (p_key);
+            create_bgt_node (p_key, p_where);
          ELSE
             v_sql_stmt :=
                   'BEGIN '

FAC/FAC_SEQ.SRC

@@ -40,11 +40,16 @@ CREATE SEQUENCE fac_s_fac_widget_key            MINVALUE 1;
 CREATE SEQUENCE fac_s_fac_code2label_key        MINVALUE 1;
 CREATE SEQUENCE imp_s_imp_log_key               MINVALUE 1;
 CREATE SEQUENCE fac_s_fac_api_key               MINVALUE 1;
+CREATE SEQUENCE fac_s_fac_audit_key             MINVALUE 1;
 CREATE SEQUENCE faq_s_faq_kenmerk_key           MINVALUE 1;
 CREATE SEQUENCE faq_s_faq_kenmerkwaarde_key     MINVALUE 1;
 CREATE SEQUENCE faq_s_fac_gui_counter_key       MINVALUE 1;
 CREATE SEQUENCE fac_s_fac_email_setting_key     MINVALUE 1;
 CREATE SEQUENCE fac_s_fac_idp_key               MINVALUE 1;
+CREATE SEQUENCE fac_s_fac_bookmark_key          MINVALUE 1;
+CREATE SEQUENCE fac_s_fac_qvw_ticket_key        MINVALUE 1;
+CREATE SEQUENCE fac_s_fac_session_key           MINVALUE 1;
+CREATE SEQUENCE fac_s_fac_sequence_key          MINVALUE 1;
 
 -- Some free to use sequence to generate unique and sequential numbers
 -- with custom procedures like exports or invoicing

FAC/FAC_SET.SRC

@@ -73,6 +73,7 @@ DEFINE_SETTING('FAC', 0001, 'WEB_FACFAC', 'flex_X_is_URL'
 DEFINE_SETTING('FAC', 0001, 'WEB_PRSSYS', 'fac_tabframes'                         , 'number'                     , '0'                            , 'Turn all subframes into tabs')
 DEFINE_SETTING('FAC', 0001, 'WEB_FACTAB', 'fac_accept_terms'                      , 'number'                     , '0'                            , '0 (default) no accept, 1=must accept L("lcl_terms_filename")')
 DEFINE_SETTING('FAC', 0001, 'WEB_PRSSYS', 'menu_start_open'                       , 'boolean'                     , 'true'                        , 'Menu is open by default')
+DEFINE_SETTING('FAC', 0001, 'WEB_PRSSYS', 'portalmenu_combine_single'             , 'boolean'                     , 'false'                       , 'If a portalmenukop consists of 1 item, should the image be moved in between the menukop and the menuitem?')
 DEFINE_SETTING('FAC', 0001, 'WEB_PRSSYS', 'menu_collapse_threshold'               , 'number'                      , '5'                           , 'Max number menugroups in a tab before we will collapse')
 DEFINE_SETTING('FAC', 0001, 'WEB_PRSSYS', 'menu_tab_toggles_portalmenu'           , 'number'                      , '1'                           , 'Also activate corresponding portal_menu in body (1) or not (0)')
 DEFINE_SETTING('FAC', 0001, 'WEB_FACFAC', 'menu_image_path'                       , 'string'                      , NULL                          , 'relative! path to folder storing menu pictures and files')
@@ -108,6 +109,12 @@ DEFINE_SETTING('FAC', 0001, 'WEB_FACFAC', 'prs_password_hash_length'
 DEFINE_SETTING('FAC', 0001, 'WEB_FACFAC', 'prs_password_otp_window'               , 'number'                      , '60'                          , 'OTP windows (x seconds early/late allowed)')
 DEFINE_SETTING('FAC', 0001, 'WEB_FACFAC', 'prs_password_otp_window2'              , 'number'                      , '600'                         , 'OTP windows for resync (x seconds early/late allowed, future use)')
 DEFINE_SETTING('FAC', 0001, 'WEB_FACTAB', 'prs_password_otp_mode'                 , 'number'                      , '0'                           , 'OTP mode (0=off,1=prssys only, 2=everyone with password, 3=everyone)')
+
+DEFINE_SETTING('FAC', 0001, 'WEB_FACTAB', 'prs_login_lockout_delay'               , 'float'                       , '0.2'                         , 'Lockout seconds after each failed attempt (exponential)')
+DEFINE_SETTING('FAC', 0001, 'WEB_FACTAB', 'prs_login_lockout_delayfactor'         , 'float'                       , '2'                           , 'Exponent base for prs_login_lockout_delay')
+DEFINE_SETTING('FAC', 0001, 'WEB_FACTAB', 'prs_login_attempts'                    , 'number'                      , '5'                           , 'Lockout username after this many failed attempts')
+DEFINE_SETTING('FAC', 0001, 'WEB_FACTAB', 'prs_login_lockout_expire'              , 'number'                      , '15'                          , 'Lockout minutes after prs_login_attempts failed attempts')
+
 DEFINE_SETTING('FAC', 0001, 'WEB_FACFAC', 'prs_allow_impersonate'                 , 'boolean'                     , 'false'                       , 'Allow impersonation by PRSSYS')
 DEFINE_SETTING('FAC', 0001, 'WEB_PRSSYS', 'prs_personal_noti_options'             , 'number'                      , '15'                          , 'Options that are provided for personal notification overrules (+8:popup,+4:sms,+2:mail,+1:portal)')
 DEFINE_SETTING('FAC', 0001, 'WEB_PRSSYS', 'iconcolumns'                           , 'number'                      , '6'                           , 'number of columns in an iconmenu page.')
@@ -125,7 +132,7 @@ DEFINE_SETTING('FAC', 0001, 'WEB_PRSSYS', 'fac_firstlogin_expire'
 DEFINE_SETTING('FAC', 0001, 'WEB_PRSSYS', 'email_password'                        , 'number'                      , '0'                           , 'Show ''wachtwoord vergeten'' optie (1=voor mensen met wachtwoord, 2=voor iedereen)')
 DEFINE_SETTING('FAC', 0001, 'WEB_FACTAB', 'self_register'                         , 'number'                      , '0'                           , 'Can user self-register? ( 0 disable )')
 DEFINE_SETTING('FAC', 0001, 'WEB_FACTAB', 'self_register_expire'                  , 'number'                      , '60'                          , 'Minutes to respond to confirmation e-mail ( default 60 )')
-DEFINE_SETTING('FAC', 0001, 'WEB_FACTAB', 'self_register_groep_key'               , 'number'                      , '-1'                          , 'Default fac_groep for unconfirmed user. If >0 it overrules _DEFAULT groep')
+DEFINE_SETTING('FAC', 0001, 'WEB_FACTAB', 'self_register_groep_keys'              , 'array'                       , ''                            , 'Custom fac_groep options for the self_registerscreen, 1 option: auto pick that one, 2+ gives a dropdown menu')
 DEFINE_SETTING('FAC', 0001, 'WEB_FACTAB', 'self_register_srtperslid_key'          , 'number'                      , '-1'                          , 'Default srtperslid key')
 DEFINE_SETTING('FAC', 0001, 'WEB_FACTAB', 'self_register_afdeling_key'            , 'number'                      , '-1'                          , 'Default afdeling key')
 DEFINE_SETTING('FAC', 0001, 'WEB_FACTAB', 'self_register_email_whitelist'         , 'string'                      , ''                            , 'Regexp email-restriction eg. \@facilitor\.nl$')
@@ -258,9 +265,9 @@ DEFINE_SETTING('CAD', 0001, 'WEB_PRSSYS', 'fg_contourlayers_alt2'
 DEFINE_SETTING('CAD', 0001, 'WEB_PRSSYS', 'fg_labellayers_alt2'                   , 'string'                      , ''                            , NULL)
 DEFINE_SETTING('CAD', 0001, 'WEB_PRSSYS', 'fg_contour_minArea'                    , 'number'                      , '200010'                      , 'minimale mm2 om herkend te worden als ruimte (millimeter! dus)')
 DEFINE_SETTING('CAD', 0001, 'WEB_PRSSYS', 'fg_dwgscale'                           , 'float'                       , '1000'                        , 'AutoCAD Drawing scale units/meter (future use)')
-DEFINE_SETTING('CAD', 0001, 'WEB_PRSSYS', 'fg_mobile_thema'                       , 'number'                      , '12'                          , 'kleurthema om mobile te tonen')
-DEFINE_SETTING('CAD', 0001, 'WEB_PRSSYS', 'fg_mobile_label'                       , 'number'                      , '-1'                          , 'labelthema om mobile te tonen')
-DEFINE_SETTING('CAD', 0001, 'WEB_PRSSYS', 'fg_werkpleksymbool'                    , 'string'                      , 'WERKPLEK'                    , 'Moet in fg_symbols_path staan')
+DEFINE_SETTING('CAD', 0001, 'WEB_PRSSYS', 'fg_mobile_thema'                       , 'number'                      , '-1'                          , 'Fixed theme to use on Mobile plans (key, -1 = let user select theme)')
+DEFINE_SETTING('CAD', 0001, 'WEB_PRSSYS', 'fg_mobile_label'                       , 'number'                      , '-1'                          , 'Label theme to be used on Mobile plans (key)')
+DEFINE_SETTING('CAD', 0001, 'WEB_PRSSYS', 'fg_werkpleksymbool'                    , 'string'                      , 'WERKPLEK'                    , 'Symbol for workplace in Graphics, file must exist in fg_symbols_path')
 DEFINE_SETTING('CAD', 0001, 'WEB_PRSSYS', 'fg_publiclayers'                       , 'array'                       , ''                            , 'ins_disc_keys of layers visible without INSUSE')
 DEFINE_SETTING('ALG', 0001, 'WEB_FACTAB', 'alg_ruimtenr_aut_use'                  , 'number'                      , '0'                           , 'WEB_ALGUSE may change alg_ruimte_nr/omschrijving {0=WEB_ALGMAN required | 1=WEB_ALGUSE allowed too}')
 DEFINE_SETTING('ALG', 0001, 'WEB_FACFAC', 'alg_ruimte_comm_opp_key'               , 'number'                      , '-1'                          , 'Key to be used for commercial ruimte oppervlakte')
@@ -294,7 +301,7 @@ DEFINE_SETTING('CNT', 0001, 'WEB_PRSSYS', 'cnt_factuur_totaalmarge'
 DEFINE_SETTING('CNT', 0001, 'WEB_PRSSYS', 'cnt_internalnr_readonly'               , 'number'                      , '0'                           , 'Het interne contractnummer wordt automatisch bepaalt en is niet wijzigbaar')
 DEFINE_SETTING('CNT', 0001, 'WEB_PRSSYS', 'cnt_enable_kostensoort'                , 'number'                      , '1'                           , 'can contract kostensoort be changed?')
 DEFINE_SETTING('FAQ', 0001, 'WEB_FACTAB', 'faq_enabled'                           , 'number'                      , '0'                           , 'Is kennisbank available {0 | 1} licensed separately')
-DEFINE_SETTING('FAQ', 0001, 'WEB_PRSSYS', 'faq_max_results'                       , 'number'                      , '10'                          , 'Limit the result to this number')
+DEFINE_SETTING('FAQ', 0001, 'WEB_PRSSYS', 'faq_max_results'                       , 'number'                      , '25'                          , 'Limit the FAQ results to this number')
 DEFINE_SETTING('FAQ', 0001, 'WEB_PRSSYS', 'faq_kennisbank_popup'                  , 'number'                      , '3'                           , 'Show kennisbank popup {0=no | 01=1=FE | 10=2=FO | 11=3=FE+FO}')
 DEFINE_SETTING('FAC', 0001, 'WEB_FACFAC', 'iLearning_enabled'                     , 'number'                      , '0'                           , 'Is iLearning available {0 | 1} licensed separately')
 DEFINE_SETTING('FAC', 0001, 'WEB_FACTAB', 'kto_srtdiscipline_key'                 , 'number'                      , '-1'                          , 'key van KTO (klanttevredenheidsonderzoek) vakgroeptype')
@@ -331,11 +338,11 @@ DEFINE_SETTING('MLD', 0001, 'WEB_PRSSYS', 'mld_ord_show_cost'
 DEFINE_SETTING('MLD', 0001, 'WEB_PRSSYS', 'mld_ord_show_ordernr'                  , 'number'                      , '0'                           , 'show ordernr field for orders {0=don''t show(&use mld_melding_ordernr) | 1=show}')
 DEFINE_SETTING('MLD', 0001, 'WEB_PRSSYS', 'mld_ord_show_kostenplaats'             , 'number'                      , '1'                           , 'show kostenplaats field for orders {0=don''t show | 1=editable | 2=show}')
 DEFINE_SETTING('MLD', 0001, 'WEB_PRSSYS', 'mld_ord_change_type'                   , 'number'                      , '1'                           , 'Can change opdr_type (0=no, 1=yes, 2=undefined)')
+DEFINE_SETTING('MLD', 0001, 'WEB_PRSSYS', 'mld_opdr_show_requestor_in_list'       , 'number'                      , '1'                           , 'Show requestor (melder) column in opdr search list {0=no | 1=print only | 2=view only | 3=both}')
 DEFINE_SETTING('MLD', 0001, 'WEB_FACTAB', 'mld_contract_startdate_key'            , 'number'                      , '-1'                          , 'key of flex prop in rental contract mutation call')
 DEFINE_SETTING('MLD', 0001, 'WEB_PRSSYS', 'mld_enable_workflow'                   , 'number'                      , '1'                           , 'enable workflow in call handling {0=workflow disabled | 1=workflow enabled }')
 DEFINE_SETTING('MLD', 0001, 'WEB_PRSSYS', 'mld_notify_workflowsteps'              , 'number'                      , '1'                           , 'Notify each workflowstep to caller {0=do not notify steps (blackbox) | 1=notify each step (whitebox)}')
 DEFINE_SETTING('MLD', 0001, 'WEB_PRSSYS', 'mld_close_opdr_default'                , 'number'                      , '0'                           , 'De checkbox met de vraag of de open opdrachten ook afgemeld moeten worden is standaard niet(0=default) of wel(1) aangevinkt')
-DEFINE_SETTING('MLD', 0001, 'WEB_FACTAB', 'mld_contract_no_renter_key'            , 'number'                      , '-1'                          , 'Key of company to indicate that the contract - room relation (CNT_CONTRACT_ONRGOED) can be removed')
 DEFINE_SETTING('MLD', 0001, 'WEB_PRSSYS', 'mld_bo_sort_descending'                , 'number'                      , '0'                           , 'Sort ordering of mld_melding for BO (0 = most urgent first | 1 = last made first );')
 DEFINE_SETTING('MLD', 0001, 'WEB_PRSSYS', 'mld_max_history'                       , 'number'                      , '0'                           , 'Show calls and orders not longer then mld_max_history days ago (FE/FO/BO) ((mld_max_history <= 0) : show all finished calls and orders (default))')
 DEFINE_SETTING('MLD', 0001, 'WEB_PRSSYS', 'mld_melding_close'                     , 'number'                      , '0'                           , 'Can close complain with orders in complain overview window without seeing complain details? {0=yes default | 1=no}')
@@ -361,12 +368,15 @@ DEFINE_SETTING('MLD', 0001, 'WEB_PRSSYS', 'mld_uren_omschrijving'
 DEFINE_SETTING('MLD', 0001, 'WEB_PRSSYS', 'mld_uren_more'                         , 'boolean'                     , 'true'                        , 'Overige opdrachten mogen ook getoond worden {true=link tonen (care) | false=link niet tonen}')
 DEFINE_SETTING('MLD', 0001, 'WEB_PRSSYS', 'mld_enforce_orderdates'                , 'number'                      , '0'                           , 'Enforce order start/ending dates to be within call start/ending dates')
 DEFINE_SETTING('MLD', 0001, 'WEB_PRSSYS', 'mld_afhandeling_required_for_close'    , 'number'                      , '0'                           , 'Het veld afhandeling verplicht bij het afmelden van een melding (0=no, 1=yes)')
+DEFINE_SETTING('MLD', 0001, 'WEB_PRSSYS', 'mld_afhandeling_restrict_edit'         , 'number'                      , '0'                           , 'Het veld afhandeling alleen in te vullen bij afmelden/afwijzen (0=no, 1=yes)')
+DEFINE_SETTING('MLD', 0001, 'WEB_PRSSYS', 'mld_omschrijving_restrict_edit'        , 'number'                      , '0'                           , 'Het veld omschrijving alleen in te vullen als nog te accepteren (0=no, 1=yes)')
 DEFINE_SETTING('MLD', 0001, 'WEB_PRSSYS', 'mld_suppress_directklaar_notification' , 'number'                      , '0'                           , 'Suppress de notificatie bij DirectKlaar {0=no (default) | 1=yes}')
 DEFINE_SETTING('MLD', 0001, 'WEB_PRSSYS', 'mld_forward_if_active'                 , 'number'                      , '0'                           , 'A melding can be forwarded until status accept (0) of until afgemeld (1).')
 DEFINE_SETTING('MLD', 0001, 'WEB_PRSSYS', 'mld_allow_for_others'                  , 'number'                      , '0'                           , 'Can i make calls for others ? {0=no | 1=yes}')
 DEFINE_SETTING('MLD', 0001, 'WEB_PRSSYS', 'mld_allow_parentmelding'               , 'number'                      , '0'                           , 'Allow attaching a call to another manually (0=not | 1=allow)')
 DEFINE_SETTING('MLD', 0001, 'WEB_PRSSYS', 'mld_ord_afmeld_future'                 , 'number'                      , '1'                           , 'Opdracht einddatum niet controleren bij afmelden {0=opdracht einddatum mag niet in de toekomst liggen, 1=default niets controleren)')
 DEFINE_SETTING('MLD', 0001, 'WEB_PRSSYS', 'mld_show_endtime'                      , 'number'                      , '1'                           , 'Show endtime for complaints (0=only date, 1=with endtime)')
+DEFINE_SETTING('MLD', 0001, 'WEB_PRSSYS', 'mld_endate_ordbo2'                     , 'number'                      , '1'                           , 'Enddate can be editted by MLDORD/ORDBO2 {0=no | 1=yes (default}')
 DEFINE_SETTING('MLD', 0001, 'WEB_FACTAB', 'mld_ordermaterial_fac_usrtab_key'      , 'number'                      , '-1'                          , 'fac_usrtab_key of ordermaterials')
 DEFINE_SETTING('MLD', 0001, 'WEB_FACTAB', 'mld_ordermaterial_editable'            , 'boolean'                     , 'true'                        , 'ordermaterials can be edited (true) or are always readonly/remotely managed (false)')
 DEFINE_SETTING('MLD', 0001, 'WEB_PRSSYS', 'mld_accept_confirm'                    , 'boolean'                     , 'false'                       , 'bij accepteren melding direct afhandelingsveld invullen')
@@ -375,6 +385,7 @@ DEFINE_SETTING('MLD', 0001, 'WEB_FACTAB', 'mld_opdr_minuren'
 DEFINE_SETTING('MLD', 0001, 'WEB_PRSSYS', 'mld_melding_flags'                     , 'number'                      , '0'                           , 'Number of flags fo/bo can define on complaint. Max 10')
 DEFINE_SETTING('MLD', 0001, 'WEB_PRSSYS', 'mld_flag_on_fenote'                    , 'number'                      , '0'                           , 'Set/Clear this mld_melding_flag when the FOBO/caller saves a note {0=no flag}')
 DEFINE_SETTING('MLD', 0001, 'WEB_PRSSYS', 'mld_flag_on_bonote'                    , 'number'                      , '0'                           , 'Value of flag when BO has to read note')
+DEFINE_SETTING('MLD', 0001, 'WEB_PRSSYS', 'mld_note_default_notifyFE'             , 'number'                      , '0'                           , 'Default value for checkbox "Actie bij melder zetten" for notes {0=Nee(default) | 1=Ja}')
 DEFINE_SETTING('MLD', 0001, 'WEB_PRSSYS', 'mld_forward_opm_flags'                 , 'number'                      , '0'                           , 'remark/reason is required when forwarded {to comment field: 0=No(default) | 1=Yes | to note field: 2=No | 3=Yes}.')
 DEFINE_SETTING('MLD', 0001, 'WEB_FACFAC', 'mlds_image_path'                       , 'string'                      , NULL                          , 'path to folder storing stdmelding symbols pictures')
 DEFINE_SETTING('MLD', 0001, 'WEB_PRSSYS', 'mld_add_mldopmerk_on_opdrclose'        , 'number'                      , '0'                           , 'Automatically copy remark from order to call when supplier close last order {1=Yes | 0=No}')
@@ -393,6 +404,7 @@ DEFINE_SETTING('MLD', 0001, 'WEB_PRSSYS', 'mld_edit_layout'
 DEFINE_SETTING('MLD', 0001, 'WEB_PRSSYS', 'cnt_autolink_regexp'                   , 'string'                      , ''                            , 'Automatically turn CNT-references in texts into clickable links eg. (?:(?:contract [A-Z]*)|(?:[A-Z \,\n]+\#[A-Z]*))(\d+)')
 DEFINE_SETTING('MLD', 0001, 'WEB_PRSSYS', 'mld_continue_edit_issuer'              , 'boolean'                     , 'false'                       , 'Edit the issuer false= (default) of a continued complain')
 DEFINE_SETTING('MLD', 0001, 'WEB_PRSSYS', 'nightly_mld2bo_emailaddress'           , 'string'                      , ''                            , 'Notification email address outside office hours')
+DEFINE_SETTING('MLD', 0001, 'WEB_PRSSYS', 'mld_show_cards'                        , 'number'                      , '5'                           , 'Number of order cards shown under a contractor in order plan board {nn=number | -1=all}')
 DEFINE_SETTING('PRS', 0001, 'WEB_PRSSYS', 'prs_h'                                 , 'float'                       , '0.25'                        , 'Employability time stepsize')
 DEFINE_SETTING('PRS', 0001, 'WEB_PRSSYS', 'prs_t1'                                , 'float'                       , '8'                           , 'Employability day start (hour)')
 DEFINE_SETTING('PRS', 0001, 'WEB_PRSSYS', 'prs_t2'                                , 'float'                       , '18'                          , 'Employability day end (hour)')
@@ -444,7 +456,7 @@ DEFINE_SETTING('INS', 0001, 'WEB_PRSSYS', 'ins_flex_uitgifte_empty'
 DEFINE_SETTING('INS', 0001, 'WEB_PRSSYS', 'ins_occupationsensors_srtgroep_key'    , 'number'                      , '-1'                          , 'INS_SRTGROEP_KEY of sensor objects to be used for occupation/availability')
 DEFINE_SETTING('INS', 0001, 'WEB_PRSSYS', 'ins_explode_objects'                   , 'number'                      , '1'                           , 'Explode the nummer of (new) object {0=no | 1=yes (default)}')
 DEFINE_SETTING('INS', 0001, 'WEB_PRSSYS', 'ins_xcp_active_cost'                   , 'number'                      , '15'                          , 'Active cost fields used/shown {+1=kosten, +2=kosten2, +4=kosten3, +8=materiaal}')
-DEFINE_SETTING('INS', 0001, 'WEB_PRSSYS', 'ins_auth_obj_lendout'                  , 'number'                      , '0'                           , 'Authorization scope for objects which are lent out {0=owner(borrower) (default) | 1=basic place/owner}')
+DEFINE_SETTING('INS', 0001, 'WEB_PRSSYS', 'ins_auth_obj_lendout'                  , 'number'                      , '0'                           , 'Authorization scope for objects which are lent out for lending registration (INSFOF/fo) {0=owner(borrower) (default) | 1=basic place/owner}')
 DEFINE_SETTING('FAC', 0001, 'WEB_FACFAC', 'mjb_enabled'                           , 'number'                      , '0'                           , 'Is MJOB module available {0 | 1}')
 DEFINE_SETTING('INS', 0001, 'WEB_PRSSYS', 'mjb_inflation'                         , 'float'                       , '1'                           , 'Default inflation mjob')
 DEFINE_SETTING('INS', 0001, 'WEB_PRSSYS', 'mjb_show_years'                        , 'number'                      , '5'                           , 'Default number of years which should be shown in the MJOB console')
@@ -554,7 +566,8 @@ DEFINE_SETTING('BEZ', 0001, 'WEB_PRSSYS', 'bez_bo_orderby'
 DEFINE_SETTING('BEZ', 0001, 'WEB_PRSSYS', 'bez_gastheer_telfnr'                   , 'number'                      , '1'                           , 'In bezoekersbalie telfoon nummer van gastheer ook tonen { 0=Nee | 1=Ja}')
 DEFINE_SETTING('BEZ', 0001, 'WEB_PRSSYS', 'bez_max_flex_on_line'                  , 'number'                      , '0'                           , 'Max aantal flexkenmerken op een bezoekersregel')
 DEFINE_SETTING('BEZ', 0001, 'WEB_PRSSYS', 'bez_use_buildinghours'                 , 'number'                      , '0'                           , 'Gebouwtijden als tijdgrenzen van afspraken gebruiken {0=Nee (default), 1=Ja}')
-DEFINE_SETTING('BEZ', 0001, 'WEB_PRSSYS', 'vis_remark'                            , 'number'                      , '0'                           , 'Show field remark for visitor {0=dont show | 1=show | 2=show at register visitor}')
+DEFINE_SETTING('BEZ', 0001, 'WEB_PRSSYS', 'vis_remark'                            , 'number'                      , '0'                           , 'Show field remark for visitor {0=dont show | 1=show | 2=show at register visitor | 3=readonly}')
+DEFINE_SETTING('BEZ', 0001, 'WEB_PRSSYS', 'bez_show_resname'                      , 'boolean'                     , 'false'                       , 'Show room name instead of real estate name {false=show real estate name | true=show room name}')
 DEFINE_SETTING('SLE', 0001, 'WEB_PRSSYS', 'cil_ins_srt_groep_key'                 , 'number'                      , '-1'                          , 'INS_SRTDEEL_KEY of object type Cylinders')
 DEFINE_SETTING('SLE', 0001, 'WEB_PRSSYS', 'sle_ins_srt_groep_key'                 , 'number'                      , '-1'                          , 'INS_SRTDEEL_KEY of object type Keys')
 DEFINE_SETTING('SLE', 0001, 'WEB_PRSSYS', 'sle_cil_koppelen'                      , 'number'                      , '1'                           , 'Sleutels en cilinders zijn door bo handmatig te koppelen {0=nee, 1=ja(default)}')
@@ -579,6 +592,7 @@ DEFINE_SETTING('MLD', 0001, 'WEB_PRSSYS', 'mld_photo_size'
 DEFINE_SETTING('RES', 0001, 'WEB_PRSSYS', 'res_photo_size'                        , 'string'                      , 'r512x512'                    , 'Resize uploads to this maximum RES photo size. Ex: r200x150')
 DEFINE_SETTING('MRK', 0001, 'WEB_PRSSYS', 'mrk_photo_size'                        , 'string'                      , 'r512x512'                    , 'Resize uploads to this maximum MRK photo size. Ex: r200x150')
 DEFINE_SETTING('MLD', 0001, 'WEB_PRSSYS', 'mld_disable_continuation'              , 'boolean'                     , 'false'                       , 'Disable creating continuation calls { false | true }')
+DEFINE_SETTING('MLD', 0001, 'WEB_PRSSYS', 'mld_afrond_canflex'                    , 'boolean'                     , 'false'                       , 'Change flex of completed issue with MLDAFR ')
 DEFINE_SETTING('FAC', 0001, 'WEB_FACFAC', 'fac_api_key_in_url'                    , 'boolean'                     , 'false'                       , 'Is APIKEY= in url also allowed (unsafe)? Default is header X-FACILITOR-API-Key only')
 DEFINE_SETTING('FAC', 0001, 'WEB_FACFAC', 'fac_api_allow_impersonate'             , 'boolean'                     , 'false'                       , 'Allow impersonation through X-FACILITOR-Switch-user (future use)')
 DEFINE_SETTING('FAC', 0001, 'WEB_PRSSYS', 'fac_api_limit'                         , 'number'                      , '100'                         , 'Default maximum number of records to return using the REST API')
@@ -596,6 +610,7 @@ DEFINE_SETTING('FAC', 0001, 'WEB_FACFAC', 'fac_usrrap_safe_view_regexp'
 DEFINE_SETTING('MLD', 0001, 'WEB_PRSSYS', 'show_perslidselector_by_mail'          , 'number'                      , '1'                           , 'Show person selector at sending mail {1=true | 0=false}')
 DEFINE_SETTING('FAC', 0001, 'WEB_FACFAC', 'basic_auth_realm'                      , 'string'                      , ''                            , 'Realm for Basic Authentication (API only) (future use)')
 DEFINE_SETTING('FAC', 0001, 'WEB_PRSSYS', 'auth_edit_advanced'                    , 'boolean'                     , 'false'                       , 'Start autorisation popup dialog in advanced mode')
+DEFINE_SETTING('BGT', 0001, 'WEB_FACTAB', 'bgt_enabled'                           , 'number'                      , '0'                           , 'Is FACILITOR Budgetting module available {0 | 1}')
 
 DEFINE_SETTING('FAC', 0001, 'WEB_PRSSYS', 'udr_graph_default_json'                , 'string'                      , ''                            , 'Default json options for report graphs (string!)')
 DEFINE_SETTING('FAC', 0001, 'WEB_PRSSYS', 'udr_graph_gauge_colors'                , 'string'                      , '[''red'',''orange'',''green'']' , 'Colors being used for gaugemeter charts (string!)')
@@ -605,16 +620,24 @@ DEFINE_SETTING('FAC', 0001, 'WEB_PRSSYS', 'udr_graph_colors2'
 
 DEFINE_SETTING('FAC', 0001, 'WEB_PRSSYS', 'inline_actions_hamburger'              , 'number'                      , '0'                           , 'Use a hamburger-icon to view the inline actions {0=No | 1=Yes, onClick | 2=Yes, onMouseOver}')
 
+DEFINE_SETTING('FAC', 0001, 'WEB_PRSSYS', 'buttons_in_hamburger'                  , 'array'                       , 'print.png,email.png,csv.png,fa-print,excel.png,fa-table,fa-refresh,page_refresh.png,legenda.png', 'Hide these frameheader buttons behind a hamburger.')
+
 DEFINE_SETTING('FAC', 0001, 'WEB_PRSSYS', 'show_header_productsearch'             , 'boolean'                     , 'true'                        , 'Display the product search bar in the header')
 
 DEFINE_SETTING('PDA', 0001, 'WEB_PRSSYS', 'pda_list_show_filter_from'             , 'number'                      , '7'                           , 'PDA result sets will include a filter from this many results on')
 
+DEFINE_SETTING('FAC', 0001, 'WEB_FACTAB', 'fac_reserved_number1'                  , 'number'                      , '0'                           , 'reserved_number1 (reserved and unused)')
+DEFINE_SETTING('FAC', 0001, 'WEB_FACTAB', 'fac_reserved_number2'                  , 'number'                      , '0'                           , 'reserved_number2 (reserved and unused)')
+DEFINE_SETTING('FAC', 0001, 'WEB_FACTAB', 'fac_reserved_string1'                  , 'string'                      , ''                            , 'reserved_string1 (reserved and unused)')
+DEFINE_SETTING('FAC', 0001, 'WEB_FACTAB', 'fac_reserved_string2'                  , 'string'                      , ''                            , 'reserved_string2 (reserved and unused)')
+
 /*
  *
  *      The GENERAL SETTINGS (will be extended in future)
  *
  */
 DEFINE_SETTING('FAC', 0000, 'WEB_FACFAC', 'fac_logfilename',  'string', '', 'Logfile name') // default leeg, pvalue komt achteraan dit bestand
+DEFINE_SETTING('FAC', 0000, 'WEB_FACFAC', 'fac_server_timezone',  'string', 'Europe/Amsterdam', 'The timezone of the database-server')
 
 DEFINE_SETTING('FAC', 0001, 'WEB_FACTAB', 'fac_t_startofworkday', 'float',  '8', 'Start time (hour, decimal) of a working day')
 DEFINE_SETTING('FAC', 0001, 'WEB_FACTAB', 'fac_t_endofworkday' ,  'float', '17', 'End time (hour, decimal) of a working day')
@@ -692,10 +715,10 @@ DEFINE_SETTING('PUO', 0001, 'WEB_FACTAB', 'puo_usesenderasreplyto'     , 'boolea
 DEFINE_SETTING('PUO', 0001, 'WEB_FACTAB', 'puo_receiptto'              , 'string'  , ''                                          , 'Address to send the receipt confirmation to for ORDERS only')
 DEFINE_SETTING('PUO', 0001, 'WEB_FACTAB', 'puo_cc'                     , 'string'  , ''                                          , 'Copy email address for ORDERS only')
 DEFINE_SETTING('PUO', 0001, 'WEB_FACTAB', 'puo_bcc'                    , 'string'  , ''                                          , 'Blind copy email address for ORDERS only')
-DEFINE_SETTING('PUO', 0000, 'WEB_FACTAB', 'puo_loglevel'               , 'number'  , '1'                                         , 'Level of logging (0-3) for troubleshooting purposes')
-DEFINE_SETTING('PUO', 0000, 'WEB_FACTAB', 'puo_connectionflag'         , 'number'  , '0'                                         , 'INTERNET_FLAG_PASSIVE = 0x8000000, else = 0')
-DEFINE_SETTING('PUO', 0000, 'WEB_FACTAB', 'puo_useproxy'               , 'boolean' , 'false'                                     , 'true = Use Proxy Server (recognizes TIS FTP gateway only), false = don''t use Proxy')
-DEFINE_SETTING('PUO', 0000, 'WEB_FACTAB', 'puo_proxyserveripaddress'   , 'string'  , '127.0.0.1:8888'                            , 'Proxy Server IP Address, only used when UseProxy = true')
+DEFINE_SETTING('PUO', 0001, 'WEB_FACTAB', 'puo_loglevel'               , 'number'  , '1'                                         , 'Level of logging (0-3) for troubleshooting purposes')
+DEFINE_SETTING('PUO', 0001, 'WEB_FACTAB', 'puo_connectionflag'         , 'number'  , '0'                                         , 'INTERNET_FLAG_PASSIVE = 0x8000000, else = 0')
+DEFINE_SETTING('PUO', 0001, 'WEB_FACTAB', 'puo_useproxy'               , 'boolean' , 'false'                                     , 'true = Use Proxy Server (recognizes TIS FTP gateway only), false = don''t use Proxy')
+DEFINE_SETTING('PUO', 0001, 'WEB_FACTAB', 'puo_proxyserveripaddress'   , 'string'  , '127.0.0.1:8888'                            , 'Proxy Server IP Address, only used when UseProxy = true')
 DEFINE_SETTING('PUO', 0001, 'WEB_FACTAB', 'puo_logdestination'         , 'number'  , '1'                                         , 'Where to log: 1=file, 2 = database, 3=both')
 DEFINE_SETTING('PUO', 0001, 'WEB_FACTAB', 'puo_emergencymailaddress'   , 'string'  , ''                                          , 'Fallback e-mail address if database cannot be reached')
 DEFINE_SETTING('PUO', 0001, 'WEB_FACTAB', 'puo_custorders'             , 'boolean' , 'false'                                     , 'true = use customer orderqueue')
@@ -709,16 +732,17 @@ DEFINE_SETTING('PUO', 0001, 'WEB_FACTAB', 'puo_smsaccount'             , 'string
 DEFINE_SETTING('PUO', 0001, 'WEB_FACTAB', 'puo_uid'                    , 'string'  , ''                                          , 'SMS provider user id')
 DEFINE_SETTING('PUO', 0001, 'WEB_FACTAB', 'puo_pwd'                    , 'string'  , ''                                          , 'SMS provider user password')
 DEFINE_SETTING('PUO', 0001, 'WEB_FACTAB', 'puo_replyphone'             , 'string'  , 'FACILITOR'                                 , 'Include country code')
-DEFINE_SETTING('PUO', 0000, 'WEB_FACTAB', 'puo_sendusing'              , 'number'  , '1'                                         , '1=cdoSendUsingPickup (IIS SMTP Service must be installed), 2=cdoSendUsingPort')
-DEFINE_SETTING('PUO', 0000, 'WEB_FACTAB', 'puo_smtpserver'             , 'string'  , ''                                          , 'Server when sendusing cdoSendUsingPort')
-DEFINE_SETTING('PUO', 0000, 'WEB_FACTAB', 'puo_smtpserverport'         , 'number'  , '25'                                        , 'Serverport when sendusing cdoSendUsingPort')
-DEFINE_SETTING('PUO', 0000, 'WEB_FACTAB', 'puo_smtpconnectiontimeout'  , 'number'  , '30'                                        , 'SMTP timeout in seconds (future use)')
-DEFINE_SETTING('PUO', 0000, 'WEB_FACTAB', 'puo_smtpusessl'             , 'boolean' , 'false'                                     , 'Use SSL when sending to port (future use)')
-DEFINE_SETTING('PUO', 0000, 'WEB_FACTAB', 'puo_smtpauthenticate'       , 'number'  , '0'                                         , 'Authentication when sendusing cdoSendUsingPort 0=cdoAnonymous, 1=cdoBasic, 2=cdoNTLM')
-DEFINE_SETTING('PUO', 0000, 'WEB_FACTAB', 'puo_sendusername'           , 'string'  , ''                                          , 'Username when puo_smtpauthenticate=cdoBasic')
+DEFINE_SETTING('PUO', 0001, 'WEB_FACTAB', 'puo_sendusing'              , 'number'  , '1'                                         , '1=cdoSendUsingPickup (IIS SMTP Service must be installed), 2=cdoSendUsingPort')
+DEFINE_SETTING('PUO', 0001, 'WEB_FACTAB', 'puo_smtpserver'             , 'string'  , ''                                          , 'Server when sendusing cdoSendUsingPort')
+DEFINE_SETTING('PUO', 0001, 'WEB_FACTAB', 'puo_smtpserverport'         , 'number'  , '25'                                        , 'Serverport when sendusing cdoSendUsingPort')
+DEFINE_SETTING('PUO', 0001, 'WEB_FACTAB', 'puo_smtpconnectiontimeout'  , 'number'  , '30'                                        , 'SMTP timeout in seconds (future use)')
+DEFINE_SETTING('PUO', 0001, 'WEB_FACTAB', 'puo_smtpusessl'             , 'boolean' , 'false'                                     , 'Use SSL when sending to port (future use)')
+DEFINE_SETTING('PUO', 0001, 'WEB_FACTAB', 'puo_smtpauthenticate'       , 'number'  , '0'                                         , 'Authentication when sendusing cdoSendUsingPort 0=cdoAnonymous, 1=cdoBasic, 2=cdoNTLM')
+DEFINE_SETTING('PUO', 0001, 'WEB_FACTAB', 'puo_sendusername'           , 'string'  , ''                                          , 'Username when puo_smtpauthenticate=cdoBasic')
 DEFINE_SETTING('PUO', 0000, 'WEB_FACTAB', 'puo_sendpassword'           , 'string'  , ''                                          , 'Password when puo_smtpauthenticate=cdoBasic')
 DEFINE_SETTING('PUO', 0001, 'WEB_FACTAB', 'puo_flags'                  , 'number'  , '255'                                       , '+1=send notifications, +2=send orders, +4=all orders Immediate')
 DEFINE_SETTING('PUO', 0001, 'WEB_FACTAB', 'puo_order_flexfiles'        , 'number'  , '0'                                         , 'Include flexfiles with sent orders')
+DEFINE_SETTING('PUO', 0001, 'WEB_FACTAB', 'puo_apppushurl'             , 'string'  , ''                                          , 'URL for pushing APP notifications')
 DEFINE_SETTING('PUO', 0001, 'WEB_FACTAB', 'bdradrfiles_path'           , 'string'  , NULL                                        , 'Technische adressen bijlagen folder')
 DEFINE_SETTING('PUO', 0001, 'WEB_FACTAB', 'puo_lcl_friendly_mailto'    , 'string'  , 'Opdracht per e-mail gestuurd naar {0}'     , 'Friendly text for mail tracking')
 DEFINE_SETTING('PUO', 0001, 'WEB_PRSSYS', 'puo_lcl_friendly_http'      , 'string'  , 'Opdracht per SOAP gestuurd naar {0}'       , 'Friendly text for http tracking')
@@ -726,6 +750,8 @@ DEFINE_SETTING('PUO', 0001, 'WEB_PRSSYS', 'puo_lcl_friendly_ftp'       , 'string
 DEFINE_SETTING('PUO', 0001, 'WEB_PRSSYS', 'puo_lcl_friendly_file'      , 'string'  , 'Opdracht naar bestand in {0} gestuurd'     , 'Friendly text for file tracking')
 DEFINE_SETTING('PUO', 0001, 'WEB_FACTAB', 'puo_fclt_web_url'           , 'string'  , ''                                          , 'Url to the FACILITOR software (webserver internal address)')
 DEFINE_SETTING('PUO', 0001, 'WEB_FACTAB', 'puo_fclt_web_apikey'        , 'string'  , ''                                          , 'Putorders APIKEY to the FACILITOR software')
+DEFINE_SETTING('PUO', 0001, 'WEB_FACTAB', 'puo_sendtimeout'            , 'number'  , '30'                                        , 'Default send timeout for http-communication. Increase for large attachments')
+DEFINE_SETTING('PUO', 0001, 'WEB_FACTAB', 'puo_receivetimeout'         , 'number'  , '30'                                        , 'Default receive timeout for http-communication. Increase for slow servers')
 
 // Vervallen settings opruimen
 DELETE FROM fac_setting

FAC/FAC_TAB.SRC

@@ -66,21 +66,6 @@ CREATE_TABLE (fac_rapport,0)
     CONSTRAINT fac_u_fac_rapport UNIQUE(fac_rapport_node, fac_rapport_volgnr, fac_rapport_soort)
 );
 
-CREATE_TABLE (fac_error,0)
-(
-    fac_error_code
-        NUMBER
-);
-
-/* Used for reporting system procedure errorlogging (for conversions, imports etc)*/
-CREATE_TABLE(fac_errorlog,0)
-(
-  recno      NUMBER (10),
-  rec_table  VARCHAR2 (32),
-  descript   VARCHAR2 (1024)
-);
-
-
 /* Tabel waarin de keys voor de multi_selectie worden bewaard. */
 CREATE_TABLE(fac_selectie, 0)
 (
@@ -103,6 +88,8 @@ CREATE_TABLE(fac_functie, 0)
     fac_functie_code
         VARCHAR2(10)
         NOT_NULL(fac_functie_code, fac_c_fac_functie_code),
+    fac_functie_volgnr
+        NUMBER(10),
     fac_functie_omschrijving
         VARCHAR2(30)
         NOT_NULL(fac_functie_omschrijving, fac_c_fac_functie_omschrijving),
@@ -153,35 +140,41 @@ CREATE_TABLE(fac_gebruikersgroep, 0)
     fac_groep_key
         NUMBER(10)
         CONSTRAINT fac_r_fac_groep_key REFERENCES fac_groep(fac_groep_key) ON DELETE CASCADE
-        CONSTRAINT fac_c_fac_groep_key CHECK(fac_groep_key IS NOT NULL)
+        CONSTRAINT fac_c_fac_groep_key CHECK(fac_groep_key IS NOT NULL),
 // Note: this column is defined in PRS_TAB.SRC
-//    ,prs_perslid_key
+//    prs_perslid_key
 //        NUMBER(10)
 //        CONSTRAINT fac_r_prs_perslid_key REFERENCES prs_perslid(prs_perslid_key) ON DELETE CASCADE
-//        CONSTRAINT fac_c_prs_perslid_key CHECK(prs_perslid_key IS NOT NULL)
+//        CONSTRAINT fac_c_prs_perslid_key CHECK(prs_perslid_key IS NOT NULL),
+    fac_gebruikersgroep_aanmaak
+        DATE
+        DEFAULT SYSDATE
 );
 
 CREATE_TABLE(fac_groeprechten, 0)
 (
-  fac_groeprechten_key
-    NUMBER(10)
-    CONSTRAINT fac_k_groeprechten_key PRIMARY KEY,
-  fac_groep_key
-    NUMBER(10)
-    NOT_NULL(fac_groep_key, fac_c_fac_groep_key2)
-    CONSTRAINT fac_r_groeprechten_groep REFERENCES fac_groep(fac_groep_key) ON DELETE CASCADE,
-  fac_functie_key
-    NUMBER(10)
-    NOT_NULL(fac_functie_key, fac_c_fac_functie_key1)
-    CONSTRAINT fac_r_groeprechten_functie REFERENCES fac_functie(fac_functie_key) ON DELETE CASCADE,
-  ins_discipline_key
-    NUMBER(10)
-    /* defined in ins_tab.src: CONSTRAINT fac_r_groeprechten_disc REFERENCES ins_tab_discipline(ins_discipline_key) ON DELETE CASCADE */,
-  fac_gebruiker_prs_level_read   NUMBER(1),
-  fac_gebruiker_alg_level_read   NUMBER(1),
-  fac_gebruiker_prs_level_write  NUMBER(1),
-  fac_gebruiker_alg_level_write  NUMBER(1),
-  CONSTRAINT fac_u_fac_groeprechten UNIQUE(FAC_GROEP_KEY, FAC_FUNCTIE_KEY, INS_DISCIPLINE_KEY)
+    fac_groeprechten_key
+        NUMBER(10)
+        CONSTRAINT fac_k_groeprechten_key PRIMARY KEY,
+    fac_groep_key
+        NUMBER(10)
+        NOT_NULL(fac_groep_key, fac_c_fac_groep_key2)
+        CONSTRAINT fac_r_groeprechten_groep REFERENCES fac_groep(fac_groep_key) ON DELETE CASCADE,
+    fac_functie_key
+        NUMBER(10)
+        NOT_NULL(fac_functie_key, fac_c_fac_functie_key1)
+        CONSTRAINT fac_r_groeprechten_functie REFERENCES fac_functie(fac_functie_key) ON DELETE CASCADE,
+    ins_discipline_key
+        NUMBER(10)
+        /* defined in ins_tab.src: CONSTRAINT fac_r_groeprechten_disc REFERENCES ins_tab_discipline(ins_discipline_key) ON DELETE CASCADE */,
+    fac_gebruiker_prs_level_read   NUMBER(1),
+    fac_gebruiker_alg_level_read   NUMBER(1),
+    fac_gebruiker_prs_level_write  NUMBER(1),
+    fac_gebruiker_alg_level_write  NUMBER(1),
+    fac_groeprechten_aanmaak
+        DATE
+        DEFAULT SYSDATE,
+    CONSTRAINT fac_u_fac_groeprechten UNIQUE(FAC_GROEP_KEY, FAC_FUNCTIE_KEY, INS_DISCIPLINE_KEY)
 );
 
 
@@ -437,7 +430,10 @@ CREATE_TABLE(fac_profiel, 0) (
     fac_profiel_omschrijving
         VARCHAR2(30) NOT NULL,
     fac_profiel_limiet
-        NUMBER(8)
+        NUMBER(8),
+    fac_profiel_aanmaak
+        DATE
+        DEFAULT SYSDATE
 );
 
 CREATE_TABLE(fac_profielwaarde, 0) (
@@ -451,7 +447,10 @@ CREATE_TABLE(fac_profielwaarde, 0) (
 --        REFERENCES ins_tab_discipline(ins_discipline_key) ON DELETE CASCADE,
     fac_profielwaarde_limiet
         NUMBER(8)
-        NOT NULL
+        NOT NULL,
+    fac_profielwaarde_aanmaak
+        DATE
+        DEFAULT SYSDATE
 );
 
 CREATE_TABLE(fac_perfmon, 0)
@@ -675,6 +674,8 @@ CREATE_TABLE(fac_import_app, 0)
     VARCHAR(320),
   fac_import_app_files
     VARCHAR(32),
+  fac_import_app_loglevel
+    NUMBER(1) DEFAULT 0 NOT NULL,
   fac_import_app_action
     VARCHAR(320) DEFAULT 'ORACLE' NOT NULL
 );
@@ -878,6 +879,11 @@ CREATE_TABLE(fac_imp_mld, 0)
   , mld_stdmelding_notfrontend      VARCHAR2(1)
   , alg_onrgoed_niveau              VARCHAR2(1)
   , mld_typeopdr_omschrijving       VARCHAR2(30)
+  , mld_stdmelding_hint             VARCHAR2(1000)
+  , mld_stdmelding_kopieerbaar      NUMBER(1)
+  , mld_stdmelding_afmeldtext       NUMBER(1)
+  , mld_stdmelding_doublecheck      NUMBER(4)
+  , mld_stdmelding_slabewaken       NUMBER(1)
 );
 
 CREATE_TABLE(fac_imp_mldafmtxt, 0)
@@ -900,6 +906,7 @@ CREATE_TABLE(fac_imp_onrgoed2, 0)
   , alg_ruimte_bruto_vloeropp      NUMBER(8,2)
   , reserveerbaar                  VARCHAR2(1)
   , res_discipline_omschrijving    VARCHAR2(30)
+  , res_discipline_expire_dagen    NUMBER(3)
   , res_ruimte_prijs               NUMBER(7,2)
   , res_opstelling_omschrijving    VARCHAR2(30)
   , res_ruimte_opstel_bezoekers    NUMBER (5)
@@ -1149,7 +1156,8 @@ CREATE_TABLE(fac_imp_ext_bedrijf, 0)
    prs_bedrijf_overig2 VARCHAR2 (256),
    prs_bedrijf_overig3 VARCHAR2 (256),
    prs_bedrijf_xsl VARCHAR2(256),
-   prs_bedrijf_order_adres VARCHAR2(256)
+   prs_bedrijf_order_adres VARCHAR2(256),
+   prs_relatietype VARCHAR2(256)
 );
 
 CREATE_TABLE(fac_imp_bedrijfadres, 0)
@@ -1444,7 +1452,7 @@ CREATE_TABLE(fac_imp_factuur, 0) /* Standaard tabel voor de factuur-import */
    afleverdatum         VARCHAR2 (10),       -- info
    btw_bedrag           VARCHAR2 (15),      -- regeltotaal btw
    docid                VARCHAR2 (255),     -- bestandsnaam
-   omschrijving         VARCHAR2 (60),      -- regelomschrijving
+   omschrijving         VARCHAR2 (250),      -- regelomschrijving
    opmerking            VARCHAR2(250),
    btw_verlegd          VARCHAR2(3),
    kenmerk1             VARCHAR2(250),
@@ -1564,6 +1572,9 @@ CREATE_TABLE (fac_kenmwaarden, 0)
 
 CREATE_TABLE(fac_session, 0)
 (
+   fac_session_key
+        NUMBER(10)
+        CONSTRAINT fac_k_fac_session_key PRIMARY KEY,
    fac_session_sessionid_hash VARCHAR(128),
    fac_session_data           VARCHAR(256),   -- Diverse data
    fac_session_expire         DATE DEFAULT SYSDATE+(1/24),
@@ -1645,8 +1656,11 @@ CREATE_TABLE(fac_widget, 0)
 /* deze tabel heeft geen numerieke, automatische key maar een GUID-APIKEY achtige key van 32 posities */
 CREATE_TABLE(fac_bookmark, 0)
 (
+   fac_bookmark_key
+        NUMBER(10)
+        CONSTRAINT fac_k_fac_bookmark_key PRIMARY KEY,
    fac_bookmark_id
-        VARCHAR2(32) CONSTRAINT fac_bookmark_id PRIMARY KEY,
+        VARCHAR2(32),
    fac_bookmark_naam
         VARCHAR(60)
         NOT_NULL(fac_bookmark_naam, fac_c_fac_bookmark_naam),
@@ -1801,8 +1815,6 @@ CREATE_TABLE(fac_imp_translation, 0)
    locale_tekst     VARCHAR2(2000 CHAR)
 );
 
-
-
 --FSN#23201
 CREATE_TABLE(fac_api, 0)
 (
@@ -1818,6 +1830,37 @@ CREATE_TABLE(fac_api, 0)
    fac_api_options_json     VARCHAR2 (4000)
 );
 
+CREATE_TABLE(fac_audit, 0)
+(
+   fac_audit_key
+       NUMBER(10)
+       CONSTRAINT fac_k_fac_audit_key PRIMARY KEY,
+   fac_audit_tabelnaam
+       VARCHAR2(30)
+       CONSTRAINT fac_k_fac_audit_tabelnaam CHECK(fac_audit_tabelnaam IS NOT NULL),
+   fac_audit_tabelkey
+       NUMBER(10),
+   fac_audit_veldnaam
+       VARCHAR2(30),
+   fac_audit_actie
+       VARCHAR2(1)
+       CONSTRAINT fac_k_fac_audit_actie CHECK(fac_audit_actie IN ('C', 'D', 'U')),
+   fac_audit_waarde_oud
+       VARCHAR2(4000),
+   fac_audit_waarde_nieuw
+       VARCHAR2(4000),
+// Note: this column is defined in PRS_TAB.SRC
+//   prs_perslid_key
+//       NUMBER(10)
+//       CONSTRAINT fac_r_prs_perslid_key9 REFERENCES prs_perslid(prs_perslid_key) ON DELETE SET NULL,
+   fac_audit_opmerking
+       VARCHAR2(320),
+   fac_audit_datum
+       DATE
+       DEFAULT SYSDATE
+       CONSTRAINT fac_c_fac_audit_datum CHECK(fac_audit_datum IS NOT NULL)
+);
+
 -- AAIT#25547
 CREATE_TABLE(faq_kenmerk,0)
 (
@@ -1868,6 +1911,9 @@ CREATE_TABLE(faq_kenmerkwaarde, 0)
 
 CREATE_TABLE(fac_qvw_ticket, 0)
 (
+    fac_qvw_ticket_key
+        NUMBER(10)
+        CONSTRAINT fac_k_fac_qvw_ticket_key PRIMARY KEY,
     fac_qvw_ticket_userid   VARCHAR(32), -- XXXX01 t/m XXXX02 of AAXX_martin.leneman
     fac_qvw_ticket_flags    NUMBER(3) DEFAULT 0  NOT NULL, -- 0=shared, 1=reserved
     fac_qvw_ticket_aanmaak  DATE DEFAULT SYSDATE,
@@ -1893,13 +1939,17 @@ CREATE_TABLE(fac_gui_counter, 0)
 
 CREATE_TABLE(fac_sequence, 0)
 (
+   fac_sequence_key      NUMBER(10)
+                         CONSTRAINT fac_k_fac_sequence_key PRIMARY KEY,
    fac_sequence_name     VARCHAR2(50)
-                         CONSTRAINT fac_k_fac_sequence_name PRIMARY KEY,
+                         NOT NULL,
    fac_sequence_lastval  NUMBER(10),
    fac_sequence_expire   DATE
 );
 
 // Documentatie in de wiki onder Authenticeren
+// LET OP: deprecated sinds 2017.1, gebruik aut_idp
+// Te verwijderen met 2017.2
 CREATE TABLE fac_idp
 (
     fac_idp_key

FAC/FAC_TRI.SRC

@@ -4,21 +4,21 @@
  *
  */
 
-#define     FAC_ERROR_CODE  -20999
-
-CREATE_TRIGGER(fac_t_fac_error_B_IU)
-BEFORE INSERT OR UPDATE ON fac_error
-FOR EACH ROW
-BEGIN
-   APPLICATION_ERROR(FAC_ERROR_CODE, '');
-END;
-/
-
-CREATE_TRIGGER(fac_t_fac_functie_B_IU)
-BEFORE INSERT OR UPDATE ON fac_functie
+CREATE_TRIGGER(fac_t_fac_functie_B_I)
+BEFORE INSERT ON fac_functie
 FOR EACH ROW
 BEGIN
    UPDATE_PRIMARY_KEY(fac_functie_key, fac_s_fac_functie_key);
+   :new.fac_functie_volgnr :=
+          CASE
+             WHEN SUBSTR (:new.fac_functie_code, 8, 3) IN ('USE', 'FOF', 'BOF')
+                  AND SUBSTR (:new.fac_functie_code, 5, 3) <> 'UUR'
+             THEN 250
+             WHEN SUBSTR (:new.fac_functie_code, 8, 3) IN ('BAC', 'MAN')
+             THEN 500
+             WHEN SUBSTR (:new.fac_functie_code, 8, 3) IN ('BO2', 'BO3', 'AFR', 'NOS', 'OAP')
+             THEN 750
+          END;
 END;
 /
 
@@ -40,6 +40,11 @@ BEGIN
 END;
 /
 
+AUDIT_BEGIN(fac_gebruikersgroep)
+AUDIT_VALUE(fac_gebruikersgroep, fac_groep_key)
+AUDIT_VALUE(fac_gebruikersgroep, prs_perslid_key)
+AUDIT_END()
+
 CREATE_TRIGGER(fac_t_fac_email_setting_B_IU)
 BEFORE INSERT OR UPDATE ON fac_email_setting
 FOR EACH ROW
@@ -48,6 +53,16 @@ BEGIN
 END;
 /
 
+AUDIT_BEGIN(fac_groeprechten)
+AUDIT_VALUE(fac_groeprechten, fac_groep_key)
+AUDIT_VALUE(fac_groeprechten, fac_functie_key)
+AUDIT_VALUE(fac_groeprechten, ins_discipline_key)
+AUDIT_VALUE(fac_groeprechten, fac_gebruiker_alg_level_read)
+AUDIT_VALUE(fac_groeprechten, fac_gebruiker_prs_level_read)
+AUDIT_VALUE(fac_groeprechten, fac_gebruiker_alg_level_write)
+AUDIT_VALUE(fac_groeprechten, fac_gebruiker_prs_level_write)
+AUDIT_END()
+
 CREATE_TRIGGER(fac_t_fac_groeprechten_B_IU)
 BEFORE INSERT OR UPDATE ON fac_groeprechten
 FOR EACH ROW
@@ -255,6 +270,10 @@ BEGIN
 END;
 /
 
+AUDIT_BEGIN(fac_profiel)
+AUDIT_VALUE(fac_profiel, fac_profiel_omschrijving)
+AUDIT_VALUE(fac_profiel, fac_profiel_limiet)
+AUDIT_END()
 
 CREATE_TRIGGER(fac_t_fac_profiel_B_IU)
 BEFORE INSERT OR UPDATE ON fac_profiel
@@ -264,6 +283,12 @@ BEGIN
 END;
 /
 
+AUDIT_BEGIN(fac_profielwaarde)
+AUDIT_VALUE(fac_profielwaarde, fac_profiel_key)
+AUDIT_VALUE(fac_profielwaarde, fac_profielwaarde_limiet)
+AUDIT_VALUE(fac_profielwaarde, ins_discipline_key)
+AUDIT_END()
+
 CREATE_TRIGGER(fac_t_fac_profielwaarde_B_IU)
 BEFORE INSERT OR UPDATE ON fac_profielwaarde
 FOR EACH ROW
@@ -446,6 +471,10 @@ BEGIN
 END;
 /
 
+AUDIT_BEGIN(fac_setting)
+AUDIT_VALUE(fac_setting, fac_setting_pvalue)
+AUDIT_END()
+
 CREATE_TRIGGER(fac_t_fac_setting_B_IU)
 BEFORE INSERT or UPDATE ON fac_setting
 FOR EACH ROW
@@ -483,6 +512,15 @@ BEGIN
 END;
 /
 
+CREATE_TRIGGER(fac_t_fac_qvw_ticket_B_I)
+BEFORE INSERT ON fac_qvw_ticket
+FOR EACH ROW
+BEGIN
+    UPDATE_PRIMARY_KEY(fac_qvw_ticket_key, fac_s_fac_qvw_ticket_key);
+END;
+/
+
+
 CREATE_TRIGGER(fac_t_fac_tracking_b_i)
 BEFORE INSERT ON fac_tracking
 FOR EACH ROW
@@ -662,6 +700,14 @@ BEGIN
 END;
 /
 
+CREATE_TRIGGER(fac_t_fac_audit_b_i)
+BEFORE INSERT ON fac_audit
+FOR EACH ROW
+BEGIN
+   UPDATE_PRIMARY_KEY(fac_audit_key, fac_s_fac_audit_key);
+END;
+/
+
 CREATE_TRIGGER(faq_t_faq_kenmerkwaarde_b_iu)
 BEFORE INSERT OR UPDATE ON faq_kenmerkwaarde
 FOR EACH ROW
@@ -885,6 +931,31 @@ BEFORE INSERT OR UPDATE ON fac_idp
 FOR EACH ROW
 BEGIN
    UPDATE_PRIMARY_KEY(fac_idp_key, fac_s_fac_idp_key);
+   :new.fac_idp_code := UPPER(:new.fac_idp_code);
+END;
+/
+
+CREATE_TRIGGER(fac_t_fac_bookmark_B_I)
+BEFORE INSERT ON fac_bookmark
+FOR EACH ROW
+BEGIN
+    UPDATE_PRIMARY_KEY(fac_bookmark_key, fac_s_fac_bookmark_key);
+END;
+/
+
+CREATE_TRIGGER(fac_t_fac_session_B_I)
+BEFORE INSERT ON fac_session
+FOR EACH ROW
+BEGIN
+    UPDATE_PRIMARY_KEY(fac_session_key, fac_s_fac_session_key);
+END;
+/
+
+CREATE_TRIGGER(fac_t_fac_sequence_B_I)
+BEFORE INSERT ON fac_sequence
+FOR EACH ROW
+BEGIN
+    UPDATE_PRIMARY_KEY(fac_sequence_key, fac_s_fac_sequence_key);
 END;
 /
 

FAC/FAC_VIE.SRC

@@ -3,43 +3,9 @@
  *  $Id$
  */
 
-CREATE_VIEW(fac_v_functie_discipline, 0)
-           (fac_functie_discipline_key,
-            fac_functie_discipline_type,
-            fac_functie_discipline_module,
-            fac_functie_discipline_omschr,
-            fac_functie_discipline_min_lev) AS
-   SELECT fac_functie_key,
-          'F',
-          fac_functie_module,
-          f.fac_functie_omschrijving,
-          fac_functie_min_level
-   FROM fac_functie f
-   UNION
-   SELECT ins_discipline_key,
-          decode(ins_discipline_module,'INS','D','MLD','V','BES','C'),
-          ins_discipline_module,
-          ins_discipline_omschrijving,
-          ins_discipline_min_level
-   FROM ins_tab_discipline
-   WHERE ins_discipline_verwijder is NULL;
-
 DEFINIEER_VIEW_AANWEZIG(fac_usrdata, fac_usrdata_verwijder,
     fac_v_aanwezigusrdata,0);
 
-CREATE_VIEW (fac_v_webfunctie, 0) AS
- SELECT * FROM fac_functie F
-  WHERE f.fac_functie_code LIKE 'WEB%';
-
-CREATE_VIEW (fac_v_webuser, 0) AS
-  SELECT prs_perslid_key,
-         prs_perslid_naam,
-         prs_perslid_oslogin prs_perslid_initialen,
-         prs_afdeling_key
-    FROM prs_v_aanwezigperslid p
-   WHERE p.prs_perslid_oslogin IS NOT NULL;
-
-
 CREATE_VIEW (fac_v_webgebruiker, 0) AS
    SELECT gg.prs_perslid_key, g.fac_functie_key,
           g.ins_discipline_key,
@@ -49,56 +15,7 @@ CREATE_VIEW (fac_v_webgebruiker, 0) AS
           MIN (fac_gebruiker_alg_level_write) fac_gebruiker_alg_level_write
      FROM fac_groeprechten g, fac_gebruikersgroep gg
     WHERE g.fac_groep_key = gg.fac_groep_key
- GROUP BY gg.prs_perslid_key, g.fac_functie_key, g.ins_discipline_key;
-
-/* Deze view bevat alle webfuncties van de FCLTWEB gebruiker
- * en de aan FCLTWEB geautoriseerde disciplines van de diverse andere modules
- * (INS, MLD e.d) en biedt het arsenaal aan potentiele autorisaties van de
- * individuele WEB gebruiker.
- * Merk op: de LAN-functies komen hier niet in voor (deze worden op een ander
- * niveau (LAN) aan de gehele FCLTWEB user toegekend.
- * Hier zijn functionele afhankelijkheden mogelijk, waarbij de LAN-autorisatie
- * het diepst ligt en dus vaak het laatste woord heeft!
- */
-CREATE_VIEW (FAC_V_WEBFUNCTIE_DISCIPLINE, 0) AS
-  SELECT * FROM FAC_V_FUNCTIE_DISCIPLINE FD
-WHERE (FD.fac_functie_discipline_type <>'F'
-      AND FD.fac_functie_discipline_key IN (SELECT ins_discipline_key
-                                              FROM all_v_aanwezigdiscipline))
-   OR (FD.fac_functie_discipline_type IN ('A', 'B', 'C'))
-   OR (FD.fac_functie_discipline_type ='F' AND FD.fac_functie_discipline_module='WEB');
-
-
-
-CREATE_VIEW(fac_v_gebruikersgroepgegevens, 0)
-(      fac_gebruikersgroep_key
-,      fac_groep_key
-,      prs_perslid_key
-,      prs_perslid_oslogin
-,      prs_afdeling_key
-,      prs_afdeling_naam
-,      prs_perslid_naam
-,      fac_groep_omschrijving
-)
-AS
-select
-   gg.fac_gebruikersgroep_key
- , gg.fac_groep_key
- , gg.prs_perslid_key
- , p.prs_perslid_oslogin
- , a.prs_afdeling_key
- , a.prs_afdeling_naam
- , p.prs_perslid_naam
- , g.fac_groep_omschrijving
- from
-   fac_gebruikersgroep gg
- , fac_groep g
- , prs_perslid p
- , prs_afdeling a
- where gg.fac_groep_key=g.fac_groep_key
- and gg.prs_perslid_key=p.prs_perslid_key
- and p.prs_afdeling_key(+)=a.prs_afdeling_key
-/
+ GROUP BY gg.prs_perslid_key, g.fac_functie_key, g.ins_discipline_key; 
 
 -- Rapportages
 CREATE_VIEW(fac_v_rap_groeprechten, 0)
@@ -337,382 +254,6 @@ AS
      FROM fac_perfmon_sample s, prs_v_perslid_fullnames_all pf
     WHERE s.prs_perslid_key = pf.prs_perslid_key;
 
--- per uur, ongeacht plaats
-CREATE_VIEW (fac_v_perfmon_sample_overall60, 0) (fclt_f_datum,
-                                                 tijd,
-                                                 aantal,
-                                                 gemiddelde1,
-                                                 laagste1, hoogste1, stddeviatie1,
-                                                 gemiddelde2,
-                                                 laagste2, hoogste2, stddeviatie2,
-                                                 gemiddelde3,
-                                                 laagste3, hoogste3, stddeviatie3,
-                                                 gemiddelde4,
-                                                 laagste4, hoogste4, stddeviatie4,
-                                                 gemiddelde5,
-                                                 laagste5, hoogste5, stddeviatie5,
-                                                 gemiddelde6,
-                                                 laagste6, hoogste6, stddeviatie6,
-                                                 gemiddelde7,
-                                                 laagste7, hoogste7, stddeviatie7,
-                                                 gemiddelde8,
-                                                 laagste8, hoogste8, stddeviatie8,
-                                                 gemiddelde9,
-                                                 laagste9, hoogste9, stddeviatie9
-                                                )
-AS
-   SELECT   DATE_TO_CHAR (fac_perfmon_sample_datum, 'YYYY-MM-DD'),
-            DATE_TO_CHAR (fac_perfmon_sample_datum, 'HH24') || ':00',
-             COUNT (fac_perfmon_sample_waarde1),
-            ROUND (AVG (fac_perfmon_sample_waarde1)),
-            MIN (fac_perfmon_sample_waarde1), MAX (fac_perfmon_sample_waarde1), ROUND (STDDEV (fac_perfmon_sample_waarde1)),
-            ROUND (AVG (fac_perfmon_sample_waarde2)),
-            MIN (fac_perfmon_sample_waarde2), MAX (fac_perfmon_sample_waarde2), ROUND (STDDEV (fac_perfmon_sample_waarde2)),
-            ROUND (AVG (fac_perfmon_sample_waarde3)),
-            MIN (fac_perfmon_sample_waarde3), MAX (fac_perfmon_sample_waarde3), ROUND (STDDEV (fac_perfmon_sample_waarde3)),
-            ROUND (AVG (fac_perfmon_sample_waarde4)),
-            MIN (fac_perfmon_sample_waarde4), MAX (fac_perfmon_sample_waarde4), ROUND (STDDEV (fac_perfmon_sample_waarde4)),
-            ROUND (AVG (fac_perfmon_sample_waarde5)),
-            MIN (fac_perfmon_sample_waarde5), MAX (fac_perfmon_sample_waarde5), ROUND (STDDEV (fac_perfmon_sample_waarde5)),
-            ROUND (AVG (fac_perfmon_sample_waarde6)),
-            MIN (fac_perfmon_sample_waarde6), MAX (fac_perfmon_sample_waarde6), ROUND (STDDEV (fac_perfmon_sample_waarde6)),
-            ROUND (AVG (fac_perfmon_sample_waarde7)),
-            MIN (fac_perfmon_sample_waarde7), MAX (fac_perfmon_sample_waarde7), ROUND (STDDEV (fac_perfmon_sample_waarde7)),
-            ROUND (AVG (fac_perfmon_sample_waarde8)),
-            MIN (fac_perfmon_sample_waarde8), MAX (fac_perfmon_sample_waarde8), ROUND (STDDEV (fac_perfmon_sample_waarde8)),
-            ROUND (AVG (fac_perfmon_sample_waarde9)),
-            MIN (fac_perfmon_sample_waarde9), MAX (fac_perfmon_sample_waarde9), ROUND (STDDEV (fac_perfmon_sample_waarde9))
-       FROM fac_perfmon_sample
-   GROUP BY DATE_TO_CHAR (fac_perfmon_sample_datum, 'YYYY-MM-DD'),
-            DATE_TO_CHAR (fac_perfmon_sample_datum, 'HH24') || ':00';
-
--- idem per 10 minuten
-CREATE_VIEW (fac_v_perfmon_sample_overall10, 0) (fclt_f_datum,
-                                                 tijd,
-                                                 aantal,
-                                                 gemiddelde1,
-                                                 laagste1, hoogste1, stddeviatie1,
-                                                 gemiddelde2,
-                                                 laagste2, hoogste2, stddeviatie2,
-                                                 gemiddelde3,
-                                                 laagste3, hoogste3, stddeviatie3,
-                                                 gemiddelde4,
-                                                 laagste4, hoogste4, stddeviatie4,
-                                                 gemiddelde5,
-                                                 laagste5, hoogste5, stddeviatie5,
-                                                 gemiddelde6,
-                                                 laagste6, hoogste6, stddeviatie6,
-                                                 gemiddelde7,
-                                                 laagste7, hoogste7, stddeviatie7,
-                                                 gemiddelde8,
-                                                 laagste8, hoogste8, stddeviatie8,
-                                                 gemiddelde9,
-                                                 laagste9, hoogste9, stddeviatie9
-                                                 )
-AS
-   SELECT   DATE_TO_CHAR (fac_perfmon_sample_datum, 'YYYY-MM-DD'),
-            SUBSTR (DATE_TO_CHAR (fac_perfmon_sample_datum, 'HH24:MI'), 1, 4) || '0',
-            COUNT (fac_perfmon_sample_waarde1),
-            ROUND (AVG (fac_perfmon_sample_waarde1)),
-            MIN (fac_perfmon_sample_waarde1), MAX (fac_perfmon_sample_waarde1), ROUND (STDDEV (fac_perfmon_sample_waarde1)),
-            ROUND (AVG (fac_perfmon_sample_waarde2)),
-            MIN (fac_perfmon_sample_waarde2), MAX (fac_perfmon_sample_waarde2), ROUND (STDDEV (fac_perfmon_sample_waarde2)),
-            ROUND (AVG (fac_perfmon_sample_waarde3)),
-            MIN (fac_perfmon_sample_waarde3), MAX (fac_perfmon_sample_waarde3), ROUND (STDDEV (fac_perfmon_sample_waarde3)),
-            ROUND (AVG (fac_perfmon_sample_waarde4)),
-            MIN (fac_perfmon_sample_waarde4), MAX (fac_perfmon_sample_waarde4), ROUND (STDDEV (fac_perfmon_sample_waarde4)),
-            ROUND (AVG (fac_perfmon_sample_waarde5)),
-            MIN (fac_perfmon_sample_waarde5), MAX (fac_perfmon_sample_waarde5), ROUND (STDDEV (fac_perfmon_sample_waarde5)),
-            ROUND (AVG (fac_perfmon_sample_waarde6)),
-            MIN (fac_perfmon_sample_waarde6), MAX (fac_perfmon_sample_waarde6), ROUND (STDDEV (fac_perfmon_sample_waarde6)),
-            ROUND (AVG (fac_perfmon_sample_waarde7)),
-            MIN (fac_perfmon_sample_waarde7), MAX (fac_perfmon_sample_waarde7), ROUND (STDDEV (fac_perfmon_sample_waarde7)),
-            ROUND (AVG (fac_perfmon_sample_waarde8)),
-            MIN (fac_perfmon_sample_waarde8), MAX (fac_perfmon_sample_waarde8), ROUND (STDDEV (fac_perfmon_sample_waarde8)),
-            ROUND (AVG (fac_perfmon_sample_waarde9)),
-            MIN (fac_perfmon_sample_waarde9), MAX (fac_perfmon_sample_waarde9), ROUND (STDDEV (fac_perfmon_sample_waarde9))
-       FROM fac_perfmon_sample
-   GROUP BY DATE_TO_CHAR (fac_perfmon_sample_datum, 'YYYY-MM-DD'),
-            SUBSTR (DATE_TO_CHAR (fac_perfmon_sample_datum, 'HH24:MI'), 1, 4)
-            || '0';
-
--- per uur, met plaats/user
-CREATE_VIEW (fac_v_perfmon_sample60, 0) (fclt_f_datum,
-                                         tijd,
-                                         prs_perslid_key,
-                                         fclt_f_ipadres,
-                                         aantal,
-                                         gemiddelde1,
-                                         laagste1, hoogste1, stddeviatie1,
-                                         gemiddelde2,
-                                         laagste2, hoogste2, stddeviatie2,
-                                         gemiddelde3,
-                                         laagste3, hoogste3, stddeviatie3,
-                                         gemiddelde4,
-                                         laagste4, hoogste4, stddeviatie4,
-                                         gemiddelde5,
-                                         laagste5, hoogste5, stddeviatie5,
-                                         gemiddelde6,
-                                         laagste6, hoogste6, stddeviatie6,
-                                         gemiddelde7,
-                                         laagste7, hoogste7, stddeviatie7,
-                                         gemiddelde8,
-                                         laagste8, hoogste8, stddeviatie8,
-                                         gemiddelde9,
-                                         laagste9, hoogste9, stddeviatie9
-                                        )
-AS
-   SELECT   DATE_TO_CHAR (fac_perfmon_sample_datum, 'YYYY-MM-DD'),
-            DATE_TO_CHAR (fac_perfmon_sample_datum, 'HH24') || ':00',
-            prs_perslid_key,
-            fac_perfmon_sample_ip,
-            COUNT (fac_perfmon_sample_waarde1),
-            ROUND (AVG (fac_perfmon_sample_waarde1)),
-            MIN (fac_perfmon_sample_waarde1), MAX (fac_perfmon_sample_waarde1), ROUND (STDDEV (fac_perfmon_sample_waarde1)),
-            ROUND (AVG (fac_perfmon_sample_waarde2)),
-            MIN (fac_perfmon_sample_waarde2), MAX (fac_perfmon_sample_waarde2), ROUND (STDDEV (fac_perfmon_sample_waarde2)),
-            ROUND (AVG (fac_perfmon_sample_waarde3)),
-            MIN (fac_perfmon_sample_waarde3), MAX (fac_perfmon_sample_waarde3), ROUND (STDDEV (fac_perfmon_sample_waarde3)),
-            ROUND (AVG (fac_perfmon_sample_waarde4)),
-            MIN (fac_perfmon_sample_waarde4), MAX (fac_perfmon_sample_waarde4), ROUND (STDDEV (fac_perfmon_sample_waarde4)),
-            ROUND (AVG (fac_perfmon_sample_waarde5)),
-            MIN (fac_perfmon_sample_waarde5), MAX (fac_perfmon_sample_waarde5), ROUND (STDDEV (fac_perfmon_sample_waarde5)),
-            ROUND (AVG (fac_perfmon_sample_waarde6)),
-            MIN (fac_perfmon_sample_waarde6), MAX (fac_perfmon_sample_waarde6), ROUND (STDDEV (fac_perfmon_sample_waarde6)),
-            ROUND (AVG (fac_perfmon_sample_waarde7)),
-            MIN (fac_perfmon_sample_waarde7), MAX (fac_perfmon_sample_waarde7), ROUND (STDDEV (fac_perfmon_sample_waarde7)),
-            ROUND (AVG (fac_perfmon_sample_waarde8)),
-            MIN (fac_perfmon_sample_waarde8), MAX (fac_perfmon_sample_waarde8), ROUND (STDDEV (fac_perfmon_sample_waarde8)),
-            ROUND (AVG (fac_perfmon_sample_waarde9)),
-            MIN (fac_perfmon_sample_waarde9), MAX (fac_perfmon_sample_waarde9), ROUND (STDDEV (fac_perfmon_sample_waarde9))
-       FROM fac_perfmon_sample
-   GROUP BY DATE_TO_CHAR (fac_perfmon_sample_datum, 'YYYY-MM-DD'),
-            DATE_TO_CHAR (fac_perfmon_sample_datum, 'HH24') || ':00',            prs_perslid_key,
-            fac_perfmon_sample_ip;
-
---idem per 10 minuten
-CREATE_VIEW (fac_v_perfmon_sample10, 0) (fclt_f_datum,
-                                         tijd,
-                                         prs_perslid_key,
-                                         fclt_f_ipadres,
-                                         aantal,
-                                         gemiddelde1,
-                                         laagste1, hoogste1, stddeviatie1,
-                                         gemiddelde2,
-                                         laagste2, hoogste2, stddeviatie2,
-                                         gemiddelde3,
-                                         laagste3, hoogste3, stddeviatie3,
-                                         gemiddelde4,
-                                         laagste4, hoogste4, stddeviatie4,
-                                         gemiddelde5,
-                                         laagste5, hoogste5, stddeviatie5,
-                                         gemiddelde6,
-                                         laagste6, hoogste6, stddeviatie6,
-                                         gemiddelde7,
-                                         laagste7, hoogste7, stddeviatie7,
-                                         gemiddelde8,
-                                         laagste8, hoogste8, stddeviatie8,
-                                         gemiddelde9,
-                                         laagste9, hoogste9, stddeviatie9
-                                        )
-AS
-   SELECT   DATE_TO_CHAR (fac_perfmon_sample_datum, 'YYYY-MM-DD'),
-            SUBSTR (DATE_TO_CHAR (fac_perfmon_sample_datum, 'HH24:MI'), 1, 4)
-            || '0',
-             prs_perslid_key,
-            fac_perfmon_sample_ip,
-            COUNT (fac_perfmon_sample_waarde1),
-            ROUND (AVG (fac_perfmon_sample_waarde1)),
-            MIN (fac_perfmon_sample_waarde1), MAX (fac_perfmon_sample_waarde1), ROUND (STDDEV (fac_perfmon_sample_waarde1)),
-            ROUND (AVG (fac_perfmon_sample_waarde2)),
-            MIN (fac_perfmon_sample_waarde2), MAX (fac_perfmon_sample_waarde2), ROUND (STDDEV (fac_perfmon_sample_waarde2)),
-            ROUND (AVG (fac_perfmon_sample_waarde3)),
-            MIN (fac_perfmon_sample_waarde3), MAX (fac_perfmon_sample_waarde3), ROUND (STDDEV (fac_perfmon_sample_waarde3)),
-            ROUND (AVG (fac_perfmon_sample_waarde4)),
-            MIN (fac_perfmon_sample_waarde4), MAX (fac_perfmon_sample_waarde4), ROUND (STDDEV (fac_perfmon_sample_waarde4)),
-            ROUND (AVG (fac_perfmon_sample_waarde5)),
-            MIN (fac_perfmon_sample_waarde5), MAX (fac_perfmon_sample_waarde5), ROUND (STDDEV (fac_perfmon_sample_waarde5)),
-            ROUND (AVG (fac_perfmon_sample_waarde6)),
-            MIN (fac_perfmon_sample_waarde6), MAX (fac_perfmon_sample_waarde6), ROUND (STDDEV (fac_perfmon_sample_waarde6)),
-            ROUND (AVG (fac_perfmon_sample_waarde7)),
-            MIN (fac_perfmon_sample_waarde7), MAX (fac_perfmon_sample_waarde7), ROUND (STDDEV (fac_perfmon_sample_waarde7)),
-            ROUND (AVG (fac_perfmon_sample_waarde8)),
-            MIN (fac_perfmon_sample_waarde8), MAX (fac_perfmon_sample_waarde8), ROUND (STDDEV (fac_perfmon_sample_waarde8)),
-            ROUND (AVG (fac_perfmon_sample_waarde9)),
-            MIN (fac_perfmon_sample_waarde9), MAX (fac_perfmon_sample_waarde9), ROUND (STDDEV (fac_perfmon_sample_waarde9))
-       FROM fac_perfmon_sample
-   GROUP BY DATE_TO_CHAR (fac_perfmon_sample_datum, 'YYYY-MM-DD'),
-            SUBSTR (DATE_TO_CHAR (fac_perfmon_sample_datum, 'HH24:MI'), 1, 4)
-            || '0',
-            prs_perslid_key,
-            fac_perfmon_sample_ip;
-
--- levenslange gemiddelden per IPadres
-CREATE_VIEW (fac_v_perfmon_sample_ip, 0) (fclt_f_ipadres,
-                                          aantal,
-                                          gemiddelde1,
-                                          laagste1,
-                                          hoogste1,
-                                          stddeviatie1,
-                                          gemiddelde2,
-                                          laagste2,
-                                          hoogste2,
-                                          stddeviatie2,
-                                          gemiddelde3,
-                                          laagste3,
-                                          hoogste3,
-                                          stddeviatie3,
-                                          gemiddelde4,
-                                          laagste4,
-                                          hoogste4,
-                                          stddeviatie4,
-                                          gemiddelde5,
-                                          laagste5,
-                                          hoogste5,
-                                          stddeviatie5,
-                                          gemiddelde6,
-                                          laagste6,
-                                          hoogste6,
-                                          stddeviatie6,
-                                          gemiddelde7,
-                                          laagste7,
-                                          hoogste7,
-                                          stddeviatie7,
-                                          gemiddelde8,
-                                          laagste8,
-                                          hoogste8,
-                                          stddeviatie8,
-                                          gemiddelde9,
-                                          laagste9,
-                                          hoogste9,
-                                          stddeviatie9
-                                                 )
-AS
-   SELECT   fac_perfmon_sample_ip,
-            COUNT (fac_perfmon_sample_waarde1),
-            ROUND (AVG (fac_perfmon_sample_waarde1)),
-            MIN (fac_perfmon_sample_waarde1),
-            MAX (fac_perfmon_sample_waarde1),
-            ROUND (STDDEV (fac_perfmon_sample_waarde1)),
-            ROUND (AVG (fac_perfmon_sample_waarde2)),
-            MIN (fac_perfmon_sample_waarde2),
-            MAX (fac_perfmon_sample_waarde2),
-            ROUND (STDDEV (fac_perfmon_sample_waarde2)),
-            ROUND (AVG (fac_perfmon_sample_waarde3)),
-            MIN (fac_perfmon_sample_waarde3),
-            MAX (fac_perfmon_sample_waarde3),
-            ROUND (STDDEV (fac_perfmon_sample_waarde3)),
-            ROUND (AVG (fac_perfmon_sample_waarde4)),
-            MIN (fac_perfmon_sample_waarde4),
-            MAX (fac_perfmon_sample_waarde4),
-            ROUND (STDDEV (fac_perfmon_sample_waarde4)),
-            ROUND (AVG (fac_perfmon_sample_waarde5)),
-            MIN (fac_perfmon_sample_waarde5),
-            MAX (fac_perfmon_sample_waarde5),
-            ROUND (STDDEV (fac_perfmon_sample_waarde5)),
-            ROUND (AVG (fac_perfmon_sample_waarde6)),
-            MIN (fac_perfmon_sample_waarde6),
-            MAX (fac_perfmon_sample_waarde6),
-            ROUND (STDDEV (fac_perfmon_sample_waarde6)),
-            ROUND (AVG (fac_perfmon_sample_waarde7)),
-            MIN (fac_perfmon_sample_waarde7),
-            MAX (fac_perfmon_sample_waarde7),
-            ROUND (STDDEV (fac_perfmon_sample_waarde7)),
-            ROUND (AVG (fac_perfmon_sample_waarde8)),
-            MIN (fac_perfmon_sample_waarde8),
-            MAX (fac_perfmon_sample_waarde8),
-            ROUND (STDDEV (fac_perfmon_sample_waarde8)),
-            ROUND (AVG (fac_perfmon_sample_waarde9)),
-            MIN (fac_perfmon_sample_waarde9),
-            MAX (fac_perfmon_sample_waarde9),
-            ROUND (STDDEV (fac_perfmon_sample_waarde9))
-       FROM fac_perfmon_sample
-   GROUP BY fac_perfmon_sample_ip;
-
--- levenslange gemiddelden per user
-CREATE_VIEW(fac_v_perfmon_sample_user,0) (fclt_f_naam,
-                                          aantal,
-                                          gemiddelde1,
-                                          laagste1,
-                                          hoogste1,
-                                          stddeviatie1,
-                                          gemiddelde2,
-                                          laagste2,
-                                          hoogste2,
-                                          stddeviatie2,
-                                          gemiddelde3,
-                                          laagste3,
-                                          hoogste3,
-                                          stddeviatie3,
-                                          gemiddelde4,
-                                          laagste4,
-                                          hoogste4,
-                                          stddeviatie4,
-                                          gemiddelde5,
-                                          laagste5,
-                                          hoogste5,
-                                          stddeviatie5,
-                                          gemiddelde6,
-                                          laagste6,
-                                          hoogste6,
-                                          stddeviatie6,
-                                          gemiddelde7,
-                                          laagste7,
-                                          hoogste7,
-                                          stddeviatie7,
-                                          gemiddelde8,
-                                          laagste8,
-                                          hoogste8,
-                                          stddeviatie8,
-                                          gemiddelde9,
-                                          laagste9,
-                                          hoogste9,
-                                          stddeviatie9
-                                                   )
-AS
-   SELECT   prs_perslid_naam_full,
-            COUNT (fac_perfmon_sample_waarde1),
-            ROUND (AVG (fac_perfmon_sample_waarde1)),
-            MIN (fac_perfmon_sample_waarde1),
-            MAX (fac_perfmon_sample_waarde1),
-            ROUND (STDDEV (fac_perfmon_sample_waarde1)),
-            ROUND (AVG (fac_perfmon_sample_waarde2)),
-            MIN (fac_perfmon_sample_waarde2),
-            MAX (fac_perfmon_sample_waarde2),
-            ROUND (STDDEV (fac_perfmon_sample_waarde2)),
-            ROUND (AVG (fac_perfmon_sample_waarde3)),
-            MIN (fac_perfmon_sample_waarde3),
-            MAX (fac_perfmon_sample_waarde3),
-            ROUND (STDDEV (fac_perfmon_sample_waarde3)),
-            ROUND (AVG (fac_perfmon_sample_waarde4)),
-            MIN (fac_perfmon_sample_waarde4),
-            MAX (fac_perfmon_sample_waarde4),
-            ROUND (STDDEV (fac_perfmon_sample_waarde4)),
-            ROUND (AVG (fac_perfmon_sample_waarde5)),
-            MIN (fac_perfmon_sample_waarde5),
-            MAX (fac_perfmon_sample_waarde5),
-            ROUND (STDDEV (fac_perfmon_sample_waarde5)),
-            ROUND (AVG (fac_perfmon_sample_waarde6)),
-            MIN (fac_perfmon_sample_waarde6),
-            MAX (fac_perfmon_sample_waarde6),
-            ROUND (STDDEV (fac_perfmon_sample_waarde6)),
-            ROUND (AVG (fac_perfmon_sample_waarde7)),
-            MIN (fac_perfmon_sample_waarde7),
-            MAX (fac_perfmon_sample_waarde7),
-            ROUND (STDDEV (fac_perfmon_sample_waarde7)),
-            ROUND (AVG (fac_perfmon_sample_waarde8)),
-            MIN (fac_perfmon_sample_waarde8),
-            MAX (fac_perfmon_sample_waarde8),
-            ROUND (STDDEV (fac_perfmon_sample_waarde8)),
-            ROUND (AVG (fac_perfmon_sample_waarde9)),
-            MIN (fac_perfmon_sample_waarde9),
-            MAX (fac_perfmon_sample_waarde9),
-            ROUND (STDDEV (fac_perfmon_sample_waarde9))
-       FROM fac_perfmon_sample s, prs_v_perslid_fullnames_all pf
-      WHERE pf.prs_perslid_key(+) = s.prs_perslid_key
-   GROUP BY prs_perslid_naam_full;
-
-
 /*
  *
  *
@@ -917,45 +458,43 @@ AS
 SELECT fac_notificatie_receiver_email, fac_notificatie_receiver_phone, fac_notificatie_oms, fac_notificatie_status,
        fac_notificatie_key, fac_notificatie_refkey, fac_notificatie_datum, fac_srtnotificatie_code, fac_srtnotificatie_xmlnode,
        fac_notificatie_extrakey, fac_notificatie_sender_email, fac_notificatie_lang, fac_notificatie_systeemadres,
-       fac_notificatie_attachments, fac_srtnotificatie_delay, fac_srtnotificatie_srtkm_key
+       fac_notificatie_attachments, fac_srtnotificatie_delay, fac_srtnotificatie_srtkm_key, prs_perslid_key_receiver
   FROM fac_notificatie n
   LEFT OUTER JOIN fac_srtnotificatie sn ON n.fac_srtnotificatie_key = sn.fac_srtnotificatie_key;
 
 -- Queue met naar leveranciers te verzenden opdrachten tbv PutOrders: wat-moet-naar-wie-en-hoe
 -- status=2: mail, status=4: sms (yet unused)
 CREATE_VIEW(fac_v_orderqueue, 0)
-(prs_bedrijf_key, xmlnode, key, status, reference, sender)
+(prs_bedrijf_key, alg_locatie_key, xmlnode, key, status, reference, sender)
 AS
-   SELECT b.prs_bedrijf_key, 'bestelopdr', o.bes_bestelopdr_key, 2, o.bes_bestelopdr_id, alg_locatie_email
+   SELECT b.prs_bedrijf_key, l.alg_locatie_key, 'bestelopdr', o.bes_bestelopdr_key, 2, o.bes_bestelopdr_id, alg_locatie_email
      FROM prs_bedrijf b, bes_bestelopdr o, mld_adres ma, alg_locatie l
     WHERE b.prs_bedrijf_key = o.prs_bedrijf_key
       AND o.mld_adres_key_lev = ma.mld_adres_key
       AND ma.alg_locatie_key = l.alg_locatie_key(+)
-      AND EXISTS (SELECT '' FROM prs_bedrijfadres ba where ba.prs_bedrijf_key= b.prs_bedrijf_key AND ba.prs_bedrijfadres_type='B')
+      AND EXISTS (SELECT '' FROM prs_bedrijfadres ba WHERE ba.prs_bedrijf_key = b.prs_bedrijf_key AND ba.prs_bedrijfadres_type = 'B')
       AND o.bes_bestelopdr_status = 3
    UNION ALL
-   SELECT b.prs_bedrijf_key, 'opdracht', o.mld_opdr_key, 2, o.mld_melding_key || '/' || o.mld_opdr_bedrijfopdr_volgnr,
-          COALESCE (l1.alg_locatie_email, l2.alg_locatie_email)
+   SELECT b.prs_bedrijf_key, COALESCE (l1.alg_locatie_key, l2.alg_locatie_key), 'opdracht', o.mld_opdr_key, 2,
+          o.mld_melding_key || '/' || o.mld_opdr_bedrijfopdr_volgnr, COALESCE (l1.alg_locatie_email, l2.alg_locatie_email)
      FROM prs_bedrijf b, mld_opdr o, mld_melding m, mld_adres ma, alg_locatie l1, alg_locatie l2
     WHERE b.prs_bedrijf_key = o.mld_uitvoerende_keys
       AND o.mld_melding_key = m.mld_melding_key
       AND m.mld_adres_key = ma.mld_adres_key(+)
       AND ma.alg_locatie_key = l1.alg_locatie_key(+)
       AND m.mld_alg_locatie_key = l2.alg_locatie_key(+)
-      AND EXISTS (SELECT '' FROM prs_bedrijfadres ba where ba.prs_bedrijf_key= b.prs_bedrijf_key AND ba.prs_bedrijfadres_type='O')
+      AND EXISTS (SELECT '' FROM prs_bedrijfadres ba WHERE ba.prs_bedrijf_key = b.prs_bedrijf_key AND ba.prs_bedrijfadres_type = 'O')
       AND (o.mld_statusopdr_key = 5 OR o.mld_statusopdr_key = 4)
       AND o.mld_opdr_teverzenden = 1
       AND o.mld_opdr_verzonden IS NULL
    UNION ALL
-   SELECT b.prs_bedrijf_key, 'contract', c.cnt_contract_key, 2, cnt_contract_nummer_intern, ins_discipline_email
+   SELECT b.prs_bedrijf_key, NULL, 'contract', c.cnt_contract_key, 2, cnt_contract_nummer_intern, ins_discipline_email
      FROM prs_bedrijf b, cnt_contract c, ins_tab_discipline d
     WHERE b.prs_bedrijf_key = c.cnt_prs_bedrijf_key
       AND d.ins_discipline_key = c.ins_discipline_key
-      AND EXISTS (SELECT '' FROM prs_bedrijfadres ba where ba.prs_bedrijf_key= b.prs_bedrijf_key AND ba.prs_bedrijfadres_type='C' )
+      AND EXISTS (SELECT '' FROM prs_bedrijfadres ba WHERE ba.prs_bedrijf_key = b.prs_bedrijf_key AND ba.prs_bedrijfadres_type = 'C')
       AND c.cnt_contract_teverzenden = 1;
 
-
-
 // PLANMATIG ONDERHOUDS views (OPROGNOSE)
 -- Basisview voor intern gebruik
 CREATE_VIEW(fac_v_oprognosegegevens, 0) AS
@@ -1506,6 +1045,38 @@ AS
           DECODE(fac.getsetting ('licensed_key_users'),0,100,100*(fac.getsetting ('licensed_key_users') - fe_users)/fac.getsetting ('licensed_key_users'))
      FROM fac_v_lcrap_fe_vs_key;
 
+CREATE_VIEW (FAC_V_NOTI_LICENTIE, 0)
+(
+   sender,
+   receiver,
+   text,
+   code,
+   key,
+   xkey,
+   xemail,
+   xmobile
+)
+AS
+   SELECT DISTINCT
+          NULL sender,
+          NULL receiver,
+          TO_CHAR (fvl.key_users - fac.getsetting ('licensed_key_users'),
+                   'fm99999')
+          || ' Key users verschil en '
+          || TO_CHAR (fvl.fe_users - fac.getsetting ('licensed_fe_users'),
+                      'fm99999')
+          || ' Frontend users verschil',
+          'ADMLIC' code,
+          NULL key,
+          NULL xkey,
+          'info@facilitor.nl' xemail,
+          NULL xmobile
+     FROM fac_v_lcrap_fe_vs_key fvl
+    WHERE (fvl.key_users > fac.getsetting ('licensed_key_users')
+           OR fvl.fe_users > fac.getsetting ('licensed_fe_users'))
+          AND (fac.getsetting ('licensed_key_users') > 0
+               OR fac.getsetting ('licensed_key_users') > 0);
+
 
 /* KTO-views naar mld gemoved */
 

FCLT.NMK

@@ -3,7 +3,7 @@
 ##
 ##    Project: FACILITOR
 ##
-##             (c) 1995-2015 Facilitor B.V.
+##             (c) 1995-2017 Facilitor B.V.
 ##
 ##   Auteur:    Ir. P.G. Feij
 ##   $Revision$
@@ -60,9 +60,9 @@ PROJEXE=z:\Project\FACILITOR\BUILD
 ##
 ## New style using schemanumbers
 ##
-CURRENTVERSION=29
-NEXTVERSION=30
-FILEVERSION=c
+CURRENTVERSION=30
+NEXTVERSION=31
+FILEVERSION=e
 NEXTCAREVERSION=32
 NEXTROOT=DB$(NEXTVERSION)$(FILEVERSION)
 CURRENTUPDATE=DB$(CURRENTVERSION)to$(NEXTVERSION)
@@ -124,6 +124,10 @@ $(EXE)\$(NEXTROOT)\FCLT$(NEXTVERSION)$(FILEVERSION).SQL:   \
       $(MSRC)\alg\alg_tab.src   \
       $(MSRC)\alg\alg_tri.src   \
       $(MSRC)\alg\alg_vie.src   \
+      $(MSRC)\aut\aut_ind.src   \
+      $(MSRC)\aut\aut_seq.src   \
+      $(MSRC)\aut\aut_tab.src   \
+      $(MSRC)\aut\aut_tri.src   \
       $(MSRC)\bes\bes_ind.src   \
       $(MSRC)\bes\bes_ini.src   \
       $(MSRC)\bes\bes_pac.src   \
@@ -138,6 +142,13 @@ $(EXE)\$(NEXTROOT)\FCLT$(NEXTVERSION)$(FILEVERSION).SQL:   \
       $(MSRC)\bez\bez_tab.src   \
       $(MSRC)\bez\bez_tri.src   \
       $(MSRC)\bez\bez_vie.src   \
+      $(MSRC)\bgt\bgt_ind.src   \
+      $(MSRC)\bgt\bgt_ini.src   \
+      $(MSRC)\bgt\bgt_pac.src   \
+      $(MSRC)\bgt\bgt_seq.src   \
+      $(MSRC)\bgt\bgt_tab.src   \
+      $(MSRC)\bgt\bgt_tri.src   \
+      $(MSRC)\bgt\bgt_vie.src   \
       $(MSRC)\cad\cad_ind.src   \
       $(MSRC)\cad\cad_ini.src   \
       $(MSRC)\cad\cad_pac.src   \
@@ -165,6 +176,7 @@ $(EXE)\$(NEXTROOT)\FCLT$(NEXTVERSION)$(FILEVERSION).SQL:   \
 ##       $(MSRC)\fac\_fac_lclmdl.src \
       $(MSRC)\fac\fac_set.src   \
       $(MSRC)\fac\fac_pac.src   \
+      $(MSRC)\fac\fac_paca.src  \
       $(MSRC)\fac\fac_pacx.src  \
       $(MSRC)\fac\fac_pacf.src  \
       $(MSRC)\fac\fac_pacl.src  \

FCLT.SRC

@@ -47,7 +47,7 @@ WHENEVER SQLERROR CONTINUE;
 
 PROMPT [&fcltlogfile]
 PROMPT
-PROMPT Copyright 1996-2016 Facilitor bv, the Netherlands. ALL RIGHTS RESERVED.
+PROMPT Copyright 1996-2017 Facilitor bv, the Netherlands. ALL RIGHTS RESERVED.
 PROMPT
 PROMPT This is the generated list-file of EVALCONCAT(FCLT,_DBV).sql which was used
 PROMPT to create the FACILITOR(r) EVALCONCAT(DB,_DBV) schema in Oracle
@@ -57,6 +57,8 @@ SET LINESIZE 1000
 SET DEFINE OFF
 SET ECHO ON
 #include "adm\adm_tab.src"
+#include "adm\adm_seq.src"
+#include "adm\adm_tri.src"
 #include "adm\adm_pac.src"
 
 /* TYPES */
@@ -65,6 +67,7 @@ SET ECHO ON
 /* TABLES */
 #include "fac\fac_tab.src"
 #include "alg\alg_tab.src"
+#include "aut\aut_tab.src"
 #include "ins\ins_tab.src"
 #include "prs\prs_tab.src"
 #include "mld\mld_tab.src"
@@ -76,6 +79,7 @@ SET ECHO ON
 #include "cnt\cnt_tab.src"
 #include "bes\bes_tab.src"
 #include "fin\fin_tab.src"
+#include "bgt\bgt_tab.src"
 #include "prj\prj_tab.src"
 #include "msg\msg_tab.src"
 #include "kpi\kpi_tab.src"
@@ -84,6 +88,7 @@ SET ECHO ON
 /* SEQUENCES */
 #include "fac\fac_seq.src"
 #include "alg\alg_seq.src"
+#include "aut\aut_seq.src"
 #include "ins\ins_seq.src"
 #include "prs\prs_seq.src"
 #include "mld\mld_seq.src"
@@ -95,6 +100,7 @@ SET ECHO ON
 #include "cnt\cnt_seq.src"
 #include "bes\bes_seq.src"
 #include "fin\fin_seq.src"
+#include "bgt\bgt_seq.src"
 #include "prj\prj_seq.src"
 #include "msg\msg_seq.src"
 #include "kpi\kpi_seq.src"
@@ -103,6 +109,7 @@ SET ECHO ON
 /* INDICES */
 #include "fac\fac_ind.src"
 #include "alg\alg_ind.src"
+#include "aut\aut_ind.src"
 #include "ins\ins_ind.src"
 #include "prs\prs_ind.src"
 #include "mld\mld_ind.src"
@@ -114,6 +121,7 @@ SET ECHO ON
 #include "cnt\cnt_ind.src"
 #include "bes\bes_ind.src"
 #include "fin\fin_ind.src"
+#include "bgt\bgt_ind.src"
 #include "prj\prj_ind.src"
 #include "msg\msg_ind.src"
 #include "kpi\kpi_ind.src"
@@ -136,6 +144,7 @@ SET ECHO ON
 #include "cnt\cnt_ini.src"
 #include "bes\bes_ini.src"
 #include "fin\fin_ini.src"
+#include "bgt\bgt_ini.src"
 #include "prj\prj_ini.src"
 #include "msg\msg_ini.src"
 #include "kpi\kpi_ini.src"
@@ -166,5 +175,5 @@ SELECT 'Schema FACILITOR@' || USER || ' is now ' || fac.getdbversion() FROM DUAL
 PROMPT
 PROMPT Your schema initialisation is ready. Please check the logfile for errors.
 PROMPT If in doubt please contact: FACILITOR Helpdesk +31 53 4800 700
-PROMPT Copyright (c) 1992-2016 Facilitor bv, the Netherlands. All rights reserved.
+PROMPT Copyright (c) 1992-2017 Facilitor bv, the Netherlands. All rights reserved.
 SPOOL OFF

FIN/FIN_TAB.SRC

@@ -53,6 +53,8 @@ CREATE_TABLE(fin_btwtabelwaarde, 0)
     CONSTRAINT fin_u_fin_btwtabelwaarde UNIQUE(fin_btwtabel_key, fin_btwtabelwaarde_code, fin_btwtabelwaarde_verwijder)
 );
 
+ALTER TABLE prs_kostensoort ADD fin_btwtabelwaarde_key NUMBER(10) CONSTRAINT prs_r_fin_btwtabelwaarde_key REFERENCES fin_btwtabelwaarde (fin_btwtabelwaarde_key);
+
 ALTER TABLE prs_bedrijf
         ADD fin_btwtabel_key NUMBER(10)
  CONSTRAINT prs_r_fin_btwtabel_key1 REFERENCES fin_btwtabel(fin_btwtabel_key);
@@ -76,12 +78,12 @@ CREATE_TABLE(fin_factuur,0)
     VARCHAR2(30)
     NOT_NULL(fin_factuur_nr, fin_c_fin_factuur0)
 , fin_factuur_totaal
-    NUMBER(8,2)
+    NUMBER(12,2)
 , fin_factuur_totaal_btw
-    NUMBER (10,4)
+    NUMBER (14,4)
     NOT_NULL(fin_factuur_totaal_btw, fin_c_fin_factuur1)
 , fin_factuur_gbedrag
-    NUMBER(10,2)
+    NUMBER(14,2)
 , mld_opdr_key
     NUMBER(10)
     CONSTRAINT fin_r_fin_factuur1 REFERENCES mld_opdr(mld_opdr_key)
@@ -133,13 +135,13 @@ CREATE_TABLE(fin_factuurregel,0)
 , fin_factuurregel_nr
     NUMBER
 , fin_factuurregel_totaal
-    NUMBER(8,2)
+    NUMBER(12,2)
     NOT_NULL(fin_factuurregel_totaal, fin_c_fin_factuurregel2)
 , fin_factuurregel_btw
-    NUMBER(10,4)
+    NUMBER(14,4)
     NOT_NULL(fin_factuurregel_btw, fin_c_fin_factuurregel3)
 , fin_factuurregel_omschrijving
-    VARCHAR2(60)
+    VARCHAR2(250)
 , fin_factuurregel_referentie
     VARCHAR2(30)
 , fin_btwtabelwaarde_key

INS/INS_TAB.SRC

@@ -296,7 +296,7 @@ CREATE_TABLE(ins_deel,0)
  * Dit wordt in de B_IU-trigger gecontroleerd.
  */
     ins_deel_aantal
-        NUMBER(6)
+        NUMBER(8,2)
         DEFAULT 1
         CONSTRAINT ins_c_ins_deel_aantal2 CHECK
           (ins_deel_aantal is not null and ins_deel_aantal > 0),
@@ -524,26 +524,30 @@ CREATE_TABLE(ins_srtcontroledl_xcp, 0)
         NUMBER(6,2),
     ins_srtcontroledl_xcp_eenheid //  0=uurlijks, 1=dagelijks, 2=wekelijk, 3=maandelijk, 4=jaarlijks
         NUMBER(3),
-    ins_srtcontroledl_xcp_bits //  details, afhankelijk van de mode (mag best null zijn)
+    ins_srtcontroledl_xcp_bits    //  details, afhankelijk van de mode (mag best null zijn)
         NUMBER(4),
-    ins_srtcontroledl_xcp_uren      // vervangings- of controlekosten (geldt per stuk (ins_deel_aantal) per controle) bv tbv capaciteitsplanning
+    ins_srtcontroledl_xcp_aantal  // optionele overrule van het ins_deel_aantal tbv deze controle
+        NUMBER(8,2),
+    ins_srtcontroledl_xcp_aanteh  // optionele overrule van het ins_srtdeel_eenheid tbv deze controle (_eenheid bestond al)
+        VARCHAR2(30),
+    ins_srtcontroledl_xcp_uren    // vervangings- of controlekosten (geldt per stuk (ins_deel_aantal of ins_srtcontroledl_xcp_aantal) per controle) bv tbv capaciteitsplanning
          NUMBER(8,2),
-    ins_srtcontroledl_xcp_materia // vervangings- of controlekosten (geldt per stuk (ins_deel_aantal) per controle)
+    ins_srtcontroledl_xcp_materia // vervangings- of controlekosten (geldt per stuk (ins_deel_aantal of ins_srtcontroledl_xcp_aantal) per controle)
          NUMBER(9,2),
-    ins_srtcontroledl_xcp_kosten  // vervangings- of controlekosten (geldt per stuk (ins_deel_aantal) per controle)
+    ins_srtcontroledl_xcp_kosten  // vervangings- of controlekosten (geldt per stuk (ins_deel_aantal of ins_srtcontroledl_xcp_aantal) per controle)
          NUMBER(11,2),
-    ins_srtcontroledl_xcp_kosten2   // vervangings- of controlekosten (geldt per stuk (ins_deel_aantal) per controle) deel 2 (bv BTW laag)
+    ins_srtcontroledl_xcp_kosten2 // vervangings- of controlekosten (geldt per stuk (ins_deel_aantal of ins_srtcontroledl_xcp_aantal) per controle) deel 2 (bv BTW laag)
          NUMBER(11,2),
-    ins_srtcontroledl_xcp_kosten3   // vervangings- of controlekosten (geldt per stuk (ins_deel_aantal) per controle) deel 3 (spare)
+    ins_srtcontroledl_xcp_kosten3 // vervangings- of controlekosten (geldt per stuk (ins_deel_aantal) per controle of ins_srtcontroledl_xcp_aantal) deel 3 (spare)
          NUMBER(11,2),
-    ins_srtcontroledl_xcp_perc   // percentage van het aantal delen waarop dit betrekking heeft
+    ins_srtcontroledl_xcp_perc    // percentage van het aantal delen waarop dit betrekking heeft
         NUMBER(3)
         CONSTRAINT ins_c_srtcontroledl_xcp_perc CHECK(ins_srtcontroledl_xcp_perc BETWEEN 0 AND 100),
-    ins_srtcontroledl_xcp_groep // Vrijblijvende categorisering voor groepering in rapportages
+    ins_srtcontroledl_xcp_groep   // Vrijblijvende categorisering voor groepering in rapportages
         VARCHAR2(60),
     ins_srtcontroledl_xcp_startdat  // Startdatum eerste inspectie.
         DATE,
-    ins_srtcontroledl_xcp_eind  // hier eindigt deze
+    ins_srtcontroledl_xcp_eind    // hier eindigt deze
         DATE,
     ins_scenario_key
        NUMBER(10)
@@ -573,7 +577,7 @@ CREATE_TABLE(ins_deelsrtcontrole, 0)
        NUMBER(10)
        CONSTRAINT ins_r_ins_controlemode_key REFERENCES ins_controlemode,
     ins_deelsrtcontrole_opmerking
-        VARCHAR(2000 CHAR),
+        VARCHAR(4000 CHAR),
     ins_deelsrtcontrole_plandatum
        DATE,
     ins_deelsrtcontrole_status // (vooralsnog 0,2,5,6)

INS/INS_TRI.SRC

@@ -15,6 +15,16 @@ BEGIN
 END;
 /
 
+AUDIT_BEGIN(ins_tab_discipline)
+AUDIT_VALUE_K(ins_tab_discipline, ins_discipline_key, ins_discipline_omschrijving)
+AUDIT_VALUE_K(ins_tab_discipline, ins_discipline_key, ins_discipline_volgnr)
+AUDIT_VALUE_K(ins_tab_discipline, ins_discipline_key, prs_kostensoort_key)
+AUDIT_VALUE_K(ins_tab_discipline, ins_discipline_key, ins_discipline_kpnverplicht)
+AUDIT_VALUE_K(ins_tab_discipline, ins_discipline_key, ins_discipline_email)
+AUDIT_VALUE_K(ins_tab_discipline, ins_discipline_key, ins_discipline_ktopercentage)
+AUDIT_VALUE_K(ins_tab_discipline, ins_discipline_key, ins_discipline_ktodrempel)
+AUDIT_VALUE_K(ins_tab_discipline, ins_discipline_key, ins_discipline_verwijder)
+AUDIT_END()
 
 CREATE_TRIGGER(ins_t_ins_discipline_B_IU)
 BEFORE INSERT OR UPDATE ON ins_tab_discipline
@@ -922,6 +932,12 @@ BEGIN
 END;
 /
 
+AUDIT_BEGIN(ins_disc_params)
+AUDIT_VALUE(ins_disc_params, ins_disc_params_autonum)
+AUDIT_VALUE(ins_disc_params, ins_disc_params_cadlayers)
+AUDIT_VALUE(ins_disc_params, ins_disc_params_type)
+AUDIT_END()
+
 CREATE_TRIGGER(ins_t_ins_disc_params_b_iu)
 BEFORE INSERT OR UPDATE ON ins_disc_params
 FOR EACH ROW

INS/INS_VIE.SRC

@@ -3,29 +3,6 @@
  *  $Id$
  */
 
-// Alle  XXX-disciplines,
-CREATE_VIEW(all_discipline, 0) AS SELECT * from ins_tab_discipline;
-
-// Alle actuele XXX-disciplines
-DEFINIEER_VIEW_AANWEZIG(ins_tab_discipline, ins_discipline_verwijder,
-    all_v_aanwezigdiscipline,0);
-
-// Alle actuele groepsoorten
-CREATE_VIEW(all_v_aanwezigsrtgroep, 0)
-AS
-   SELECT g.*
-     FROM ins_srtgroep g, all_v_aanwezigdiscipline d
-    WHERE     g.ins_srtgroep_verwijder IS NULL
-          AND g.ins_discipline_key = d.ins_discipline_key;
-
-// Alle actuele deelsoorten
-CREATE_VIEW(all_v_aanwezigsrtdeel, 0)
-AS
-   SELECT d.*
-     FROM ins_srtdeel d, all_v_aanwezigsrtgroep g
-    WHERE d.ins_srtdeel_verwijder IS NULL
-          AND d.ins_srtgroep_key = g.ins_srtgroep_key;
-
 //
 // Hierboven geldt voor alle modules, nu verder met INS-specifiek
 //
@@ -62,11 +39,6 @@ AS
           AND fac_code2label_domein = 'controle'
           AND fac_locale_xsl_lang = lcl.getuserlanguage ();
 
-/* Views met ins_deel moeten voorwaarde : "WHERE ins_deel_parent_key IS NULL" bevatten... */
-DEFINIEER_VIEW_AANWEZIG(ins_deel, ins_deel_verwijder,
-    all_v_aanwezigdeel,0) AND
-    ins_deel_parent_key IS NULL;
-
 /* Views met ins_deel moeten voorwaarde : "AND ins_deel_parent_key IS NULL" bevatten... */
 DEFINIEER_VIEW_AANWEZIG(ins_deel, ins_deel_verwijder,
     ins_v_aanwezigdeel,0) AND
@@ -86,14 +58,6 @@ CREATE_VIEW(ins_v_srtgroep_gegevens,0) AS
     WHERE
         ins_D.ins_discipline_key = ins_SG.ins_discipline_key;
 
-CREATE_VIEW(all_v_srtgroep_gegevens,0) AS
-    SELECT ins_D.ins_discipline_key, ins_D.ins_discipline_omschrijving,
-           ins_SG.ins_srtgroep_key, ins_SG.ins_srtgroep_omschrijving,
-           ins_SG.ins_srtgroep_upper, ins_SG.ins_srtgroep_module
-    FROM all_v_aanwezigdiscipline ins_D, all_v_aanwezigsrtgroep ins_SG
-    WHERE
-        ins_D.ins_discipline_key = ins_SG.ins_discipline_key;
-
 CREATE_VIEW(ins_v_srtdeel_gegevens,0) AS
     SELECT ins_D.ins_discipline_key, ins_D.ins_discipline_omschrijving,
            ins_SG.ins_srtgroep_key, ins_SG.ins_srtgroep_omschrijving,
@@ -109,20 +73,6 @@ CREATE_VIEW(ins_v_srtdeel_gegevens,0) AS
         ins_SG.ins_srtgroep_key = ins_SD.ins_srtgroep_key AND
         ins_D.ins_discipline_key = ins_SG.ins_discipline_key;
 
-CREATE_VIEW(all_v_srtdeel_gegevens,0) AS
-    SELECT ins_D.ins_discipline_key, ins_D.ins_discipline_omschrijving,
-           ins_SG.ins_srtgroep_key, ins_SG.ins_srtgroep_omschrijving,
-           ins_SG.ins_srtgroep_upper, ins_SD.ins_srtdeel_key,
-           INS_SD.ins_srtdeel_code,ins_SD.ins_srtdeel_code_upper,
-           ins_SD.ins_srtdeel_upper, ins_SD.ins_srtdeel_omschrijving,
-           ins_SD.ins_srtdeel_module
-    FROM all_v_aanwezigdiscipline ins_D, all_v_aanwezigsrtgroep ins_SG,
-         all_v_aanwezigsrtdeel ins_SD
-    WHERE
-        ins_SG.ins_srtgroep_key = ins_SD.ins_srtgroep_key AND
-        ins_D.ins_discipline_key = ins_SG.ins_discipline_key;
-
-
 CREATE_VIEW(ins_v_alg_overzicht,0)
 (
    alg_onroerendgoed_keys,
@@ -1177,14 +1127,36 @@ ins_v_aanwezigkenmerkdeel, 0);
 
 CREATE_VIEW(ins_v_srtdeel_kenmerkdeel, 0)
          (INS_KENMERK_KEY, INS_DEEL_KEY, INS_KENMERKDEEL_WAARDE) AS
-SELECT idsk.ins_kenmerk_key, idsk.ins_deel_key,
-       ins_kd.ins_kenmerkdeel_waarde
-  FROM ins_v_aanwezigkenmerkdeel ins_kd,
-       (SELECT ins_deel_key, ins_kenmerk_key
-          FROM ins_deel ins_d, ins_v_srtdeel_kenmerk_keys ins_sdk
-         WHERE ins_d.ins_srtdeel_key = ins_sdk.ins_srtdeel_key) idsk
- WHERE idsk.ins_deel_key = ins_kd.ins_deel_key(+)
-   AND idsk.ins_kenmerk_key = ins_kd.ins_kenmerk_key(+);
+   SELECT idsk.ins_kenmerk_key,
+          idsk.ins_deel_key,
+          ins_kd.ins_kenmerkdeel_waarde
+     FROM ins_kenmerk k1,
+          ins_v_aanwezigkenmerkdeel ins_kd,
+          (SELECT ins_deel_key, ins_kenmerk_key
+             FROM ins_deel ins_d, ins_v_srtdeel_kenmerk_keys ins_sdk
+            WHERE ins_d.ins_srtdeel_key = ins_sdk.ins_srtdeel_key) idsk
+    WHERE     idsk.ins_deel_key = ins_kd.ins_deel_key(+)
+          AND idsk.ins_kenmerk_key = ins_kd.ins_kenmerk_key(+)
+          AND k1.ins_kenmerk_key = idsk.ins_kenmerk_key
+          AND k1.ins_kenmerk_bewerkniveau = 'D'
+   UNION ALL
+   SELECT kmd.ins_kenmerk_key,
+          kd.ins_deel_key,
+          kmd.ins_kenmerkdeel_waarde
+     FROM ins_kenmerk k2,
+          ins_kenmerkdeel kmd,
+          ins_deel kd
+    WHERE k2.ins_srtinstallatie_key =
+          (SELECT CASE
+                     WHEN k2.ins_kenmerk_niveau = 'S' THEN kd.ins_srtdeel_key
+                     WHEN k2.ins_kenmerk_niveau = 'G' THEN (SELECT sd.ins_srtgroep_key FROM ins_srtdeel sd WHERE sd.ins_srtdeel_key = kd.ins_srtdeel_key)
+                     WHEN k2.ins_kenmerk_niveau = 'D' THEN kd.ins_discipline_key
+                     ELSE 0
+                  END
+             FROM DUAL)
+      AND kd.ins_srtdeel_key = kmd.ins_deel_key
+      AND k2.ins_kenmerk_key = kmd.ins_kenmerk_key
+      AND k2.ins_kenmerk_bewerkniveau = 'S';
 
 CREATE_VIEW(ins_v_srtdeel_kenmerk_keys,0)
 AS
@@ -1264,24 +1236,6 @@ UNION
 DEFINIEER_VIEW_AANWEZIG(ins_compositie, ins_compositie_verwijder,
    ins_v_aanwezigcompositie,0);
 
-CREATE_VIEW(ins_v_compositie_gegevens,0)
-          (ins_srtdeel_comp_key,
-           ins_compositie_key,
-           ins_compositie_naam,
-           ins_srtdeel_key,
-           ins_srtdeel_omschrijving) AS
-  SELECT INS_DC.ins_srtdeel_comp_key,
-         INS_DC.ins_compositie_key,
-         INS_CO.ins_compositie_naam,
-         INS_DC.ins_srtdeel_key,
-         INS_SD.ins_srtdeel_omschrijving
-    FROM ins_srtdeel_compositie INS_DC, ins_compositie INS_CO,
-         all_v_srtdeel_gegevens INS_SD
-   WHERE INS_DC.ins_compositie_key = INS_CO.ins_compositie_key
-     AND INS_DC.ins_srtdeel_key = INS_SD.ins_srtdeel_key
-     AND INS_DC.ins_srtdeel_comp_verwijder IS NULL;
-
-
 CREATE_VIEW(ins_v_deel_plaatsaanduiding_r,0)
    (      alg_plaatsaanduiding
    ,      prs_werkplek_key
@@ -1369,13 +1323,6 @@ AS SELECT INS_D.ins_deel_key,
    AND    ins_alg_ruimte_type = 'W'
    AND    ins_deel_verwijder IS NULL;
 
-CREATE_VIEW (ins_v_deel_acadsymbol,0)
-   ( ins_deel_key, ins_srtdeel_acadsymbol )
-AS SELECT ins_deel_key,
-    ins_srtdeel_acadsymbol
-FROM ins_deel, ins_srtdeel
-WHERE ins_deel.ins_srtdeel_key = ins_srtdeel.ins_srtdeel_key;
-
 /* Formatted on 17-7-2012 12:16:55 (QP5 v5.115.810.9015) */
 CREATE_VIEW (ins_v_rap_sle_toegang, 0)
    (fclt_3d_locatie_key,
@@ -1552,6 +1499,7 @@ CREATE_VIEW(ins_v_defined_inspect, 0)
    ins_deel_key,
    ins_deel_aanmaak,
    ins_deel_aantal,
+   ins_srtdeel_eenheid,
    ins_alg_locatie_key,
    ins_discipline_key,
    ins_srtgroep_key,
@@ -1584,6 +1532,7 @@ AS
    SELECT id.ins_deel_key,
           id.ins_deel_aanmaak,
           id.ins_deel_aantal,
+          s.ins_srtdeel_eenheid,
           id.ins_alg_locatie_key,
           id.ins_discipline_key,
           s.ins_srtgroep_key,
@@ -1629,6 +1578,7 @@ CREATE_VIEW(ins_v_defined_inspect_xcp, 0)
    ins_deel_key,
    ins_deel_aanmaak,
    ins_deel_aantal,
+   ins_srtdeel_eenheid,
    ins_alg_locatie_key,
    ins_discipline_key,
    ins_srtgroep_key,
@@ -1662,6 +1612,10 @@ CREATE_VIEW(ins_v_defined_inspect_xcp, 0)
    ins_srtcontroledl_xcp_perc,
    ins_srtcontroledl_xcp_startdat,
    ins_srtcontroledl_xcp_eind,
+   ins_srtcontroledl_xcp_groep,
+   ins_srtcontroledl_xcp_opmerk,
+   ins_srtcontroledl_xcp_aantal,
+   ins_srtcontroledl_xcp_aanteh,
    ins_scenario_key,
    ctr_discipline_key,
    ctr_controle_type,
@@ -1670,7 +1624,8 @@ CREATE_VIEW(ins_v_defined_inspect_xcp, 0)
 AS
    SELECT di.ins_deel_key,
           di.ins_deel_aanmaak,
-          di.ins_deel_aantal,
+          COALESCE (ins_srtcontroledl_xcp_aantal, di.ins_deel_aantal),
+          COALESCE (ins_srtcontroledl_xcp_aanteh, di.ins_srtdeel_eenheid),
           di.ins_alg_locatie_key,
           di.ins_discipline_key,
           di.ins_srtgroep_key,
@@ -1678,10 +1633,8 @@ AS
           di.ins_srtcontrole_key,
           di.ins_srtcontrole_omschrijving,
           di.ins_srtcontrole_mode,
-          COALESCE (ins_srtcontroledl_xcp_eenheid,
-                    di.ins_srtcontrole_eenheid),
-          COALESCE (ins_srtcontroledl_xcp_periode,
-                    di.ins_srtcontrole_periode),
+          COALESCE (ins_srtcontroledl_xcp_eenheid, di.ins_srtcontrole_eenheid),
+          COALESCE (ins_srtcontroledl_xcp_periode, di.ins_srtcontrole_periode),
           COALESCE (ins_srtcontroledl_xcp_bits, di.ins_srtcontrole_bits),
           COALESCE (ins_srtcontroledl_xcp_kosten, di.ins_srtcontrole_kosten),
           COALESCE (ins_srtcontroledl_xcp_kosten2, di.ins_srtcontrole_kosten2),
@@ -1706,6 +1659,10 @@ AS
           ins_srtcontroledl_xcp_perc,
           ins_srtcontroledl_xcp_startdat,
           ins_srtcontroledl_xcp_eind,
+          ins_srtcontroledl_xcp_groep,
+          ins_srtcontroledl_xcp_opmerk,
+          ins_srtcontroledl_xcp_aantal,
+          ins_srtcontroledl_xcp_aanteh,
           ins_scenario_key,
           di.ctr_discipline_key,
           di.ctr_controle_type,
@@ -2165,5 +2122,249 @@ AS
        AND km.ins_kenmerk_key = k.ins_kenmerk_key(+)
        AND k.ins_srtkenmerk_key = skm.ins_srtkenmerk_key(+);
 
+-- Alle gedane en lopende inspecties van alle objecten.
+CREATE OR REPLACE FORCE VIEW ins_v_udr_deelinspect
+AS
+SELECT d.deel_key,
+       d.discipline,
+       d.soort,
+       d.groep,
+       d.soortcode,
+       d.omschrijving,
+       d.plaatseigenaar,
+       d.plaatseigenaartype,
+       d.plaatsaanduiding,
+       d.eigenaar,
+       d.opmerking,
+       d.regio,
+       d.district,
+       d.locatie_code,
+       d.locatie_omschrijving,
+       d.locatie_plaats,
+       d.gebouwcode,
+       d.gebouw,
+       d.terreinsectorcode,
+       d.terreinsector,
+       d.verdiepingcode,
+       d.ruimtenr,
+       d.werkplekvolgnr,
+       d.werkplek,
+       d.uitleenbaar,
+       d.uitgeleend,
+       d.res_opmerking,
+       d.beheerder,
+       d.vervaldatum,
+       d.actief,
+       d.aantal,
+       d.state,
+       d.statedate,
+       d.fclt_3d_discipline_key,
+       d.fclt_3d_afdeling_key,
+       d.fclt_3d_locatie_key,
+       idsc.ins_deelsrtcontrole_key,
+       idsc.ins_srtcontrole_key,
+       (SELECT isc.ins_srtcontrole_omschrijving
+          FROM ins_srtcontrole isc
+         WHERE isc.ins_srtcontrole_key = idsc.ins_srtcontrole_key) srtcontrole_omschrijving,
+       idsc.ins_deelsrtcontrole_datum,
+       (SELECT icm.ins_controlemode_oms
+          FROM ins_controlemode icm
+         WHERE icm.ins_controlemode_key = idsc.ins_controlemode_key) controlemode_omschrijving,
+       idsc.ins_deelsrtcontrole_opmerking,
+       (SELECT prs_perslid_naam_full
+          FROM prs_v_perslid_fullnames_all pf
+         WHERE pf.prs_perslid_key = idsc.prs_perslid_key) perslid,
+       idsc.ins_deelsrtcontrole_datum_org,
+       idsc.ins_deelsrtcontrole_plandatum,
+       (SELECT lcl.x ('fc2l.fac_code2label_label', fc2l.fac_code2label_key, fc2l.fac_code2label_label)
+          FROM fac_code2label fc2l
+         WHERE fc2l.fac_code2label_domein = 'controle'
+           AND fc2l.fac_code2label_code = idsc.ins_deelsrtcontrole_status) deelsrtcontrole_status
+  FROM ins_v_udr_deel d,
+       ins_deelsrtcontrole idsc
+ WHERE d.deel_key = idsc.ins_deel_key;
+
+-- Alle soort controles die op de objecten zitten.
+CREATE OR REPLACE FORCE VIEW ins_v_udr_deelsrtcontrole
+AS
+SELECT di.deel_key,
+       di.discipline,
+       di.soort,
+       di.groep,
+       di.soortcode,
+       di.omschrijving,
+       di.plaatseigenaar,
+       di.plaatseigenaartype,
+       di.plaatsaanduiding,
+       di.eigenaar,
+       di.opmerking,
+       di.regio,
+       di.district,
+       di.locatie_code,
+       di.locatie_omschrijving,
+       di.locatie_plaats,
+       di.gebouwcode,
+       di.gebouw,
+       di.terreinsectorcode,
+       di.terreinsector,
+       di.verdiepingcode,
+       di.ruimtenr,
+       di.werkplekvolgnr,
+       di.werkplek,
+       di.uitleenbaar,
+       di.uitgeleend,
+       di.res_opmerking,
+       di.beheerder,
+       di.vervaldatum,
+       di.actief,
+       di.aantal,
+       di.state,
+       di.statedate,
+       di.fclt_3d_discipline_key,
+       di.fclt_3d_afdeling_key,
+       di.fclt_3d_locatie_key,
+       iscx.ins_deel_aanmaak,
+       iscx.ins_deel_aantal,
+       (SELECT isc.ins_srtcontrole_omschrijving
+          FROM ins_srtcontrole isc
+         WHERE isc.ins_srtcontrole_key = iscx.ins_srtcontrole_key) ins_srtcontrole_omschrijving,
+       CASE
+       WHEN iscx.ins_srtcontrole_mode = 0
+       THEN lcl.l('lcl_ins_srtcontrole_moment')
+       ELSE lcl.l('lcl_ins_srtcontrole_interval')
+       END ins_srtcontrole_mode,
+       CASE
+       WHEN iscx.ins_srtcontrole_eenheid = 0
+       THEN lcl.l('lcl_ins_controle_uurlijks')
+       WHEN iscx.ins_srtcontrole_eenheid = 1
+       THEN lcl.l('lcl_ins_controle_dagelijks')
+       WHEN iscx.ins_srtcontrole_eenheid = 2
+       THEN lcl.l('lcl_ins_controle_wekelijks')
+       WHEN iscx.ins_srtcontrole_eenheid = 3
+       THEN lcl.l('lcl_ins_controle_maandelijks')
+       WHEN iscx.ins_srtcontrole_eenheid = 4
+       THEN lcl.l('lcl_ins_controle_jaarlijks')
+       END ins_srtcontrole_eenheid,
+       iscx.ins_srtcontrole_periode,
+       --iscx.ins_srtcontrole_bits,
+       CASE
+       WHEN iscx.ins_srtcontrole_mode = 0 AND (iscx.ins_srtcontrole_eenheid = 0 OR iscx.ins_srtcontrole_eenheid = 1)
+       THEN
+            CASE
+            WHEN BITAND(iscx.ins_srtcontrole_bits, 128) = 128
+            THEN lcl.l('lcl_ins_controle_notholiday') || '.'
+            ELSE ''
+            END
+       WHEN iscx.ins_srtcontrole_bits < 256 AND iscx.ins_srtcontrole_mode = 0 AND iscx.ins_srtcontrole_eenheid = 2
+       THEN
+            TRIM(CASE WHEN BITAND(iscx.ins_srtcontrole_bits,  1) =  1 THEN INITCAP(lcl.l('lcl_dag_1')) || ' ' END ||
+                 CASE WHEN BITAND(iscx.ins_srtcontrole_bits,  2) =  2 THEN INITCAP(lcl.l('lcl_dag_2')) || ' ' END ||
+                 CASE WHEN BITAND(iscx.ins_srtcontrole_bits,  4) =  4 THEN INITCAP(lcl.l('lcl_dag_3')) || ' ' END ||
+                 CASE WHEN BITAND(iscx.ins_srtcontrole_bits,  8) =  8 THEN INITCAP(lcl.l('lcl_dag_4')) || ' ' END ||
+                 CASE WHEN BITAND(iscx.ins_srtcontrole_bits, 16) = 16 THEN INITCAP(lcl.l('lcl_dag_5')) || ' ' END ||
+                 CASE WHEN BITAND(iscx.ins_srtcontrole_bits, 32) = 32 THEN INITCAP(lcl.l('lcl_dag_6')) || ' ' END ||
+                 CASE WHEN BITAND(iscx.ins_srtcontrole_bits, 64) = 64 THEN INITCAP(lcl.l('lcl_dag_7')) || ' ' END
+                ) || '.'
+            ||
+            CASE
+            WHEN BITAND(iscx.ins_srtcontrole_bits, 128) = 128
+            THEN ' ' || lcl.l('lcl_ins_controle_notholiday') || '.'
+            ELSE ''
+            END
+       WHEN iscx.ins_srtcontrole_bits >= 256 AND iscx.ins_srtcontrole_mode = 0 AND iscx.ins_srtcontrole_eenheid = 3
+       THEN
+            CASE
+            WHEN BITAND(iscx.ins_srtcontrole_bits, 1792) = 1792 THEN lcl.l('lcl_ins_controle_laatste') || ' '
+            WHEN BITAND(iscx.ins_srtcontrole_bits, 1536) = 1536 THEN lcl.l('lcl_ins_controle_eennalaatste') || ' '
+            WHEN BITAND(iscx.ins_srtcontrole_bits, 1280) = 1280 THEN lcl.l('lcl_ins_controle_vijfde') || ' '
+            WHEN BITAND(iscx.ins_srtcontrole_bits,  768) =  768 THEN lcl.l('lcl_ins_controle_derde') || ' '
+            WHEN BITAND(iscx.ins_srtcontrole_bits, 1024) = 1024 THEN lcl.l('lcl_ins_controle_vierde') || ' '
+            WHEN BITAND(iscx.ins_srtcontrole_bits,  512) =  512 THEN lcl.l('lcl_ins_controle_tweede') || ' '
+            WHEN BITAND(iscx.ins_srtcontrole_bits,  256) =  256 THEN lcl.l('lcl_ins_controle_eerste') || ' '
+            END
+            ||
+            CASE
+            WHEN BITAND(iscx.ins_srtcontrole_bits,  1) =  1 THEN LOWER(lcl.l('lcl_dag_1'))
+            WHEN BITAND(iscx.ins_srtcontrole_bits,  2) =  2 THEN LOWER(lcl.l('lcl_dag_2'))
+            WHEN BITAND(iscx.ins_srtcontrole_bits,  4) =  4 THEN LOWER(lcl.l('lcl_dag_3'))
+            WHEN BITAND(iscx.ins_srtcontrole_bits,  8) =  8 THEN LOWER(lcl.l('lcl_dag_4'))
+            WHEN BITAND(iscx.ins_srtcontrole_bits, 16) = 16 THEN LOWER(lcl.l('lcl_dag_5'))
+            WHEN BITAND(iscx.ins_srtcontrole_bits, 32) = 32 THEN LOWER(lcl.l('lcl_dag_6'))
+            WHEN BITAND(iscx.ins_srtcontrole_bits, 64) = 64 THEN LOWER(lcl.l('lcl_dag_7'))
+            END
+            ||
+            lcl.l('lcl_ins_controle_period_ofthemonth') || '.'
+            ||
+            CASE
+            WHEN BITAND(iscx.ins_srtcontrole_bits, 128) = 128
+            THEN ' ' || lcl.l('lcl_ins_controle_notholiday') || '.'
+            ELSE ''
+            END
+       WHEN iscx.ins_srtcontrole_mode = 0 AND iscx.ins_srtcontrole_eenheid = 4
+       THEN
+            CASE
+            WHEN BITAND(iscx.ins_srtcontrole_bits, 12) = 12 THEN INITCAP(lcl.l('lcl_maand_12'))
+            WHEN BITAND(iscx.ins_srtcontrole_bits, 11) = 11 THEN INITCAP(lcl.l('lcl_maand_11'))
+            WHEN BITAND(iscx.ins_srtcontrole_bits, 10) = 10 THEN INITCAP(lcl.l('lcl_maand_10'))
+            WHEN BITAND(iscx.ins_srtcontrole_bits,  9) =  9 THEN INITCAP(lcl.l('lcl_maand_9'))
+            WHEN BITAND(iscx.ins_srtcontrole_bits,  8) =  8 THEN INITCAP(lcl.l('lcl_maand_8'))
+            WHEN BITAND(iscx.ins_srtcontrole_bits,  7) =  7 THEN INITCAP(lcl.l('lcl_maand_7'))
+            WHEN BITAND(iscx.ins_srtcontrole_bits,  6) =  6 THEN INITCAP(lcl.l('lcl_maand_6'))
+            WHEN BITAND(iscx.ins_srtcontrole_bits,  5) =  5 THEN INITCAP(lcl.l('lcl_maand_5'))
+            WHEN BITAND(iscx.ins_srtcontrole_bits,  4) =  4 THEN INITCAP(lcl.l('lcl_maand_4'))
+            WHEN BITAND(iscx.ins_srtcontrole_bits,  3) =  3 THEN INITCAP(lcl.l('lcl_maand_3'))
+            WHEN BITAND(iscx.ins_srtcontrole_bits,  2) =  2 THEN INITCAP(lcl.l('lcl_maand_2'))
+            WHEN BITAND(iscx.ins_srtcontrole_bits,  1) =  1 THEN INITCAP(lcl.l('lcl_maand_1'))
+            END
+       END ins_srtcontrole_bits,
+       iscx.ins_srtcontrole_kosten,
+       iscx.ins_srtcontrole_kosten2,
+       iscx.ins_srtcontrole_kosten3,
+       iscx.ins_srtcontrole_uren,
+       iscx.ins_srtcontrole_materiaal,
+       iscx.ins_srtcontrole_percentage,
+       iscx.ins_srtcontrole_eind,
+       iscx.ins_srtcontrole_groep,
+       iscx.ins_srtcontrole_opmerking,
+       iscx.ins_srtcontrole_info,
+       iscx.ins_srtcontrole_level,
+       iscx.ins_srtcontrole_afbouwtijd,
+       iscx.ins_srtcontrole_options,
+       (SELECT fbtw.fin_btwtabelwaarde_oms
+          FROM fin_btwtabelwaarde fbtw
+         WHERE fbtw.fin_btwtabelwaarde_key = iscx.fin_btwtabelwaarde_key) fin_btwtabelwaarde_oms,
+       iscx.ins_srtcontroledl_xcp_key,
+       iscx.ins_srtcontroledl_xcp_kosten,
+       iscx.ins_srtcontroledl_xcp_kosten2,
+       iscx.ins_srtcontroledl_xcp_kosten3,
+       iscx.ins_srtcontroledl_xcp_uren,
+       iscx.ins_srtcontroledl_xcp_materia,
+       iscx.ins_srtcontroledl_xcp_perc,
+       iscx.ins_srtcontroledl_xcp_startdat,
+       iscx.ins_srtcontroledl_xcp_eind,
+       (SELECT iscen.ins_scenario_omschrijving
+          FROM ins_scenario iscen
+         WHERE iscen.ins_scenario_key = iscx.ins_scenario_key) ins_scenario_omschrijving,
+       --iscx.ctr_discipline_key,
+       (SELECT ctrd.ins_discipline_omschrijving
+          FROM ctr_discipline ctrd
+         WHERE ctrd.ins_discipline_key = iscx.ctr_discipline_key) ctr_discipline,
+       CASE
+       WHEN iscx.ctr_controle_type = 1
+       THEN lcl.l('lcl_ins_srtcontrole_insp')
+       WHEN iscx.ctr_controle_type = 2
+       THEN lcl.l('lcl_ins_srtcontrole_repl')
+       WHEN iscx.ctr_controle_type = 3
+       THEN lcl.l('lcl_ins_srtcontrole_cert')
+       END ctr_controle_type,
+       CASE
+       WHEN iscx.ctr_ismjob = 0
+       THEN lcl.l('lcl_no')
+       ELSE lcl.l('lcl_yes')
+       END ctr_ismjob
+  FROM ins_v_udr_deel di,
+       ins_v_defined_inspect_xcp iscx
+ WHERE di.deel_key = iscx.ins_deel_key;
+
 REGISTERRUN('$Id$')
 #endif  // INS

MLD/MLD_LCL.SRC

@@ -130,19 +130,15 @@ DEFINE_LOCALEITEM(lcl_mld_rejected1)
 DEFINE_LOCALEITEM(lcl_mld_rejected2)
 DEFINE_LOCALEITEM(lcl_mld_result)
 DEFINE_LOCALEITEM(lcl_mld_similarcalls)
+DEFINE_LOCALEITEM(lcl_mld_startdate)
 DEFINE_LOCALEITEM(lcl_mld_status)
 DEFINE_LOCALEITEM(lcl_mld_typeopdr)
 DEFINE_LOCALEITEM(lcl_mld_uitgegeven)
 DEFINE_LOCALEITEM(lcl_mld_urg)
-DEFINE_LOCALEITEM(lcl_mld_urg_hold1)
 DEFINE_LOCALEITEM(lcl_mld_urg_hoog)
-DEFINE_LOCALEITEM(lcl_mld_urg_hoog1)
 DEFINE_LOCALEITEM(lcl_mld_urg_kritiek)
-DEFINE_LOCALEITEM(lcl_mld_urg_kritiek1)
 DEFINE_LOCALEITEM(lcl_mld_urg_laag)
-DEFINE_LOCALEITEM(lcl_mld_urg_laag1)
 DEFINE_LOCALEITEM(lcl_mld_urg_normaal)
-DEFINE_LOCALEITEM(lcl_mld_urg_normaal1)
 DEFINE_LOCALEITEM(lcl_noti_email)
 DEFINE_LOCALEITEM(lcl_noti_mld_email)
 DEFINE_LOCALEITEM(lcl_obj_advanced)
@@ -195,6 +191,7 @@ DEFINE_LOCALEITEM(lcl_mld_mldstatus)
 DEFINE_LOCALEITEM(lcl_mld_opdr_closed_3)
 DEFINE_LOCALEITEM(lcl_mld_person_prefix)
 DEFINE_LOCALEITEM(lcl_mld_vakgroep)
+DEFINE_LOCALEITEM(lcl_mld_subject)
 END_LOCALEITEMS()
 
 START_LOCALEITEMS('MLD_TYPEOPDR_KEY')

MLD/MLD_PAC.SRC

@@ -57,6 +57,7 @@ CREATE OR REPLACE PACKAGE mld AS
                           v_werkdagen             OUT  NUMBER
                         );
   FUNCTION getacceptdatum            (startdate IN DATE, stdm_key IN NUMBER, alg_key IN NUMBER)  RETURN DATE;
+  FUNCTION getnettotijdsbesteding    (p_opdr_key    IN NUMBER, p_prs_key IN NUMBER DEFAULT NULL) RETURN NUMBER;
   FUNCTION bepaalopdrmeldingvolgnr   (p_melding_key IN NUMBER) RETURN NUMBER;
   FUNCTION bepaalopdrcontractvolgnr  (p_contract_key IN NUMBER) RETURN NUMBER;
   FUNCTION mldsprintf                (ps IN VARCHAR2, p_melding_key IN NUMBER) RETURN VARCHAR2;
@@ -506,6 +507,8 @@ CREATE OR REPLACE PACKAGE BODY mld AS
    PROCEDURE notifybackoffice (pmeldingkey IN NUMBER, pcode IN VARCHAR2)
    AS
       lloc_key       mld_melding.mld_alg_locatie_key%TYPE;
+      lonrg_key      mld_melding.mld_alg_onroerendgoed_keys%TYPE;
+      lalg_type      alg_v_onroerendgoed.alg_type%TYPE;
       lafd_key       prs_perslid.prs_afdeling_key%TYPE;
       ldisc_key      mld_stdmelding.mld_ins_discipline_key%TYPE;
       lspoed         mld_melding.mld_melding_spoed%TYPE;
@@ -539,6 +542,8 @@ CREATE OR REPLACE PACKAGE BODY mld AS
          -- 3 (bo3 en dan bof) |       BO3(MLD2B3)  |         BOF(MLD2BO)       | Zowel de WEB_MLDBO3 als WEB_MLDBOF rechten zijn actief.
          --
          SELECT   m.mld_alg_locatie_key,
+                  m.mld_alg_onroerendgoed_keys,
+                  onrg.alg_type,
                   p.prs_afdeling_key,
                   stdm.mld_ins_discipline_key,
                   m.mld_melding_spoed,
@@ -546,6 +551,8 @@ CREATE OR REPLACE PACKAGE BODY mld AS
                   mdp.mld_disc_params_offhours,
                   m.mld_melding_status
            INTO   lloc_key,
+                  lonrg_key,
+                  lalg_type,
                   lafd_key,
                   ldisc_key,
                   lspoed,
@@ -556,7 +563,8 @@ CREATE OR REPLACE PACKAGE BODY mld AS
                   prs_perslid p,
                   mld_stdmelding stdm,
                   ins_tab_discipline d,
-                  mld_disc_params mdp
+                  mld_disc_params mdp,
+                  alg_v_onroerendgoed onrg
           WHERE   m.prs_perslid_key = p.prs_perslid_key
             AND   stdm.mld_stdmelding_key = m.mld_stdmelding_key
             -- Eerste notificatie: Melding is nieuw (2).
@@ -568,6 +576,7 @@ CREATE OR REPLACE PACKAGE BODY mld AS
                 OR (mld_melding_status = 4 AND pcode = 'MLDACP' AND mdp.mld_disc_params_bonotify = 3))
             AND   stdm.mld_ins_discipline_key = d.ins_discipline_key
             AND   d.ins_discipline_key = mdp.mld_ins_discipline_key
+            AND   m.mld_alg_onroerendgoed_keys = onrg.alg_onroerendgoed_keys(+)
             AND   mld_melding_key = pmeldingkey;                   -- op dit moment nog alleen voor NIEUWE meldingen
 
          -- Als die er niet is sprongen we al naar de exception
@@ -662,13 +671,33 @@ CREATE OR REPLACE PACKAGE BODY mld AS
                                                              WHERE   aa.prs_afdeling_key = lafd_key
                                                                      AND aa.niveau = g.fac_gebruiker_prs_level_write))))
                          -- in ASP:  if (params.loc_key>0, hier is lloc_key dan NULL en gaat het ook goed)
+                         -- Afhankelijk op welk niveau de plaatsselector is ingevuld moet hier op dat niveau gechecked worden.
                          AND (g.fac_gebruiker_alg_level_write = -1
-                              OR (g.fac_gebruiker_alg_level_write < 9
-                                  AND lloc_key IN
-                                           (SELECT   alg_locatie_key
-                                              FROM   fac_v_my_locations
-                                             WHERE   prs_perslid_key = p.prs_perslid_key
-                                                     AND niveau = fac_gebruiker_alg_level_write)))
+                           OR (g.fac_gebruiker_alg_level_write < 9
+                           AND (CASE
+                                WHEN lalg_type IS NULL AND lloc_key IN (SELECT alg_locatie_key
+                                                                          FROM fac_v_my_locations
+                                                                         WHERE prs_perslid_key = p.prs_perslid_key
+                                                                           AND niveau = fac_gebruiker_alg_level_write)
+                                THEN 1
+                                WHEN lalg_type = 'G' AND lonrg_key IN (SELECT alg_gebouw_key
+                                                                          FROM fac_v_my_buildings
+                                                                         WHERE prs_perslid_key = p.prs_perslid_key
+                                                                           AND niveau = fac_gebruiker_alg_level_write)
+                                THEN 1
+                                WHEN lalg_type = 'V' AND lonrg_key IN (SELECT alg_verdieping_key
+                                                                          FROM fac_v_my_floors
+                                                                         WHERE prs_perslid_key = p.prs_perslid_key
+                                                                           AND niveau = fac_gebruiker_alg_level_write)
+                                THEN 1
+                                WHEN lalg_type = 'R' AND lonrg_key IN (SELECT alg_ruimte_key
+                                                                          FROM fac_v_my_rooms
+                                                                         WHERE prs_perslid_key = p.prs_perslid_key
+                                                                           AND niveau = fac_gebruiker_alg_level_write)
+                                THEN 1
+                                ELSE 0
+                                END) = 1
+                               ))
                          AND fac_functie_code = lfunctiecode)
          LOOP
             fac.putnotificationsrtprio (NULL,
@@ -732,6 +761,7 @@ CREATE OR REPLACE PACKAGE BODY mld AS
       lbestellimiet4 mld_disc_params.mld_disc_params_bestellimiet4%TYPE;
       lbestellimiet5 mld_disc_params.mld_disc_params_bestellimiet5%TYPE;
       lgvs mld_typeopdr.mld_typeopdr_gvs%TYPE;
+      lrefiat mld_opdr.mld_statusopdr_key_refiat%TYPE;
       lfunctiecode fac_functie.fac_functie_code%TYPE;
       lsender mld_discipline.ins_discipline_email%TYPE;
       bericht fac_srtnotificatie.fac_srtnotificatie_oms%TYPE;                         -- kan te kort zijn na substitutie
@@ -741,48 +771,70 @@ CREATE OR REPLACE PACKAGE BODY mld AS
       ltracking      VARCHAR2(4000);  -- moet tijdelijk groter dan fac_srtnotificatie.fac_srtnotificatie_oms%TYPE kunnen zijn
    BEGIN
       BEGIN
-         SELECT   m.mld_alg_locatie_key, p.prs_afdeling_key, stdm.mld_ins_discipline_key, m.mld_melding_spoed,
-                  COALESCE(o.mld_opdr_approved, -1), COALESCE(o.mld_opdr_kosten, 0), COALESCE(mdp.mld_disc_params_bestellimiet, 0),
-                  COALESCE(mdp.mld_disc_params_bestellimiet2, 0), COALESCE(mdp.mld_disc_params_bestellimiet3, 0),
-                  COALESCE(mdp.mld_disc_params_bestellimiet4, 0), COALESCE(mdp.mld_disc_params_bestellimiet5, 0),
-                  mto.mld_typeopdr_gvs
-           INTO   lloc_key, lafd_key, ldisc_key, lspoed,
-                  lopdr_approved, lopdr_kosten, lbestellimiet, lbestellimiet2,
-                  lbestellimiet3, lbestellimiet4, lbestellimiet5,
-                  lgvs
-           FROM   mld_melding m, prs_perslid p, mld_stdmelding stdm, mld_opdr o,
-                  mld_typeopdr mto, ins_tab_discipline d, mld_disc_params mdp
-          WHERE       m.prs_perslid_key = p.prs_perslid_key
-                  AND stdm.mld_stdmelding_key = m.mld_stdmelding_key
-                  AND stdm.mld_ins_discipline_key = d.ins_discipline_key
-                  AND d.ins_discipline_key = mdp.mld_ins_discipline_key
-                  AND o.mld_typeopdr_key = mto.mld_typeopdr_key
-                  AND o.mld_statusopdr_key = 10
-                  AND m.mld_melding_key = o.mld_melding_key
-                  AND o.mld_opdr_key = popdrkey;
+         SELECT   m.mld_alg_locatie_key,
+                  p.prs_afdeling_key,
+                  stdm.mld_ins_discipline_key,
+                  m.mld_melding_spoed,
+                  COALESCE(o.mld_opdr_approved, -1),
+                  COALESCE(o.mld_opdr_kosten, 0),
+                  COALESCE(mdp.mld_disc_params_bestellimiet, 0),
+                  COALESCE(mdp.mld_disc_params_bestellimiet2, 0),
+                  COALESCE(mdp.mld_disc_params_bestellimiet3, 0),
+                  COALESCE(mdp.mld_disc_params_bestellimiet4, 0),
+                  COALESCE(mdp.mld_disc_params_bestellimiet5, 0),
+                  mto.mld_typeopdr_gvs,
+                  COALESCE(o.mld_statusopdr_key_refiat, 0)
+           INTO   lloc_key,
+                  lafd_key,
+                  ldisc_key,
+                  lspoed,
+                  lopdr_approved,
+                  lopdr_kosten,
+                  lbestellimiet,
+                  lbestellimiet2,
+                  lbestellimiet3,
+                  lbestellimiet4,
+                  lbestellimiet5,
+                  lgvs,
+                  lrefiat
+           FROM   mld_melding m,
+                  prs_perslid p,
+                  mld_stdmelding stdm,
+                  mld_opdr o,
+                  mld_typeopdr mto,
+                  ins_tab_discipline d,
+                  mld_disc_params mdp
+          WHERE   m.prs_perslid_key = p.prs_perslid_key
+            AND   stdm.mld_stdmelding_key = m.mld_stdmelding_key
+            AND   stdm.mld_ins_discipline_key = d.ins_discipline_key
+            AND   d.ins_discipline_key = mdp.mld_ins_discipline_key
+            AND   o.mld_typeopdr_key = mto.mld_typeopdr_key
+            AND   o.mld_statusopdr_key = 10
+            AND   m.mld_melding_key = o.mld_melding_key
+            AND   o.mld_opdr_key = popdrkey;
          IF lopdr_kosten <= lbestellimiet   -- Dit eerst testen i.v.m. Ter goedkeuring. Verder moet sowieso goedgekeurd worden.
          THEN
            RETURN;   -- Het bedrag is lager als de eerste limiet. De opdracht hoeft niet goed gekeurd te worden, dus een lege fiatteurs array teruggeven.
-         ELSIF ((((fac.getsetting ('mld_opdr_approval_all') = 0 AND lopdr_kosten >= lbestellimiet) OR
-                  (fac.getsetting ('mld_opdr_approval_all') = 1 AND lopdr_kosten <= lbestellimiet2)) AND
-                 lopdr_approved <= lbestellimiet) OR           -- (Her)fiatteren volgens limieten.
-                (lopdr_kosten >= lgvs AND lopdr_approved < 0)) -- (Her)fiatteren indien bedrag boven de GVS (lopdr_kosten >= lgvs) en het is de eerste goedkeuringsslag (lopdr_approved < 0).
+         ELSIF (((fac.getsetting ('mld_opdr_approval_all') = 0 AND lopdr_kosten >= lbestellimiet) OR
+                 (fac.getsetting ('mld_opdr_approval_all') = 1 AND lopdr_kosten <= lbestellimiet2)) AND
+                ((lrefiat = 0 AND lopdr_approved <= lbestellimiet) OR          -- Fiatteren volgens limieten.
+                 (lrefiat > 0 AND lopdr_kosten >= lgvs AND lopdr_approved < 0))) -- Herfiatteren indien bedrag boven de GVS (lopdr_kosten >= lgvs) en het is de eerste goedkeuringsslag (lopdr_approved < 0).
          THEN
            lfunctiecode := 'WEB_ORDGOE';
          ELSIF ((fac.getsetting ('mld_opdr_approval_all') = 0 AND lopdr_kosten >= lbestellimiet2 AND lopdr_approved = lbestellimiet2) OR
-                (fac.getsetting ('mld_opdr_approval_all') = 1 AND lopdr_kosten <= lbestellimiet3 AND lopdr_approved <= lbestellimiet2))
+                (fac.getsetting ('mld_opdr_approval_all') = 1 AND lopdr_kosten <= lbestellimiet3 AND ((lrefiat = 0 AND lopdr_approved <= lbestellimiet2) OR (lrefiat > 0 AND lopdr_kosten >= lgvs AND lopdr_approved < 0))))
          THEN
            lfunctiecode := 'WEB_ORDGO2';
          ELSIF ((fac.getsetting ('mld_opdr_approval_all') = 0 AND lopdr_kosten >= lbestellimiet3 AND lopdr_approved = lbestellimiet3) OR
-                (fac.getsetting ('mld_opdr_approval_all') = 1 AND lopdr_kosten <= lbestellimiet4 AND lopdr_approved <= lbestellimiet3))
+                (fac.getsetting ('mld_opdr_approval_all') = 1 AND lopdr_kosten <= lbestellimiet4 AND ((lrefiat = 0 AND lopdr_approved <= lbestellimiet3) OR (lrefiat > 0 AND lopdr_kosten >= lgvs AND lopdr_approved < 0))))
          THEN
            lfunctiecode := 'WEB_ORDGO3';
          ELSIF ((fac.getsetting ('mld_opdr_approval_all') = 0 AND lopdr_kosten >= lbestellimiet4 AND lopdr_approved = lbestellimiet4) OR
-                (fac.getsetting ('mld_opdr_approval_all') = 1 AND lopdr_kosten <= lbestellimiet5 AND lopdr_approved <= lbestellimiet4))
+                (fac.getsetting ('mld_opdr_approval_all') = 1 AND lopdr_kosten <= lbestellimiet5 AND ((lrefiat = 0 AND lopdr_approved <= lbestellimiet4) OR (lrefiat > 0 AND lopdr_kosten >= lgvs AND lopdr_approved < 0))))
          THEN
            lfunctiecode := 'WEB_ORDGO4';
-         ELSIF((fac.getsetting ('mld_opdr_approval_all') = 0 AND lopdr_kosten >= lbestellimiet5 AND lopdr_approved >= lbestellimiet5) OR
-               (fac.getsetting ('mld_opdr_approval_all') = 1 AND lopdr_kosten > lbestellimiet5 AND lopdr_approved <= lbestellimiet5))
+         ELSIF ((fac.getsetting ('mld_opdr_approval_all') = 0 AND lopdr_kosten >= lbestellimiet5 AND lopdr_approved >= lbestellimiet5) OR
+                (fac.getsetting ('mld_opdr_approval_all') = 1 AND lopdr_kosten > lbestellimiet5 AND ((lrefiat = 0 AND lopdr_approved <= lbestellimiet5) OR (lrefiat > 0 AND lopdr_kosten >= lgvs AND lopdr_approved < 0))))
          THEN
            lfunctiecode := 'WEB_ORDGO5';
          ELSE
@@ -1297,6 +1349,7 @@ CREATE OR REPLACE PACKAGE BODY mld AS
                                               mld_alg_locatie_key,
                                               mld_alg_onroerendgoed_keys,
                                               mld_melding_datum,
+                                              mld_melding_onderwerp,
                                               mld_melding_omschrijving,
                                               mld_melding_opmerking,
                                               mld_stdmelding_key,
@@ -1316,6 +1369,7 @@ CREATE OR REPLACE PACKAGE BODY mld AS
                                mld_alg_locatie_key,
                                mld_alg_onroerendgoed_keys,
                                SYSDATE,
+                               mld_melding_onderwerp,
                                mld_melding_omschrijving,
                                   lcl.l ('lcl_mld_wf_generated_by')
                                || p_melding_key
@@ -1805,9 +1859,11 @@ CREATE OR REPLACE PACKAGE BODY mld AS
        THEN
           -- Als alg_srtruimte_uitvoertijd geen waarde heeft, dan terugvallen op standaard uitvoertijd die altijd een waarde heeft
           SELECT sr.alg_srtruimte_t_uitvoertijd,
-                 ssr.mld_stdmsrtruimte_t_uitvtijd
+                 ssr.mld_stdmsrtruimte_t_uitvtijd,
+                 COALESCE(ssr.mld_stdmsrtruimte_regime, v_mld_stdmelding_regime)  -- optioneel nog srtruimte-afhankelijk afwijkend regime
             INTO l_srtruimte_uitvoertijd_object,
-                 l_mldsrtruimte_uitvtijd_object
+                 l_mldsrtruimte_uitvtijd_object,
+                 v_mld_stdmelding_regime
             FROM alg_ruimte r,
                  alg_srtruimte sr,
                  mld_stdmsrtruimte ssr
@@ -1857,8 +1913,7 @@ CREATE OR REPLACE PACKAGE BODY mld AS
                   INTO v_beginuur, v_einduur, v_werkdagen
                   FROM alg_gebouw g, alg_v_allonroerendgoed aag
                  WHERE g.alg_gebouw_key = aag.alg_gebouw_key
-                   AND aag.alg_onroerendgoed_keys = alg_key
-                   AND aag.alg_type = 'G';
+                   AND aag.alg_onroerendgoed_keys = alg_key;
             END IF;
        END IF;
        RETURN;
@@ -1894,6 +1949,29 @@ CREATE OR REPLACE PACKAGE BODY mld AS
           l_uitvoertijdtype := 'UREN';
        END IF;
 
+       -- Hier wordt verder gehandeld obv regime. Ik zou verwachten dat mld_stdmelding_afhankelijk mede bepalend is
+       -- Regime kan nu per srtruimte afwijken dus moeten we daar eerst naar toe. De rest van de flow kan dan intact blijven.
+       IF (alg_key IS NOT NULL)
+       THEN
+          -- Als het een ruimte-key is maken we dat hier expliciet
+          SELECT MAX(alg_ruimte_key)
+            INTO l_ruimte_key
+            FROM alg_ruimte r
+           WHERE r.alg_ruimte_key = alg_key;
+
+          -- Dan kunnen we met de srtruimte evt afwijkend regime bepalen
+          IF l_ruimte_key IS NOT NULL
+          THEN
+              SELECT COALESCE(ssr.mld_stdmsrtruimte_regime, l_stdmelding_regime)
+                INTO l_stdmelding_regime
+                FROM alg_ruimte r, mld_stdmsrtruimte ssr
+               WHERE r.alg_srtruimte_key = ssr.alg_srtruimte_key(+)
+                 AND ssr.mld_stdmelding_key(+) = stdm_key
+                 AND r.alg_ruimte_key = l_ruimte_key;
+          END IF;
+       END IF;
+       -- nu weten we het geldende regime
+
        IF (l_stdmelding_regime = 1) OR (alg_key IS NULL AND l_stdmelding_regime = 2) -- Kantoortijdenregime of hierop terugvallen
        THEN
            RETURN fac.datumtijdplusuitvoertijd (startdate, l_accepttijd_object.tijdsduur, l_uitvoertijdtype);
@@ -1901,10 +1979,6 @@ CREATE OR REPLACE PACKAGE BODY mld AS
 
        IF l_stdmelding_regime = 2 -- Openingstijden: zoek ruimte/gebouwopeningstijden er bij
        THEN
-          SELECT MAX(alg_ruimte_key)
-            INTO l_ruimte_key
-            FROM alg_ruimte r
-           WHERE r.alg_ruimte_key = alg_key;
 
           -- Minstens <20><>n van beide keys is gedefinieerd, zeker weten
           IF l_ruimte_key IS NOT NULL
@@ -1926,8 +2000,7 @@ CREATE OR REPLACE PACKAGE BODY mld AS
                INTO l_beginuur, l_einduur, l_werkdagen
                FROM alg_gebouw g, alg_v_allonroerendgoed aag
               WHERE g.alg_gebouw_key = aag.alg_gebouw_key
-                AND aag.alg_onroerendgoed_keys = alg_key
-                AND aag.alg_type = 'G';
+                AND aag.alg_onroerendgoed_keys = alg_key;
           END IF;
 
           RETURN FAC.datumtijdplusuitvoertijd (startdate,
@@ -1949,6 +2022,51 @@ CREATE OR REPLACE PACKAGE BODY mld AS
        END IF;
     END;
 
+   FUNCTION getnettotijdsbesteding (p_opdr_key IN NUMBER, p_prs_key IN NUMBER DEFAULT NULL) RETURN NUMBER
+   AS
+      l_netto_tijd                    NUMBER;
+      l_fsn_code_last                 fac_srtnotificatie.fac_srtnotificatie_code%TYPE;
+      l_ft_datum_last                 fac_tracking.fac_tracking_datum%TYPE;
+      l_ft_perslid_key                fac_tracking.prs_perslid_key%TYPE;
+      CURSOR c_tracking
+      IS
+         SELECT st.fac_srtnotificatie_code,
+                t.fac_tracking_datum,
+                t.prs_perslid_key
+           FROM fac_tracking t,
+                fac_srtnotificatie st
+          WHERE t.fac_srtnotificatie_key = st.fac_srtnotificatie_key
+            AND st.fac_srtnotificatie_code IN ('ORDACP', 'ORDHLT', 'ORDRSM', 'ORDAFM')
+            AND fac_tracking_refkey = p_opdr_key
+         ORDER BY fac_tracking_datum;
+   BEGIN
+      l_netto_tijd := 0;
+      l_fsn_code_last := NULL;
+      l_ft_datum_last := NULL;
+      l_ft_perslid_key := NULL;
+      FOR r IN c_tracking
+      LOOP
+          -- Alleen als 'ORDAFM' of 'ORDHLT' getrackt is wordt er eventueel tijd bij de nettotijd opgeteld.
+          -- Dan moet de vorige tracking wel 'ORDACP' of 'ORDRSM' zijn.
+         IF (r.fac_srtnotificatie_code = 'ORDAFM' OR r.fac_srtnotificatie_code = 'ORDHLT') AND
+            (l_fsn_code_last = 'ORDACP' OR l_fsn_code_last = 'ORDRSM') AND
+            l_ft_perslid_key = p_prs_key
+         THEN
+            l_netto_tijd := l_netto_tijd + (r.fac_tracking_datum - l_ft_datum_last);
+         END IF;
+         l_fsn_code_last := r.fac_srtnotificatie_code;
+         l_ft_datum_last := r.fac_tracking_datum;
+         l_ft_perslid_key := r.prs_perslid_key;
+      END LOOP;
+      -- Als de opdracht nog actief is en niet op hold staat, moet er nog tijd tot nu (SYSDATE) bij opgeteld worden.
+      IF (l_fsn_code_last = 'ORDACP' OR l_fsn_code_last = 'ORDRSM') AND
+         l_ft_perslid_key = p_prs_key
+      THEN
+         l_netto_tijd := l_netto_tijd + (SYSDATE - l_ft_datum_last);
+      END IF;
+      RETURN l_netto_tijd;
+   END;
+
    FUNCTION BepaalOpdrMeldingVolgnr(p_melding_key IN NUMBER) RETURN NUMBER IS
      ReturnVal NUMBER;
    BEGIN
@@ -1976,7 +2094,7 @@ FUNCTION mldsprintf (ps IN varchar2 , p_melding_key IN number)
  vardisc ins_tab_discipline.ins_discipline_omschrijving%TYPE;
  varsrtdisc ins_srtdiscipline.ins_srtdiscipline_prefix%TYPE;
  varonroerendgoedkeys mld_melding.mld_alg_onroerendgoed_keys%TYPE;
- varplaats alg_v_plaatsaanduiding_all.alg_plaatsaanduiding%TYPE;
+ varplaats VARCHAR2(4000); -- Ook groot genoeg voor locatieomschrijving
  varonderwerp mld_melding.mld_melding_onderwerp%TYPE;
 BEGIN
    s :=  ps;
@@ -2040,7 +2158,8 @@ IS
    varsrtdisc ins_srtdiscipline.ins_srtdiscipline_prefix%TYPE;
    varspoed mld_melding.mld_melding_spoed%TYPE;
    varonroerendgoedkeys mld_melding.mld_alg_onroerendgoed_keys%TYPE;
-   varplaats alg_v_plaatsaanduiding_all.alg_plaatsaanduiding%TYPE;
+   varalglocatiekey mld_melding.mld_alg_locatie_key%TYPE;
+   varplaats VARCHAR2(4000); -- Ook groot genoeg voor locatieomschrijving
    varopdrtype mld_typeopdr.mld_typeopdr_omschrijving%TYPE;
 BEGIN
    s := ps;
@@ -2082,30 +2201,38 @@ BEGIN
                       d.ins_discipline_omschrijving),
                sd.ins_srtdiscipline_prefix,
                m.mld_melding_spoed,
-               m.mld_alg_onroerendgoed_keys
+               m.mld_alg_onroerendgoed_keys,
+               m.mld_alg_locatie_key
           INTO varstdmld,
                vardisc,
                varsrtdisc,
                varspoed,
-               varonroerendgoedkeys
+               varonroerendgoedkeys,
+               varalglocatiekey
           FROM mld_melding m,
                mld_stdmelding stdm,
                ins_tab_discipline d,
                ins_srtdiscipline sd
-         WHERE     d.ins_srtdiscipline_key = sd.ins_srtdiscipline_key
-               AND stdm.mld_ins_discipline_key = d.ins_discipline_key
-               AND stdm.mld_stdmelding_key = m.mld_stdmelding_key
-               AND m.mld_melding_key = lmld_melding_key;
+         WHERE d.ins_srtdiscipline_key = sd.ins_srtdiscipline_key
+           AND stdm.mld_ins_discipline_key = d.ins_discipline_key
+           AND stdm.mld_stdmelding_key = m.mld_stdmelding_key
+           AND m.mld_melding_key = lmld_melding_key;
 
         IF varonroerendgoedkeys IS NOT NULL
         THEN
              -- Pas op: p.alg_onroerendgoed_keys is niet uniek, daarom alg_v_allonroerendgoed nodig.
-             SELECT   NVL (p.alg_plaatsaanduiding, '')
-               INTO   varplaats
-               FROM   alg_v_plaatsaanduiding_all p, alg_v_allonroerendgoed ao
-              WHERE       p.alg_onroerendgoed_keys = ao.alg_onroerendgoed_keys
-                      AND p.alg_onroerendgoed_type = ao.alg_type
-                      AND ao.alg_onroerendgoed_keys = varonroerendgoedkeys;
+             SELECT NVL (p.alg_plaatsaanduiding, '')
+               INTO varplaats
+               FROM alg_v_plaatsaanduiding_all p, alg_v_allonroerendgoed ao
+              WHERE p.alg_onroerendgoed_keys = ao.alg_onroerendgoed_keys
+                AND p.alg_onroerendgoed_type = ao.alg_type
+                AND ao.alg_onroerendgoed_keys = varonroerendgoedkeys;
+        ELSIF varalglocatiekey IS NOT NULL
+        THEN
+             SELECT NVL(l.alg_locatie_omschrijving, '')
+               INTO varplaats
+               FROM alg_locatie l
+              WHERE l.alg_locatie_key = varalglocatiekey;
         ELSE
            varplaats := '';
         END IF;
@@ -2149,9 +2276,10 @@ END;
 PROCEDURE upsertmeldingkenmerk (p_kenmerk_key IN NUMBER, p_mld_key IN NUMBER, p_waarde IN VARCHAR2)
 IS
     v_count    NUMBER;
+    v_waarde   mld_kenmerkmelding.mld_kenmerkmelding_waarde%TYPE;
 BEGIN
-    SELECT COUNT ( * )
-      INTO v_count
+    SELECT COUNT ( * ), MIN (mld_kenmerkmelding_waarde)
+      INTO v_count, v_waarde
       FROM mld_kenmerkmelding
      WHERE     mld_melding_key = p_mld_key
            AND mld_kenmerk_key = p_kenmerk_key
@@ -2166,11 +2294,13 @@ BEGIN
                    AND mld_kenmerk_key = p_kenmerk_key
                    AND mld_kenmerkmelding_verwijder IS NULL;
         ELSE
-            UPDATE mld_kenmerkmelding
-               SET mld_kenmerkmelding_waarde = p_waarde
-             WHERE     mld_melding_key = p_mld_key
-                   AND mld_kenmerk_key = p_kenmerk_key
-                   AND mld_kenmerkmelding_verwijder IS NULL;
+            IF (v_waarde <> p_waarde) THEN
+                UPDATE mld_kenmerkmelding
+                   SET mld_kenmerkmelding_waarde = p_waarde
+                 WHERE     mld_melding_key = p_mld_key
+                       AND mld_kenmerk_key = p_kenmerk_key
+                       AND mld_kenmerkmelding_verwijder IS NULL;
+            END IF;
         END IF;
     ELSE
         IF p_kenmerk_key IS NOT NULL AND p_waarde IS NOT NULL
@@ -2187,9 +2317,10 @@ END;
 PROCEDURE upsertopdrachtkenmerk (p_kenmerk_key IN NUMBER, p_opdr_key IN NUMBER, p_waarde IN VARCHAR2)
 IS
     v_count    NUMBER;
+    v_waarde   mld_kenmerkopdr.mld_kenmerkopdr_waarde%TYPE;
 BEGIN
-    SELECT COUNT ( * )
-      INTO v_count
+    SELECT COUNT ( * ), MIN(mld_kenmerkopdr_waarde)
+      INTO v_count, v_waarde
       FROM mld_kenmerkopdr
      WHERE     mld_opdr_key = p_opdr_key
            AND mld_kenmerk_key = p_kenmerk_key
@@ -2204,11 +2335,13 @@ BEGIN
                    AND mld_kenmerk_key = p_kenmerk_key
                    AND mld_kenmerkopdr_verwijder IS NULL;
         ELSE
-            UPDATE mld_kenmerkopdr
-               SET mld_kenmerkopdr_waarde = p_waarde
-             WHERE     mld_opdr_key = p_opdr_key
-                   AND mld_kenmerk_key = p_kenmerk_key
-                   AND mld_kenmerkopdr_verwijder IS NULL;
+            IF (v_waarde <> p_waarde) THEN
+                UPDATE mld_kenmerkopdr
+                   SET mld_kenmerkopdr_waarde = p_waarde
+                 WHERE     mld_opdr_key = p_opdr_key
+                       AND mld_kenmerk_key = p_kenmerk_key
+                       AND mld_kenmerkopdr_verwijder IS NULL;
+            END IF;
         END IF;
     ELSE
         IF p_kenmerk_key IS NOT NULL AND p_waarde IS NOT NULL

MLD/MLD_TAB.SRC

@@ -233,6 +233,9 @@ CREATE_TABLE(mld_typeopdr,0)
         DEFAULT 1000000,
     mld_typeopdr_kosten_verplicht  /* bitwise valid are 0, 1, 2 and 4. Opdr kosten verplicht bij (0 = niet verplicht, 1 = save + 2 = afmelden, 4 = afronden) */
         NUMBER(1),
+    mld_typeopdr_sequential  /* Strikte sequentiele opdracht afhandeling en/of Hold (BITAND1 is (kan pauzeren en hervatten) en BITAND2 is strikt sequentieel) */
+        NUMBER(1)
+        DEFAULT 0 NOT NULL,
     CONSTRAINT mld_u_mld_typeopdr_upper UNIQUE(mld_typeopdr_upper, mld_typeopdr_module)
 );
 
@@ -353,7 +356,7 @@ CREATE_TABLE(mld_stdmelding,0)
         CONSTRAINT mld_r_mld_typeopdr1 REFERENCES mld_typeopdr(mld_typeopdr_key),
     mld_stdmelding_vereisdienst -- (1: mag alleen als binnen scope dienst geleverd wordt)
         NUMBER(1),
-    mld_stdmelding_regime -- afhandeling in kantoortijden (null/0) of 24-uurs (24)
+    mld_stdmelding_regime -- afhandelingsregime
         NUMBER(2)
         DEFAULT 1
         CONSTRAINT mld_c_stdmelding_regime CHECK (mld_stdmelding_regime IS NOT NULL AND mld_stdmelding_regime IN (1,2,3)), -- 1=kantoortijden, 2=openingstijden, 3=24x7
@@ -375,6 +378,9 @@ CREATE_TABLE(mld_stdmelding,0)
         VARCHAR2(255 CHAR),
     mld_stdmelding_vervaldatum
         DATE,
+    mld_stdmelding_aanmaak
+        DATE
+        DEFAULT SYSDATE,
     mld_stdmelding_verwijder
         DATE,
     mld_stdmelding_opdrtypevast  -- 0: standaard opdrachttype
@@ -389,6 +395,8 @@ CREATE_TABLE(mld_stdmelding,0)
         NUMBER(1)
         DEFAULT 1
         NOT_NULL(mld_stdmelding_subject, mld_c_mld_stdmelding_subject),
+    mld_stdmelding_externurl
+        VARCHAR2(1024),
     CONSTRAINT mld_u_mld_stdmelding UNIQUE(mld_ins_discipline_key, mld_stdmelding_omschrijving, mld_stdmelding_verwijder)
 );
 ALTER TABLE mld_stdmelding MODIFY mld_stdmelding_t_accepttijd  DEFAULT MLD_T_UITVOERTIJD(NULL, NULL);
@@ -424,7 +432,10 @@ CREATE_TABLE(mld_stdmsrtruimte, 0)
     mld_stdmsrtruimte_t_uitvtijd
         MLD_T_UITVOERTIJD
         CONSTRAINT mld_c_mld_stdmsrtruimte_t_uitv CHECK(mld_stdmsrtruimte_t_uitvtijd.tijdsduur >= 0),
-        CONSTRAINT mld_u_mld_stdmsrtruimte UNIQUE(alg_srtruimte_key, mld_stdmelding_key)
+        CONSTRAINT mld_u_mld_stdmsrtruimte UNIQUE(alg_srtruimte_key, mld_stdmelding_key),
+    mld_stdmsrtruimte_regime -- optioneel afwijkend afhandelingsregime (may be null)
+        NUMBER(2)
+        CONSTRAINT mld_c_stdmsrtruimte_regime CHECK (mld_stdmsrtruimte_regime IN (1,2,3)) -- 1=kantoortijden, 2=openingstijden, 3=24x7
 );
 ALTER TABLE mld_stdmsrtruimte MODIFY mld_stdmsrtruimte_t_accepttijd  DEFAULT MLD_T_UITVOERTIJD(NULL, NULL);
 ALTER TABLE mld_stdmsrtruimte MODIFY mld_stdmsrtruimte_t_uitvtijd DEFAULT MLD_T_UITVOERTIJD(NULL, NULL);
@@ -686,7 +697,7 @@ CREATE_TABLE(mld_melding,0)
         CONSTRAINT fac_r_fac_activiteit1 REFERENCES fac_activiteit(fac_activiteit_key) ON DELETE CASCADE,
     mld_workflowstep_key
       NUMBER(10)
-      CONSTRAINT mld_r_mld_workflowstep_key4 REFERENCES mld_workflowstep(mld_workflowstep_key) ON DELETE SET NULL,
+      CONSTRAINT mld_r_mld_workflowstep_key4 REFERENCES mld_workflowstep(mld_workflowstep_key),
     mld_melding_start_key
       NUMBER(10)
       CONSTRAINT mld_r_mld_melding_key4 REFERENCES mld_melding(mld_melding_key),
@@ -780,12 +791,18 @@ CREATE_TABLE(mld_opdr,0)
         NUMBER(8,2)
         DEFAULT 0
         CONSTRAINT mld_c_mld_opdr_materiaal CHECK(mld_opdr_materiaal >= 0),
-    mld_opdr_kosten
+    mld_opdr_kosten       /* excl BTW */
+        NUMBER(12,2)
+        DEFAULT 0,
+    mld_opdr_kosten_btw
         NUMBER(12,2)
         DEFAULT 0,
     prs_kostenplaats_key
         NUMBER(10)
         CONSTRAINT mld_r_prs_kostenplaats_key2 REFERENCES prs_kostenplaats(prs_kostenplaats_key),
+    prs_kostensoort_key
+        NUMBER(10)
+        CONSTRAINT mld_r_prs_kostensoort_key1 REFERENCES prs_kostensoort (prs_kostensoort_key),
     mld_opdr_ordernr
         VARCHAR2(30),
     mld_opdr_contactpersoon
@@ -840,7 +857,16 @@ CREATE_TABLE(mld_opdr,0)
     mld_opdr_handfiat /* handmatig fiatteren verzocht (overrule-t evt limieten) */
         NUMBER(1)
         CONSTRAINT mld_c_mld_opdr_handfiat CHECK(mld_opdr_handfiat IS NULL
-                                             OR mld_opdr_handfiat = 1)
+                                             OR mld_opdr_handfiat = 1),
+    mld_opdr_halted  -- is de opdracht onderbroken {0=nee (default) | 1=ja}
+        NUMBER(1)
+        DEFAULT (0)
+        NOT NULL
+        CONSTRAINT mld_c_mld_opdr_halted CHECK(mld_opdr_halted IN (0, 1)),
+    mld_opdr_meerwerk
+        NUMBER(1)
+        DEFAULT (0)
+        CONSTRAINT mld_c_mld_opdr_meerwerk CHECK(mld_opdr_meerwerk IN (0, 1))
 );
 
 CREATE_TABLE(mld_vrije_dagen, 0)
@@ -887,8 +913,9 @@ CREATE_TABLE(mld_srtkenmerk, 0)
       VARCHAR2(10)
 ,  mld_srtkenmerk_kenmerktype
       VARCHAR2(1)
-,  mld_srtkenmerk_systeem
+,  mld_srtkenmerk_systeem -- &1 = systeemkm, &2 = primary, show in list
       NUMBER(1)
+      DEFAULT 0
 ,  mld_srtkenmerk_lengte
       NUMBER(4)
 ,  mld_srtkenmerk_dec
@@ -910,8 +937,7 @@ CREATE_TABLE(mld_srtkenmerk, 0)
 ,  CONSTRAINT mld_srtkenmerk_omschrijving    CHECK(mld_srtkenmerk_omschrijving IS NOT NULL)
 ,  CONSTRAINT mld_u_mld_srtkenmerk_upper    UNIQUE(mld_srtkenmerk_upper, mld_srtkenmerk_verwijder)
 ,  CONSTRAINT mld_c_mld_srtkenmerk_kenmtype  CHECK(mld_srtkenmerk_kenmerktype IN ('C','N','D','R','X','L','Q','F','M','E','S', 'l', 'B'))
-,  CONSTRAINT mld_c_mld_srtkenmerk_systeem   CHECK(mld_srtkenmerk_systeem IS NULL
-                                                OR mld_srtkenmerk_systeem = 1)
+,  CONSTRAINT mld_c_mld_srtkenmerk_systeem   CHECK(mld_srtkenmerk_systeem IS NOT NULL)
 ,  CONSTRAINT mld_c_mld_srtkenmerk_lengte    CHECK(mld_srtkenmerk_lengte >= 1
                                                AND mld_srtkenmerk_lengte <= 4000)
 ,  CONSTRAINT mld_c_mld_srtkenmerk_max_min   CHECK(mld_srtkenmerk_nmax >= mld_srtkenmerk_nmin)

MLD/MLD_TRI.SRC

@@ -11,6 +11,35 @@ BEGIN
 END;
 /
 
+AUDIT_BEGIN(mld_disc_params)
+AUDIT_VALUE(mld_disc_params, mld_behandelgroep_key)
+AUDIT_VALUE(mld_disc_params, mld_disc_params_bestellimiet)
+AUDIT_VALUE(mld_disc_params, mld_disc_params_bestellimiet2)
+AUDIT_VALUE(mld_disc_params, mld_disc_params_bestellimiet3)
+AUDIT_VALUE(mld_disc_params, mld_disc_params_bestellimiet4)
+AUDIT_VALUE(mld_disc_params, mld_disc_params_bestellimiet5)
+AUDIT_VALUE(mld_disc_params, mld_disc_params_pgb)
+AUDIT_VALUE(mld_disc_params, mld_disc_params_startdatum)
+AUDIT_VALUE(mld_disc_params, mld_disc_params_directklaar)
+AUDIT_VALUE(mld_disc_params, mld_disc_params_keten)
+AUDIT_VALUE(mld_disc_params, mld_disc_params_frontendprio)
+AUDIT_VALUE(mld_disc_params, mld_disc_params_eigen_kp)
+AUDIT_VALUE(mld_disc_params, mld_disc_params_factuurpct)
+AUDIT_VALUE(mld_disc_params, mld_disc_params_factuurmarge)
+AUDIT_VALUE(mld_disc_params, mld_disc_params_factmatchmode)
+AUDIT_VALUE(mld_disc_params, mld_disc_params_factuurappr)
+AUDIT_VALUE(mld_disc_params, mld_disc_params_factuurgrens)
+AUDIT_VALUE(mld_disc_params, mld_disc_params_bonotify)
+AUDIT_VALUE(mld_disc_params, mld_disc_params_benotify)
+AUDIT_VALUE(mld_disc_params, mld_disc_params_notify)
+AUDIT_VALUE(mld_disc_params, mld_disc_params_noti_dagen)
+AUDIT_VALUE(mld_disc_params, mld_disc_params_opdr_kosten)
+AUDIT_VALUE(mld_disc_params, fac_activiteit_key)
+AUDIT_VALUE(mld_disc_params, mld_disc_params_offerteauto)
+AUDIT_VALUE(mld_disc_params, mld_disc_params_fenotes)
+AUDIT_VALUE(mld_disc_params, mld_disc_params_offhours)
+AUDIT_END()
+
 CREATE_TRIGGER(mld_t_mld_disc_params_b_iu)
 BEFORE INSERT OR UPDATE ON mld_disc_params
 FOR EACH ROW
@@ -46,6 +75,12 @@ BEGIN
 END;
 /
 
+AUDIT_BEGIN(mld_stdmelding)
+AUDIT_VALUE(mld_stdmelding, mld_stdmelding_malusbasis)
+AUDIT_VALUE(mld_stdmelding, mld_stdmelding_malus)
+AUDIT_VALUE(mld_stdmelding, mld_stdmelding_verwijder)
+AUDIT_END()
+
 CREATE_TRIGGER(mld_t_mld_stdmelding_B_IU)
 BEFORE INSERT OR UPDATE ON mld_stdmelding
 FOR EACH ROW
@@ -293,7 +328,7 @@ BEGIN
   UPDATE_UPPER(mld_srtkenmerk_omschrijving, mld_srtkenmerk_upper,mld_srtkenmerk);
   UPDATE_AANMAAKDATUM(mld_srtkenmerk, mld_srtkenmerk_aanmaak);
   IF (:new.mld_srtkenmerk_verwijder IS NOT NULL AND :old.mld_srtkenmerk_verwijder IS NULL AND
-    :new.mld_srtkenmerk_systeem = 1)
+    BITAND(:new.mld_srtkenmerk_systeem, 1) = 1)
   THEN
     raise_application_error(-20003, 'MLD_C_MLD_SRTKENMERK_SYSTEEM');
   END IF;
@@ -606,6 +641,13 @@ BEGIN
     UPDATE_PRIMARY_KEY(mld_workflowstep_key,mld_s_mld_workflowstep_key);
 END;
 /
+CREATE_TRIGGER(mld_t_mld_workflowstep_B_D)
+BEFORE DELETE ON mld_workflowstep
+FOR EACH ROW
+BEGIN
+    UPDATE mld_melding SET mld_workflowstep_key = NULL where mld_workflowstep_key = :old.mld_workflowstep_key;
+END;
+/
 
 CREATE_TRIGGER(mld_t_mld_workflowrule_B_IU)
 BEFORE INSERT OR UPDATE ON mld_workflowrule

MLD/MLD_VIE.SRC

@@ -6,7 +6,7 @@
 
 CREATE_VIEW(MLD_discipline, 0)
 AS
- SELECT * FROM ALL_discipline WHERE ins_discipline_module = 'MLD';
+ SELECT * FROM ins_tab_discipline WHERE ins_discipline_module = 'MLD';
 
 DEFINIEER_VIEW_AANWEZIG(MLD_discipline, ins_discipline_verwijder,
     MLD_v_aanwezigdiscipline,0);
@@ -139,90 +139,6 @@ DEFINIEER_VIEW_AANWEZIG(mld_melding_object, mld_melding_object_verwijder,
 DEFINIEER_VIEW_AANWEZIG(mld_kenmerkmelding, mld_kenmerkmelding_verwijder,
 mld_v_aanwezigkenmerkmelding, 0);
 
-CREATE_VIEW(mld_v_stdmelding_kenmerk, 0)
-   (      mld_kenmerk_key
-   ,      mld_srtkenmerk_key
-   ,      mld_stdmelding_key
-   ,      mld_kenmerk_niveau
-   ,      mld_kenmerk_verplicht
-   ,      mld_kenmerk_toonbaar
-   ,      mld_kenmerk_uniek
-   ,      mld_kenmerk_locatiekolom
-   ,      mld_kenmerk_volgnummer
-   ,      mld_srtkenmerk_omschrijving
-   ,      mld_srtkenmerk_dimensie
-   ,      mld_srtkenmerk_kenmerktype
-   ,      mld_srtkenmerk_lengte
-   ,      mld_srtkenmerk_dec
-   ,      mld_srtkenmerk_nmin
-   ,      mld_srtkenmerk_nmax
-   ,      fac_kenmerkdomein_key
-   ,      mld_stdmelding_omschrijving
-   ,      mld_stdmelding_upper
-   ,      mld_discipline_key
-   ,      mld_discipline_omschrijving
-   )
-AS SELECT MLD_K.mld_kenmerk_key
-   ,      MLD_K.mld_srtkenmerk_key
-   ,      MLD_K.mld_stdmelding_key
-   ,      MLD_K.mld_kenmerk_niveau
-   ,      MLD_K.mld_kenmerk_verplicht
-   ,      MLD_K.mld_kenmerk_toonbaar
-   ,      MLD_K.mld_kenmerk_uniek
-   ,      MLD_K.mld_kenmerk_locatiekolom
-   ,      MLD_K.mld_kenmerk_volgnummer
-   ,      MLD_SK.mld_srtkenmerk_omschrijving
-   ,      MLD_SK.mld_srtkenmerk_dimensie
-   ,      MLD_SK.mld_srtkenmerk_kenmerktype
-   ,      MLD_SK.mld_srtkenmerk_lengte
-   ,      MLD_SK.mld_srtkenmerk_dec
-   ,      MLD_SK.mld_srtkenmerk_nmin
-   ,      MLD_SK.mld_srtkenmerk_nmax
-   ,      MLD_SK.fac_kenmerkdomein_key
-   ,      MLD_SM.mld_stdmelding_omschrijving
-   ,      MLD_SM.mld_stdmelding_upper
-   ,      INS_D.ins_discipline_key
-   ,      INS_D.ins_discipline_omschrijving
-   FROM   mld_kenmerk    MLD_K
-   ,      mld_srtkenmerk MLD_SK
-   ,      mld_stdmelding MLD_SM
-   ,      ins_discipline INS_D
-   WHERE  MLD_K.mld_srtkenmerk_key      = MLD_SK.mld_srtkenmerk_key
-   AND    MLD_K.mld_kenmerk_niveau      = 'S'
-   AND    MLD_SM.mld_stdmelding_key     = MLD_K.mld_stdmelding_key
-   AND    MLD_SM.mld_ins_discipline_key = INS_D.ins_discipline_key
-   UNION
-   SELECT MLD_K.mld_kenmerk_key
-   ,      MLD_K.mld_srtkenmerk_key
-   ,      MLD_K.mld_stdmelding_key
-   ,      MLD_K.mld_kenmerk_niveau
-   ,      MLD_K.mld_kenmerk_verplicht
-   ,      MLD_K.mld_kenmerk_toonbaar
-   ,      MLD_K.mld_kenmerk_uniek
-   ,      MLD_K.mld_kenmerk_locatiekolom
-   ,      MLD_K.mld_kenmerk_volgnummer
-   ,      MLD_SK.mld_srtkenmerk_omschrijving
-   ,      MLD_SK.mld_srtkenmerk_dimensie
-   ,      MLD_SK.mld_srtkenmerk_kenmerktype
-   ,      MLD_SK.mld_srtkenmerk_lengte
-   ,      MLD_SK.mld_srtkenmerk_dec
-   ,      MLD_SK.mld_srtkenmerk_nmin
-   ,      MLD_SK.mld_srtkenmerk_nmax
-   ,      MLD_SK.fac_kenmerkdomein_key
-   ,      MLD_SM.mld_stdmelding_omschrijving
-   ,      MLD_SM.mld_stdmelding_upper
-   ,      MLD_D.ins_discipline_key
-   ,      MLD_D.ins_discipline_omschrijving
-   FROM   mld_kenmerk    MLD_K
-   ,      mld_srtkenmerk MLD_SK
-   ,      mld_stdmelding MLD_SM
-   ,      mld_v_aanwezigdiscipline MLD_D
-   WHERE  MLD_K.mld_srtkenmerk_key      = MLD_SK.mld_srtkenmerk_key
-   AND    MLD_K.mld_kenmerk_niveau      = 'D'
-   AND    MLD_SM.mld_ins_discipline_key = MLD_D.ins_discipline_key
-   AND (  MLD_D.ins_discipline_key      = MLD_K.mld_stdmelding_key
-       OR MLD_K.mld_stdmelding_key   IS NULL);
-
 DEFINIEER_VIEW_AANWEZIG(mld_adres, mld_adres_verwijder,
 mld_v_aanwezigadres, 0);
 
@@ -2052,5 +1968,28 @@ SELECT o.*,
        AND mo.fac_usrdata_key = fu.fac_usrdata_key(+)
        AND mo.fin_btwtabelwaarde_key = btw.fin_btwtabelwaarde_key(+);
 
+CREATE_VIEW(mld_v_nettotijdsbesteding, 0)
+(
+   mld_opdr_key,
+   prs_perslid_key,
+   naam,
+   ntb_prs
+)
+AS
+SELECT o.mld_opdr_key,
+       beh.prs_perslid_key,
+       p.prs_perslid_naam_full,
+       mld.getnettotijdsbesteding(o.mld_opdr_key, beh.prs_perslid_key) ntb_prs
+  FROM mld_opdr o,
+       (SELECT DISTINCT t.prs_perslid_key,
+               fac_tracking_refkey
+          FROM fac_tracking t,
+               fac_srtnotificatie st
+         WHERE t.fac_srtnotificatie_key = st.fac_srtnotificatie_key
+           AND st.fac_srtnotificatie_code IN ('ORDACP','ORDRSM')) beh,
+       prs_v_perslid_fullnames_all   p
+ WHERE beh.fac_tracking_refkey = o.mld_opdr_key
+   AND beh.prs_perslid_key = p.prs_perslid_key;
+
 REGISTERRUN('$Id$')
 #endif  // MLD

MODULES.H

@@ -7,6 +7,7 @@
  * ALG  - Algemeen (onroerend goed)
  * BES  - Bestellingen (eProcurement)
  * BEZ  - Bezoekers registratie
+ * BGT  - Budgetconrole (BCS)
  * CAD  - AutoCAD koppeling
  * CNT  - Contracten
  * CTR  - Periodieke taken (controles)
@@ -26,6 +27,7 @@
 #define ALG    ALG
 #define BES    BES
 #define BEZ    BEZ
+#define BGT    BGT
 #define CAD    CAD
 #define CNT    CNT
 #define CTR    CTR

MRK/MRK_VIE.SRC

@@ -1,4 +1,4 @@
-#ifdef MRK 
+#ifdef MRK
 /*
  * $Revision$
  * $Id$
@@ -7,7 +7,7 @@
 
 CREATE_VIEW(mrk_discipline, 0)
 AS
- SELECT * FROM all_discipline WHERE ins_discipline_module = 'MRK';
+ SELECT * FROM ins_tab_discipline WHERE ins_discipline_module = 'MRK';
 
 DEFINIEER_VIEW_AANWEZIG(mrk_discipline, ins_discipline_verwijder,
     mrk_v_aanwezigdiscipline, 0);

PRS/PRS_IND.SRC

@@ -9,7 +9,7 @@ create index prs_i_prs_afdeling1 on prs_afdeling(prs_afdeling_parentkey);
 CREATE INDEX prs_i_prs_afdeling2 ON prs_afdeling(prs_kostenplaats_key);
 
 CREATE INDEX prs_i_prs_bedrijfadres1 on prs_bedrijfadres(prs_bedrijf_key);
-CREATE UNIQUE INDEX prs_i_prs_bedrijfadres2 on prs_bedrijfadres(prs_bedrijf_key, prs_bedrijfadres_type, mld_typeopdr_key);
+CREATE UNIQUE INDEX prs_i_prs_bedrijfadres2 on prs_bedrijfadres(prs_bedrijf_key, prs_bedrijfadres_type, mld_typeopdr_key, alg_locatie_key, alg_district_key);
 
 create index prs_i_prs_perslid1 on prs_perslid(prs_srtperslid_key);
 create index prs_i_prs_perslid2 on prs_perslid(prs_afdeling_key);
@@ -18,6 +18,7 @@ create index prs_i_prs_perslid3 on prs_perslid(prs_perslid_init_upper);
 CREATE INDEX prs_i_prs_perslid5 ON prs_perslid(prs_perslid_upper);
 CREATE INDEX prs_i_prs_perslid6 ON prs_perslid(prs_perslid_nr);
 CREATE UNIQUE INDEX prs_i_prs_perslid7 ON prs_perslid(prs_perslid_apikey);
+CREATE UNIQUE INDEX prs_i_prs_bedrijfbedrijf1 ON prs_bedrijf_bedrijf(prs_bedrijf_key1, prs_bedrijf_key2);
 
 CREATE INDEX prs_i_prscontactpersoon1 ON prs_contactpersoon(prs_bedrijf_key);
 CREATE INDEX prs_i_prscontactpersoon2 ON prs_contactpersoon(prs_perslid_key);
@@ -28,7 +29,7 @@ create index prs_i_prs_perslidwerkplek1 on prs_perslidwerkplek(prs_perslid_key);
 create index prs_i_prs_perslidwerkplek2 on prs_perslidwerkplek(prs_werkplek_key);
 
 CREATE INDEX prs_i_prs_kostenplaats2 ON prs_kostenplaats(prs_perslid_key);
-CREATE UNIQUE INDEX prs_i_prs_kostensoort1 ON prs_kostensoort(prs_kostensoort_upper);
+CREATE UNIQUE INDEX prs_i_prs_kostensoort1 ON prs_kostensoort(prs_kostensoortgrp_key, prs_kostensoort_upper);
 CREATE UNIQUE INDEX prs_i_prs_kostencombinatie1 ON prs_kostencombinatie (prs_kostenplaatsgrp_key, prs_kostensoort_key);
 
 create index prs_i_prs_perslidkostenplaats1 ON prs_perslidkostenplaats(prs_perslid_key, prs_kostenplaats_key);

PRS/PRS_PAC.SRC

@@ -93,7 +93,7 @@ AS
 
    PROCEDURE upsertkenmerk (p_kenmerk_key IN NUMBER, p_prs_key IN NUMBER, p_waarde IN VARCHAR2);
 
-   PROCEDURE movetoruimte (p_prs_key IN NUMBER, p_ruimte_key IN NUMBER, p_alg_type IN VARCHAR2);
+   PROCEDURE movetoruimte (p_prs_key IN NUMBER, p_ruimte_key IN NUMBER, p_alg_type IN VARCHAR2, p_virtual IN NUMBER DEFAULT 0);
 
    PROCEDURE import_perslid (p_import_key IN NUMBER, p_seq_of_columns IN VARCHAR2, p_header IN VARCHAR2);
 
@@ -500,8 +500,9 @@ AS
    -- Als er al vaste werkplekken waren binnen het niveau van p_alg_type (R,V,G,L,D,NULL,A)
    -- dan worden die geleegd/gewist. Bij NULL wordt niks gewist, bij A wordt altijd gewist.
    PROCEDURE movetoruimte (p_prs_key      IN NUMBER,
-                                          p_ruimte_key   IN NUMBER,
-                                          p_alg_type     IN VARCHAR2)
+                           p_ruimte_key   IN NUMBER,
+                           p_alg_type     IN VARCHAR2,
+                           p_virtual      IN NUMBER DEFAULT 0)
     IS
         v_count       NUMBER;
         v_wp_key      NUMBER (10);
@@ -517,7 +518,9 @@ AS
           FROM prs_perslidwerkplek pw, prs_werkplek wp
          WHERE     pw.prs_perslid_key = p_prs_key
                AND pw.prs_werkplek_key = wp.prs_werkplek_key
-               AND wp.prs_alg_ruimte_key = p_ruimte_key;
+               AND wp.prs_alg_ruimte_key = p_ruimte_key
+               AND wp.prs_werkplek_type = 0  -- alleen vaste plekken
+               AND wp.prs_werkplek_virtueel = p_virtual;
 
         IF (v_count = 0)
         THEN
@@ -553,14 +556,14 @@ AS
                                                        alg_key
                                               FROM alg_v_ruimte_gegevens_all) og
                                      WHERE     wp.prs_werkplek_key = pw.prs_werkplek_key
-                                           AND wp.prs_werkplek_virtueel = 0
+                                           AND wp.prs_werkplek_virtueel = p_virtual
                                            AND wp.prs_werkplek_type = 0  -- alleen vaste plekken
                                            AND wp.prs_alg_ruimte_key = og.alg_ruimte_key
                                            AND (og.alg_key = v_alg_key OR p_alg_type = 'A'));
             ELSE
                 -- Wis de werkplek, automatisch inclusief de bezetting
                 DELETE FROM prs_werkplek wp
-                      WHERE wp.prs_werkplek_virtueel = 0
+                      WHERE wp.prs_werkplek_virtueel = p_virtual
                             AND wp.prs_werkplek_type = 0  -- alleen vaste plekken
                             AND EXISTS
                                    (SELECT 1
@@ -591,7 +594,7 @@ AS
                       INTO v_wp_key
                       FROM prs_werkplek wp
                      WHERE wp.prs_alg_ruimte_key = p_ruimte_key
-                           AND wp.prs_werkplek_virtueel = 0
+                           AND wp.prs_werkplek_virtueel = p_virtual
                            AND wp.prs_werkplek_type = 0  -- alleen vaste plekken
                            AND NOT EXISTS (SELECT 1
                                              FROM prs_perslidwerkplek pw
@@ -622,8 +625,9 @@ AS
                     INSERT INTO prs_werkplek (prs_werkplek_volgnr,
                                               prs_werkplek_omschrijving,
                                               prs_alg_ruimte_key,
-                                              prs_werkplek_type)
-                        VALUES (v_wp_volgnr, v_wp_oms, p_ruimte_key, 0)
+                                              prs_werkplek_type,
+                                              prs_werkplek_virtueel)
+                        VALUES (v_wp_volgnr, v_wp_oms, p_ruimte_key, 0, p_virtual)
                      RETURNING prs_werkplek_key
                           INTO v_wp_key;
                 END IF;
@@ -2151,6 +2155,23 @@ AS
            v_errorhint :=
               'Verwijderen van persoon met key ' || TO_CHAR (p_perslid_key);
 
+           DELETE FROM fac_menu -- Heeft nog geen cascade
+                 WHERE prs_perslid_key = p_perslid_key;
+
+           -- Referenties in tabellen naar deze pers_perslid_key moeten eerst verwijderd worden.
+           -- Door cascade verwijderen van deze record onstaan audits op die tabellen die audit tracking hebben.
+           -- Daardoor onstaan "ORxA-04091:table VLKC.FAC_AUDIT is mutating, trigger/function may not see it" foutmeldingen
+           -- op de delete van de prs_perslid_key uit de prs_perslid tabel.
+           -- De tabellen prs_kostenplaats, prs_kostenplaatsgrp, prs_perslidkostenplaats en fac_gebruikersgroep hebben een prs_perslid_key referentie en audit tracking.
+           DELETE FROM prs_kostenplaats
+                 WHERE prs_perslid_key = p_perslid_key;
+           DELETE FROM prs_kostenplaatsgrp
+                 WHERE prs_perslid_key = p_perslid_key;
+           DELETE FROM prs_perslidkostenplaats
+                 WHERE prs_perslid_key = p_perslid_key;
+           DELETE FROM fac_gebruikersgroep
+                 WHERE prs_perslid_key = p_perslid_key;
+
            DELETE FROM prs_perslid
                  WHERE prs_perslid_key = p_perslid_key;
 

PRS/PRS_SEQ.SRC

@@ -15,6 +15,7 @@ CREATE SEQUENCE prs_s_prs_eenheid_key          MINVALUE 1;
 CREATE SEQUENCE prs_s_prs_contactpersoon_key   MINVALUE 1;
 CREATE SEQUENCE prs_s_prs_contactpers_loc_key  MINVALUE 1;
 CREATE SEQUENCE prs_s_prs_bedrijfadres_key     MINVALUE 1;
+CREATE SEQUENCE prs_s_prs_bedrijfbedrijf_key   MINVALUE 1;
 
 CREATE SEQUENCE prs_s_prs_dienst_key           MINVALUE 1;
 CREATE SEQUENCE prs_s_prs_bedrijfdienstloc_key MINVALUE 1;

PRS/PRS_TAB.SRC

@@ -163,6 +163,52 @@ ADD
         CONSTRAINT fac_r_idp_prs_bedrijf REFERENCES prs_bedrijf(prs_bedrijf_key) ON DELETE CASCADE
 );
 
+ALTER TABLE aut_idp
+ADD
+(
+    prs_bedrijf_key
+        NUMBER(10)
+        CONSTRAINT aut_r_idp_prs_bedrijf REFERENCES prs_bedrijf(prs_bedrijf_key) ON DELETE CASCADE
+);
+
+/* Kruistabel met bedrijfsrelaties (use case Mareon): bedrijf 1 doet iets voor bedrijf 2 of andersom */
+CREATE_TABLE(prs_bedrijf_bedrijf,0)
+(
+   prs_bedrijf_bedrijf_key
+        NUMBER (10) PRIMARY KEY NOT NULL,
+   prs_bedrijf_key1
+        NUMBER (10)
+        CONSTRAINT prs_r_prs_bedrijf_bedrijf1 REFERENCES prs_bedrijf (prs_bedrijf_key) NOT NULL,
+   prs_bedrijf_externid1
+        VARCHAR2(60),     -- optional remote key of 1
+   prs_bedrijf_key2
+        NUMBER (10)
+        CONSTRAINT prs_r_prs_bedrijf_bedrijf2 REFERENCES prs_bedrijf (prs_bedrijf_key) NOT NULL,
+   prs_bedrijf_externid2
+        VARCHAR2(60),     -- optional remote key of 2
+   prs_bedrijf_bedrijf_startdatum
+        DATE
+        DEFAULT SYSDATE,
+   prs_bedrijf_bedrijf_einddatum
+        DATE,
+   prs_bedrijf_bedrijf_status
+        NUMBER(1)         -- voor mld_opdr_teverzenden: 0=niet te verzenden 1=te verzenden
+        DEFAULT(0)
+        NOT NULL,
+   prs_bedrijf_bedrijf_charged
+        NUMBER(1)         -- 0=niemand, 1=opdrachtnemer, 2=opdrachtgever
+        DEFAULT(0)
+        NOT NULL,
+   prs_bedrijf_bedrijf_chargemode
+        NUMBER(4),        -- een codering voor de "premiummode" waaruit afgeleid kan worden hoe de kosten worden berekend (per opdracht, per bestelling, enz), enigszins futureproof
+   prs_bedrijf_bedrijf_fee1
+        NUMBER(6,2),      -- bedrag in euro's tbv berekening icm chargemode
+   prs_bedrijf_bedrijf_fee2
+        NUMBER(6,2),      -- bedrag in euro's tbv berekening icm chargemode
+   prs_bedrijf_bedrijf_fee3
+        NUMBER(6,2)       -- bedrag in euro's tbv berekening icm chargemode
+);
+
 /*  Kruistabel met elektronische adressen van een bedrijf, toegepast door
  *  PutOrders voor Bestellingen, Contracten en Opdrachten. Bij Opdrachten kan
  *  er per opdrachttype een ander adres zijn, het record met mld_typeopdr_key NULL
@@ -175,6 +221,12 @@ CREATE_TABLE(prs_bedrijfadres, 0) (
     prs_bedrijf_key
         NUMBER(10)
         CONSTRAINT prs_r_prs_bedrijf_key6 REFERENCES prs_bedrijf(prs_bedrijf_key) ON DELETE CASCADE,
+    alg_district_key
+        NUMBER(10)
+        CONSTRAINT prs_r_alg_district_key REFERENCES alg_district(alg_district_key) ON DELETE CASCADE,
+    alg_locatie_key
+        NUMBER(10)
+        CONSTRAINT prs_r_alg_locatie_key REFERENCES alg_locatie(alg_locatie_key) ON DELETE CASCADE,
     prs_bedrijfadres_type /* O = order, B = Bestelling, V=Voorraadinfo, C = Contract */
         VARCHAR2(1)
         CONSTRAINT prs_c_prs_bedrijfadrestype CHECK (prs_bedrijfadres_type IN ('O','B','C','V')),
@@ -203,6 +255,13 @@ CREATE_TABLE(prs_bedrijfadres, 0) (
         NUMBER(3)
         DEFAULT 0
         NOT NULL,
+--    prs_bedrijfadres_lockuser_key
+--        NUMBER(10)
+--        CONSTRAINT prs_r_prs_bedrijfadres_lckusr REFERENCES prs_perslid(prs_perslid_key),
+    prs_bedrijfadres_locksecret
+        VARCHAR2(128),
+    prs_bedrijfadres_lockexpire
+        NUMBER(10),
     prs_bedrijfadres_attachfile
         VARCHAR2(256),
     prs_bedrijfadres_flexfiles /* 0=default (volgens S("puo_order_flexfiles")), 1=wel, 2=niet */
@@ -226,10 +285,16 @@ CREATE_TABLE(prs_kostenplaatsgrp,0) (
    prs_kostenplaatsgrp_limiet
        NUMBER(8),
    prs_kostenplaatsgrp_limperiode /* 0(of NULL)=geen(oneindig), 1=maand, 2=jaar */
-       NUMBER(1)
---,   prs_perslid_key
+       NUMBER(1),
+--   prs_perslid_key
 --       NUMBER(10)
---       CONSTRAINT prs_r_prs_perslid_key11 REFERENCES prs_perslid(prs_perslid_key)
+--       CONSTRAINT prs_r_prs_perslid_key11 REFERENCES prs_perslid(prs_perslid_key),
+   prs_kostenplaatsgrp_aanmaak
+       DATE
+       DEFAULT SYSDATE
+--   bgt_project_key
+--       NUMBER(10)
+--       CONSTRAINT prs_r_bgt_project_key2 REFERENCES bgt_project(bgt_project_key)
 );
 
 CREATE_TABLE(prs_kostenplaats,0) (
@@ -253,7 +318,7 @@ CREATE_TABLE(prs_kostenplaats,0) (
        DATE,
    prs_kostenplaatsgrp_key
        NUMBER(10)
-       CONSTRAINT prs_r_prs_kostenplaatsgrp_key REFERENCES prs_kostenplaatsgrp(prs_kostenplaatsgrp_key) ON DELETE SET NULL,
+       CONSTRAINT prs_r_prs_kostenplaatsgrp_key REFERENCES prs_kostenplaatsgrp(prs_kostenplaatsgrp_key),
    prs_kostenplaats_aanmaak
        DATE DEFAULT SYSDATE,
    prs_kostenplaats_verwijder
@@ -312,7 +377,10 @@ CREATE_TABLE(prs_kostenplaatsdisc, 0) (
         REFERENCES ins_tab_discipline(ins_discipline_key) ON DELETE CASCADE,
     prs_kostenplaatsdisc_limiet
         NUMBER(8)
-        NOT NULL
+        NOT NULL,
+    prs_kostenplaatsdisc_aanmaak
+       DATE
+       DEFAULT SYSDATE
 );
 
 CREATE_TABLE(prs_afdeling,0)
@@ -365,6 +433,12 @@ ALTER TABLE fac_idp ADD
        NUMBER(10)
        CONSTRAINT alg_r_idp_prs_afdeling REFERENCES prs_afdeling(prs_afdeling_key) ON DELETE CASCADE
 );
+ALTER TABLE aut_idp ADD
+(
+    prs_afdeling_key
+       NUMBER(10)
+       CONSTRAINT aut_r_idp_prs_afdeling REFERENCES prs_afdeling(prs_afdeling_key) ON DELETE CASCADE
+);
 
 CREATE_TABLE(prs_srtperslid,0)
 (
@@ -577,6 +651,8 @@ CREATE_TABLE(prs_perslid,0)
         DATE,
     prs_perslid_terms_version /* filename of accepted terms of condition */
         VARCHAR2(200),
+    prs_perslid_timezone
+        VARCHAR2(40),
     CONSTRAINT prs_c_prs_perslid_datums CHECK(prs_perslid_einddatum >= prs_perslid_ingangsdatum)
 );
 
@@ -675,6 +751,11 @@ ALTER TABLE alg_gebouw ADD (
         CONSTRAINT alg_r_prs_perslid_key2 REFERENCES prs_perslid(prs_perslid_key)
 );
 
+ALTER TABLE prs_bedrijfadres
+    ADD prs_bedrijfadres_lockuser_key
+        NUMBER(10)
+        CONSTRAINT prs_r_prs_bedrijfadres_lckser REFERENCES prs_perslid(prs_perslid_key);
+
 ALTER TABLE prs_kostenplaatsgrp ADD
 (
    prs_perslid_key
@@ -740,6 +821,20 @@ ALTER TABLE fac_setting ADD
        CONSTRAINT prs_perslid_key12 REFERENCES prs_perslid (prs_perslid_key)
 );
 
+ALTER TABLE fac_audit ADD
+(
+   prs_perslid_key
+       NUMBER(10)
+       CONSTRAINT fac_r_prs_perslid_key9 REFERENCES prs_perslid(prs_perslid_key) ON DELETE SET NULL
+);
+
+ALTER TABLE aut_client_perslid ADD (
+    prs_perslid_key
+        NUMBER(10)
+        CONSTRAINT aut_r_aut_client_perslid REFERENCES prs_perslid(prs_perslid_key) ON DELETE CASCADE
+        CONSTRAINT aut_c_aut_client_perslid CHECK(prs_perslid_key IS NOT NULL)
+);
+
 COMMENT ON COLUMN prs_kostenplaats.prs_perslid_key IS 'Budgethouder';
 
 // key_alt is een vervanger voor key als frontend
@@ -781,7 +876,10 @@ CREATE_TABLE(prs_perslidkostenplaats,0)
     prs_perslidkostenplaats_inzage
         NUMBER(1)
         DEFAULT 1
-        CONSTRAINT prs_c_prs_pkp_inzage CHECK(prs_perslidkostenplaats_inzage IN (0,1))
+        CONSTRAINT prs_c_prs_pkp_inzage CHECK(prs_perslidkostenplaats_inzage IN (0,1)),
+    prs_perslidkostenplaats_aanmk
+        DATE
+        DEFAULT SYSDATE
 );
 
 // Had voor hetzelfde geld prs_afdelingruimte geheten
@@ -1060,21 +1158,25 @@ CREATE_TABLE(prs_kostensoort,0) (
    prs_kostensoort_refcode     -- bv grootboeknr
        VARCHAR2(60),
    prs_kostensoort_doorbelasten   -- 1=Ja
-        NUMBER(1) DEFAULT(1)
-        CONSTRAINT prs_c_prs_kostensoort_doorbel CHECK(prs_kostensoort_doorbelasten IN (0,1)),
+       NUMBER(1) DEFAULT(1)
+       CONSTRAINT prs_c_prs_kostensoort_doorbel CHECK(prs_kostensoort_doorbelasten IN (0,1)),
    prs_kostensoort_btw   -- BTW doorbelasten 1=Incl.
-        NUMBER(1) DEFAULT(1)
-        CONSTRAINT prs_c_prs_kostensoort_btw CHECK(prs_kostensoort_btw IN (0,1)),
+       NUMBER(1) DEFAULT(1)
+       CONSTRAINT prs_c_prs_kostensoort_btw CHECK(prs_kostensoort_btw IN (0,1)),
     prs_kostenplaats_key
-        NUMBER(10)
-        CONSTRAINT prs_r_prs_kostenplaats_key3 REFERENCES prs_kostenplaats(prs_kostenplaats_key),
+       NUMBER(10)
+       CONSTRAINT prs_r_prs_kostenplaats_key3 REFERENCES prs_kostenplaats(prs_kostenplaats_key),
    prs_kostensoortgrp_key
        NUMBER(10)
-       CONSTRAINT prs_r_prs_kostensoortgrp_key REFERENCES prs_kostensoortgrp(prs_kostensoortgrp_key) ON DELETE SET NULL,
+       NOT NULL
+       CONSTRAINT prs_r_prs_kostensoortgrp_key REFERENCES prs_kostensoortgrp(prs_kostensoortgrp_key),
    prs_kostensoort_aanmaak
        DATE DEFAULT SYSDATE,
    prs_kostensoort_altcode
        VARCHAR2(60)
+--   fin_btwtabelwaarde_key
+--       NUMBER(10)
+--       CONSTRAINT prs_r_fin_btwtabelwaarde_key REFERENCES fin_btwtabelwaarde (fin_btwtabelwaarde_key)
 );
 
 ALTER TABLE ins_tab_discipline ADD
@@ -1092,7 +1194,10 @@ CREATE_TABLE(prs_kostencombinatie,0) (
        CONSTRAINT prs_r_prs_kostenplaatsgrp_key2 REFERENCES prs_kostenplaatsgrp(prs_kostenplaatsgrp_key) ON DELETE CASCADE,
    prs_kostensoort_key
        NUMBER(10) NOT NULL
-       CONSTRAINT prs_r_prs_kostensoort_key1 REFERENCES prs_kostensoort(prs_kostensoort_key) ON DELETE CASCADE
+       CONSTRAINT prs_r_prs_kostensoort_key1 REFERENCES prs_kostensoort(prs_kostensoort_key) ON DELETE CASCADE,
+   prs_kostencombinatie_aanmaak
+       DATE
+       DEFAULT SYSDATE
 );
 
 CREATE_TABLE(prs_staffel, 0)

PRS/PRS_TRI.SRC

@@ -99,6 +99,13 @@ BEGIN
 END;
 /
 
+AUDIT_BEGIN(prs_perslid)
+IF NOT DELETING
+THEN
+  AUDIT_VALUE(prs_perslid, prs_perslid_verwijder)
+END IF;
+AUDIT_END()
+
 CREATE_TRIGGER(prs_t_prs_perslid_B_I)
 BEFORE INSERT ON prs_perslid
 FOR EACH ROW
@@ -207,6 +214,7 @@ BEGIN
             DELETE FROM FAC_GEBRUIKERSGROEP WHERE PRS_PERSLID_KEY = :old.prs_perslid_key;
             -- Ook een stukje veiligheid
             DELETE FROM fac_session WHERE prs_perslid_key = :old.prs_perslid_key;
+            DELETE FROM aut_client_perslid WHERE prs_perslid_key = :old.prs_perslid_key;
         END;
         -- Tenslotte: ruim de objecten die ik zelf mocht beheren op
         -- Aandacht: zou nog steeds kunnen dat dit faalt, niet mekkeren, jammer dan
@@ -240,6 +248,8 @@ BEGIN
          :new.prs_perslid_credentials_datum := SYSDATE;
          DELETE FROM fac_session
                WHERE prs_perslid_key = :new.prs_perslid_key;
+         DELETE FROM aut_client_perslid
+               WHERE prs_perslid_key = :old.prs_perslid_key;
       END IF;
 
 END;
@@ -394,6 +404,14 @@ BEGIN
 END;
 /
 
+CREATE_TRIGGER(prs_t_prs_bedrijfbedrijf_B_IU)
+BEFORE INSERT OR UPDATE ON prs_bedrijf_bedrijf
+FOR EACH ROW
+BEGIN
+    UPDATE_PRIMARY_KEY(prs_bedrijf_bedrijf_key, prs_s_prs_bedrijfbedrijf_key);
+END;
+/
+
 CREATE_TRIGGER(prs_t_prs_bedrijfadres_B_I)
 BEFORE INSERT ON prs_bedrijfadres
 FOR EACH ROW
@@ -703,6 +721,14 @@ BEGIN
 END;
 /
 
+AUDIT_BEGIN(prs_kostenplaatsgrp)
+AUDIT_VALUE(prs_kostenplaatsgrp, prs_kostenplaatsgrp_oms)
+AUDIT_VALUE(prs_kostenplaatsgrp, prs_kostenplaatsgrp_nr)
+AUDIT_VALUE(prs_kostenplaatsgrp, prs_perslid_key)
+AUDIT_VALUE(prs_kostenplaatsgrp, prs_kostenplaatsgrp_limiet)
+AUDIT_VALUE(prs_kostenplaatsgrp, prs_kostenplaatsgrp_limperiode)
+AUDIT_END()
+
 CREATE_TRIGGER(prs_t_prs_kostenplaatsgrp_B_IU)
 BEFORE INSERT OR UPDATE ON prs_kostenplaatsgrp
 FOR EACH ROW
@@ -711,6 +737,20 @@ BEGIN
 END;
 /
 
+AUDIT_BEGIN(prs_kostenplaats)
+AUDIT_VALUE(prs_kostenplaats, prs_kostenplaats_nr)
+AUDIT_VALUE(prs_kostenplaats, prs_kostenplaats_module)
+AUDIT_VALUE(prs_kostenplaats, prs_kostenplaats_omschrijving)
+AUDIT_VALUE(prs_kostenplaats, prs_perslid_key)
+AUDIT_VALUE(prs_kostenplaats, prs_kostenplaatsgrp_key)
+AUDIT_VALUE(prs_kostenplaats, prs_kostenplaats_extern)
+AUDIT_VALUE(prs_kostenplaats, prs_kostenplaats_fiat)
+AUDIT_VALUE(prs_kostenplaats, prs_kostenplaats_eind)
+AUDIT_VALUE(prs_kostenplaats, prs_kostenplaats_limiet)
+AUDIT_VALUE(prs_kostenplaats, prs_kostenplaats_limietperiode)
+AUDIT_VALUE(prs_kostenplaats, prs_kostenplaats_verwijder)
+AUDIT_END()
+
 CREATE_TRIGGER(prs_t_prs_kostenplaats_B_IU)
 BEFORE INSERT OR UPDATE ON prs_kostenplaats
 FOR EACH ROW
@@ -725,6 +765,12 @@ BEGIN
 END;
 /
 
+AUDIT_BEGIN(prs_kostenplaatsdisc)
+AUDIT_VALUE(prs_kostenplaatsdisc, prs_kostenplaats_key)
+AUDIT_VALUE(prs_kostenplaatsdisc, ins_discipline_key)
+AUDIT_VALUE(prs_kostenplaatsdisc, prs_kostenplaatsdisc_limiet)
+AUDIT_END()
+
 CREATE_TRIGGER(prs_t_prs_kostenpltsdisc_B_IU)
 BEFORE INSERT OR UPDATE ON prs_kostenplaatsdisc
 FOR EACH ROW
@@ -733,6 +779,13 @@ BEGIN
 END;
 /
 
+AUDIT_BEGIN(prs_perslidkostenplaats)
+AUDIT_VALUE(prs_perslidkostenplaats, prs_perslid_key)
+AUDIT_VALUE(prs_perslidkostenplaats, prs_kostenplaats_key)
+AUDIT_VALUE(prs_perslidkostenplaats, prs_perslidkostenplaats_boeken)
+AUDIT_VALUE(prs_perslidkostenplaats, prs_perslidkostenplaats_inzage)
+AUDIT_END()
+
 CREATE_TRIGGER(prs_t_prs_perslidkp_B_IU)
 BEFORE INSERT OR UPDATE ON prs_perslidkostenplaats
 FOR EACH ROW
@@ -757,6 +810,16 @@ BEGIN
 END;
 /
 
+AUDIT_BEGIN(prs_kostensoort)
+AUDIT_VALUE(prs_kostensoort, prs_kostensoort_oms)
+AUDIT_VALUE(prs_kostensoort, prs_kostensoort_refcode)
+AUDIT_VALUE(prs_kostensoort, prs_kostensoort_doorbelasten)
+AUDIT_VALUE(prs_kostensoort, prs_kostensoort_btw)
+AUDIT_VALUE(prs_kostensoort, prs_kostenplaats_key)
+AUDIT_VALUE(prs_kostensoort, prs_kostensoortgrp_key)
+AUDIT_VALUE(prs_kostensoort, prs_kostensoort_altcode)
+AUDIT_END()
+
 CREATE_TRIGGER(prs_t_prs_kostensoort_B_IU)
 BEFORE INSERT OR UPDATE ON prs_kostensoort
 FOR EACH ROW
@@ -766,6 +829,11 @@ BEGIN
 END;
 /
 
+AUDIT_BEGIN(prs_kostencombinatie)
+AUDIT_VALUE(prs_kostencombinatie, prs_kostenplaatsgrp_key)
+AUDIT_VALUE(prs_kostencombinatie, prs_kostensoort_key)
+AUDIT_END()
+
 CREATE_TRIGGER(prs_t_prs_kostencomb_B_IU)
 BEFORE INSERT OR UPDATE ON prs_kostencombinatie
 FOR EACH ROW

PRS/PRS_VIE.SRC

@@ -118,7 +118,6 @@ SELECT prs_perslid_key,
        || prs_perslid_naam prs_perslid_naam_friendly
 FROM prs_v_aanwezigperslid p;
 
-// FSN#546
 CREATE_VIEW(prs_v_perslid_fullnames_all, 0) AS
 SELECT prs_perslid_key,
        prs_perslid_naam||DECODE(p.prs_perslid_voorletters,null,'',', '||p.prs_perslid_voorletters)
@@ -126,7 +125,8 @@ SELECT prs_perslid_key,
        ||DECODE(p.prs_perslid_voornaam,null,'',' ('||p.prs_perslid_voornaam||')') prs_perslid_naam_full,
           DECODE (p.prs_perslid_voornaam, NULL, '', p.prs_perslid_voornaam || ' ')
        || DECODE (p.prs_perslid_tussenvoegsel, NULL, '', p.prs_perslid_tussenvoegsel || ' ')
-       || prs_perslid_naam prs_perslid_naam_friendly
+       || prs_perslid_naam prs_perslid_naam_friendly,
+       prs_perslid_verwijder
 FROM prs_perslid p;
 
 CREATE_VIEW (prs_v_afdeling_perslid,0)

RES/RES_PAC.SRC

@@ -33,6 +33,7 @@ CREATE OR REPLACE PACKAGE res AS
    FUNCTION getdeelresprijs (pres_rsv_ruimte_key IN NUMBER)  RETURN NUMBER;
    FUNCTION sprintf (ps IN VARCHAR2 , pres_rsv_ruimte_key IN NUMBER) RETURN VARCHAR2;
    FUNCTION notifypool (pbez_bezoeker_key IN NUMBER, pcode IN VARCHAR2) RETURN NUMBER;
+   PROCEDURE notifybackoffice (prsvkey IN NUMBER, pcode IN VARCHAR2, ptype IN VARCHAR2 DEFAULT NULL, pkey IN NUMBER DEFAULT NULL);
 END res;
 /
 
@@ -497,8 +498,9 @@ AS
             -- Controleer op blokkade van ruimte ivm middagpauze
             IF (ruimte_blok_van IS NOT NULL AND ruimte_blok_tot IS NOT NULL)
             THEN
-                IF prsv_ruimte.res_rsv_ruimte_van BETWEEN TRUNC(prsv_ruimte.res_rsv_ruimte_van)+ruimte_blok_van AND TRUNC(prsv_ruimte.res_rsv_ruimte_van)+ruimte_blok_tot
-                OR prsv_ruimte.res_rsv_ruimte_tot BETWEEN TRUNC(prsv_ruimte.res_rsv_ruimte_tot)+ruimte_blok_van AND TRUNC(prsv_ruimte.res_rsv_ruimte_tot)+ruimte_blok_tot
+                IF (   (prsv_ruimte.res_rsv_ruimte_van < TRUNC(prsv_ruimte.res_rsv_ruimte_van)+ruimte_blok_tot - 1/24/60)
+                   AND (prsv_ruimte.res_rsv_ruimte_tot > TRUNC(prsv_ruimte.res_rsv_ruimte_van)+ruimte_blok_van + 1/24/60)
+                   )
                 THEN
                     n_overlap := 1;
                 END IF;
@@ -1854,6 +1856,221 @@ AS
       RETURN s;
    END;
 
+   PROCEDURE notifybackoffice (prsvkey IN NUMBER, pcode IN VARCHAR2, ptype IN VARCHAR2 DEFAULT NULL, pkey IN NUMBER DEFAULT NULL)
+   AS
+      --lloc_key       alg_locatie.alg_locatie_key%TYPE;
+      --lroom_key      alg_ruimte.alg_ruimte_key%TYPE;
+      --lafd_key       prs_perslid.prs_afdeling_key%TYPE;
+      --ldisc_key      res_disc_params.res_ins_discipline_key%TYPE;
+      loms2bo        fac_srtnotificatie.fac_srtnotificatie_oms%TYPE;
+      l2bomode       fac_srtnotificatie.fac_srtnotificatie_mode%TYPE;
+      lsrtnoticode   fac_srtnotificatie.fac_srtnotificatie_code%TYPE;
+      lfunctiecode   fac_functie.fac_functie_code%TYPE;
+      lnrreceivers   NUMBER;
+      bericht        fac_srtnotificatie.fac_srtnotificatie_oms%TYPE;                         -- kan te kort zijn na substitutie
+      lreceivers     fac_srtnotificatie.fac_srtnotificatie_oms%TYPE;
+      lreceivers1    fac_srtnotificatie.fac_srtnotificatie_oms%TYPE;
+      ltracking      VARCHAR2(4000);  -- moet tijdelijk groter dan fac_srtnotificatie.fac_srtnotificatie_oms%TYPE kunnen zijn
+      lref_key       NUMBER;
+      lext_key       NUMBER;
+   BEGIN
+      BEGIN
+         -- De discipline setting RES_DISC_PARAMS_BONOTIFY geeft aan of de notificatie moeten worden verstuurd.
+         -- RES_DISC_PARAMS_BONOTIFY: 0=niet, 1=bof.
+         --
+         SELECT lcl.x('fac_srtnotificatie_oms', fac_srtnotificatie_key, fac_srtnotificatie_oms)
+              , fac_srtnotificatie_mode
+           INTO loms2bo
+              , l2bomode
+           FROM fac_srtnotificatie
+          WHERE fac_srtnotificatie_code = 'RES2BO';
+         --
+         IF (l2bomode > 0) AND (pcode = 'RESNEW' OR pcode = 'RESUPD')
+         THEN
+            lfunctiecode := 'WEB_RESBOF';
+            lsrtnoticode := 'RES2BO';
+            bericht := res.sprintf (loms2bo, prsvkey);  -- de variabelen invullen
+         ELSE
+            -- hoeft niets te doen
+            RETURN;
+         END IF;
+         --
+         lnrreceivers := 0;
+         lreceivers := '';
+         --
+         FOR disc
+            IN (SELECT x.alg_locatie_key
+                     , x.res_discipline_key
+                     , x.prs_afdeling_key
+                     , x.alg_ruimte_key
+                     , x.res_reservering_key
+                  FROM (
+                        SELECT rg.alg_locatie_key    -- RES_RUIMTE
+                             , rg.res_discipline_key
+                             , p.prs_afdeling_key
+                             , ra.alg_ruimte_key
+                             , rr.res_reservering_key
+                          FROM res_v_res_ruimte_gegevens rg
+                             , res_alg_ruimte ra
+                             , res_ruimte_opstelling ro
+                             , res_rsv_ruimte rr
+                             , prs_perslid p
+                         WHERE rg.res_ruimte_key = ro.res_ruimte_key
+                           AND rr.res_ruimte_opstel_key = ro.res_ruimte_opstel_key
+                           AND ra.res_ruimte_key = ro.res_ruimte_key
+                           AND rr.res_rsv_ruimte_host_key = p.prs_perslid_key
+                           AND TRUNC(rr.res_rsv_ruimte_van) = TRUNC(sysdate)
+                           AND ptype IS NULL
+                           AND rr.res_status_bo_key = 2
+                           AND rr.res_rsv_ruimte_key = prsvkey
+                        UNION
+                        SELECT g.alg_locatie_key    -- RES_DEEL
+                             , d.res_discipline_key
+                             , p.prs_afdeling_key
+                             , rr.alg_ruimte_key
+                             , rr.res_reservering_key
+                          FROM res_rsv_ruimte rr
+                             , res_rsv_deel rd
+                             , res_deel d
+                             , ins_deel i
+                             , prs_perslid p
+                             , alg_v_allonroerendgoed g
+                         WHERE i.ins_alg_ruimte_key = g.alg_ruimte_key
+                           AND i.ins_alg_ruimte_type = g.alg_type
+                           AND i.ins_deel_key = d.res_ins_deel_key
+                           AND rd.res_deel_key = d.res_deel_key
+                           AND rd.res_rsv_ruimte_key = rr.res_rsv_ruimte_key
+                           AND rr.res_rsv_ruimte_host_key = p.prs_perslid_key
+                           AND TRUNC(rr.res_rsv_ruimte_van) = TRUNC(sysdate)
+                           AND (   ptype IS NULL
+                               OR (ptype = 'V' AND d.res_deel_key = pkey)
+                               )
+                           AND rd.res_status_bo_key = 2
+                           AND rr.res_rsv_ruimte_key = prsvkey
+                        UNION
+                        SELECT rg.alg_locatie_key    -- RES_ARTIKEL
+                             , a.res_discipline_key
+                             , p.prs_afdeling_key
+                             , rar.alg_ruimte_key
+                             , rr.res_reservering_key
+                          FROM res_rsv_ruimte rr
+                             , res_rsv_artikel ra
+                             , res_artikel a
+                             , prs_perslid p
+                             , res_ruimte_opstelling ro
+                             , res_alg_ruimte rar
+                             , res_v_res_ruimte_gegevens rg
+                         WHERE rr.res_rsv_ruimte_key = ra.res_rsv_ruimte_key
+                           AND ra.res_artikel_key = a.res_artikel_key
+                           AND rr.res_rsv_ruimte_host_key = p.prs_perslid_key
+                           AND rr.res_ruimte_opstel_key = ro.res_ruimte_opstel_key
+                           AND ro.res_ruimte_key = rar.res_alg_ruimte_key
+                           AND ro.res_ruimte_key = rg.res_ruimte_key
+                           AND TRUNC(rr.res_rsv_ruimte_van) = TRUNC(sysdate)
+                           AND (   ptype IS NULL
+                               OR (ptype = 'C' AND a.res_artikel_key = pkey)
+                               )
+                           AND ra.res_status_bo_key = 2
+                           AND rr.res_rsv_ruimte_key = prsvkey
+                       ) x
+               )
+         LOOP
+            FOR boer
+               IN (SELECT g.prs_perslid_key
+                     FROM fac_v_webgebruiker g
+                        , fac_functie f
+                        , prs_perslid p
+                        , prs_v_afdeling d
+                    WHERE g.fac_functie_key = f.fac_functie_key
+                      AND g.ins_discipline_key = disc.res_discipline_key
+                      AND g.prs_perslid_key = p.prs_perslid_key
+                      AND d.prs_afdeling_key = p.prs_afdeling_key
+                      AND (      g.fac_gebruiker_prs_level_write = -1
+                          OR (   g.fac_gebruiker_prs_level_write = 0
+                             AND d.prs_bedrijf_key =
+                                    (SELECT aa.prs_bedrijf_key
+                                       FROM prs_v_afdeling aa
+                                      WHERE aa.prs_afdeling_key = disc.prs_afdeling_key
+                                    )
+                             )
+                          OR (   g.fac_gebruiker_prs_level_write > 0
+                             AND p.prs_afdeling_key IN
+                                    (SELECT prs_afdeling_key
+                                       FROM prs_v_afdeling_familie a
+                                      WHERE a.prs_afdeling_elder_key IN
+                                            (SELECT aa.prs_afdeling_elder_key
+                                               FROM prs_v_afdeling_familie aa
+                                              WHERE aa.prs_afdeling_key = disc.prs_afdeling_key
+                                                AND aa.niveau = g.fac_gebruiker_prs_level_write
+                                            )
+                                    )
+                             )
+                          )
+                      -- in ASP:  if (params.loc_key>0)
+                      -- Bij ruimte reservering wordt altijd een ruimte ingevuld die is gekoppeld aan alg_ruimte_key. Dus hier op ruimte niveau checken.
+                      AND (g.fac_gebruiker_alg_level_write = -1
+                           OR (g.fac_gebruiker_alg_level_write < 9
+                               AND disc.alg_ruimte_key IN
+                                        (SELECT   alg_ruimte_key
+                                           FROM   fac_v_my_rooms
+                                          WHERE   prs_perslid_key = p.prs_perslid_key
+                                            AND   niveau = fac_gebruiker_alg_level_write
+                                        )))
+                      AND fac_functie_code = lfunctiecode
+                  )
+            LOOP
+               IF (lsrtnoticode = 'RES2BO') THEN
+                  lref_key := disc.res_reservering_key;
+                  lext_key := prsvkey;
+               ELSE
+                  lref_key := prsvkey;
+                  lext_key := NULL;
+               END IF;
+               fac.putnotificationsrtprio (NULL,
+                                           boer.prs_perslid_key,
+                                           lsrtnoticode,
+                                           lref_key,
+                                           bericht,
+                                           NULL,
+                                           NULL,
+                                           NULL,
+                                           lext_key,
+                                           NULL,
+                                           NULL
+                                          );
+
+               SELECT prs_perslid_naam_friendly
+                 INTO lreceivers1
+                 FROM prs_v_perslid_fullnames
+                WHERE prs_perslid_key = boer.prs_perslid_key; -- key van bo-er
+               --
+               IF lnrreceivers = 0 THEN
+                  lreceivers := lreceivers1;
+               ELSE
+                  lreceivers := lreceivers||', '||lreceivers1;
+               END IF;
+               lnrreceivers := lnrreceivers+1;
+            END LOOP;
+         END LOOP;
+         --
+         IF lnrreceivers > 0 THEN
+            DBMS_OUTPUT.PUT_LINE(lnrreceivers);
+            ltracking :=  lcl.l ('lcl_mld_notification_sent_to');
+            --ltracking := 'Notitificatie ''{0}'' verstuurd aan {1}';
+            DBMS_OUTPUT.PUT_LINE(ltracking);
+            ltracking := REPLACE (ltracking, '{0}', bericht);
+            ltracking := REPLACE (ltracking, '{1}', lreceivers);
+            DBMS_OUTPUT.PUT_LINE(ltracking);
+            fac.trackaction ('#RES2BO', prsvkey, NULL, NULL, SUBSTR(ltracking,1,2048));  -- maxlengte van fac_srtnotificatie_oms
+         END IF;
+         --
+      EXCEPTION
+         WHEN NO_DATA_FOUND
+         THEN
+            RETURN;
+      END;
+   END;
+
 END res;
 /
 

RES/RES_TAB.SRC

@@ -10,6 +10,7 @@ CREATE_TABLE (res_disc_params,0)
   res_ins_discipline_key       NUMBER(10),
   res_disc_params_preposttime  NUMBER(5,2)      DEFAULT 0,
   res_disc_params_notify       NUMBER(2)        DEFAULT 1,
+  res_disc_params_bonotify     NUMBER(2)        DEFAULT 0,
   res_disc_params_kosten       NUMBER(3)        DEFAULT 100, /* Hoeveel van de kosten worden doorbelast in procenten */
   res_disc_params_noti_dagen   NUMBER(2),                   /* aantal dagen voor/achteraf voor reminder */
   res_disc_params_expire_dagen NUMBER(3),                   /* aantal (hele) dagen vooraf waarna niet meer mag worden gewijzigd */
@@ -17,11 +18,15 @@ CREATE_TABLE (res_disc_params,0)
   res_disc_params_cancel_dagen NUMBER(3),                   /* aantal (hele) dagen vooraf waarna niet meer kostenloos mag worden gennuleerd/verwijderd */
   res_disc_params_remoteurl    VARCHAR2(512),               /* URL van remote (FACILITOR-) service voor vergaderzalen van andere accounts  */
   res_disc_params_maxduur      NUMBER(5,2)      DEFAULT 0,
+  prs_bedrijf_key              NUMBER(10),                  /* Optioneel: de leverancier van deze catalogus */
   CONSTRAINT res_c_ins_discipline_key CHECK (res_ins_discipline_key IS NOT NULL),
   CONSTRAINT res_k_res_disc_params_key PRIMARY KEY (res_disc_params_key),
   CONSTRAINT res_r_ins_discipine_key FOREIGN KEY (res_ins_discipline_key)
     REFERENCES ins_tab_discipline (ins_discipline_key),
-  CONSTRAINT res_c_disc_preposttime CHECK (res_disc_params_preposttime IS NOT NULL)
+  CONSTRAINT res_r_prs_bedrijf_key FOREIGN KEY (prs_bedrijf_key)
+    REFERENCES prs_bedrijf (prs_bedrijf_key),
+  CONSTRAINT res_c_disc_preposttime CHECK (res_disc_params_preposttime IS NOT NULL),
+  CONSTRAINT res_c_bonotify CHECK (res_disc_params_bonotify IS NOT NULL)
 );
 
 CREATE_TABLE(res_ruimte,0)

RES/RES_TRI.SRC

@@ -4,6 +4,18 @@
  * $Id$
  */
 
+AUDIT_BEGIN(res_disc_params)
+AUDIT_VALUE(res_disc_params, res_disc_params_preposttime)
+AUDIT_VALUE(res_disc_params, res_disc_params_notify)
+AUDIT_VALUE(res_disc_params, res_disc_params_kosten)
+AUDIT_VALUE(res_disc_params, res_disc_params_noti_dagen)
+AUDIT_VALUE(res_disc_params, res_disc_params_expire_dagen)
+AUDIT_VALUE(res_disc_params, res_disc_params_expire_tijd)
+AUDIT_VALUE(res_disc_params, res_disc_params_cancel_dagen)
+AUDIT_VALUE(res_disc_params, res_disc_params_remoteurl)
+AUDIT_VALUE(res_disc_params, res_disc_params_maxduur)
+AUDIT_END()
+
 CREATE_TRIGGER(res_t_res_disc_params_b_iu)
 BEFORE INSERT OR UPDATE ON res_disc_params
 FOR EACH ROW

RES/RES_VIE.SRC

@@ -333,50 +333,6 @@ AS
       AND r.res_rsv_artikel_verwijder IS NULL
       AND rr.res_rsv_ruimte_key = r.res_rsv_ruimte_key;
 
-
-
-// NOTE! 4.40 view functional drastically changed!
-CREATE_VIEW(all_backoffice,0)
-   (     res_backoffice_key
-   ,     res_backoffice_soort
-   ,     res_backoffice_omschrijving
-   ,     res_backoffice_aanmaak
-   ,     res_backoffice_verwijder
-   ,     res_backoffice_min_level) AS
-  SELECT PRS_B.prs_bedrijf_key
-   ,     'B'
-   ,     PRS_B.prs_bedrijf_naam
-   ,     PRS_B.prs_bedrijf_aanmaak
-   ,     PRS_B.prs_bedrijf_verwijder
-   ,     1
-    FROM prs_bedrijf PRS_B
-UNION
-  SELECT PRS_A.prs_afdeling_key
-   ,     'A'
-   ,     PRS_A.prs_afdeling_naam
-   ,     PRS_A.prs_afdeling_aanmaak
-   ,     PRS_A.prs_afdeling_verwijder
-   ,     1
-    FROM prs_afdeling PRS_A;
-
-
-DEFINIEER_VIEW_AANWEZIG(All_backoffice, res_backoffice_verwijder,
-    all_v_aanwezigbackoffice,0);
-
-CREATE_VIEW(all_v_aanwezigafdeling,0) AS
-  SELECT prs_afdeling_key, prs_afdeling_naam, prs_afdeling_upper
-    FROM prs_v_aanwezigafdeling
-   WHERE prs_afdeling_key IN
-     (SELECT res_backoffice_key FROM all_v_aanwezigbackoffice
-       WHERE res_backoffice_soort = 'A');
-
-CREATE_VIEW(all_v_aanwezigbedrijf,0) AS
-  SELECT prs_bedrijf_key, prs_bedrijf_naam, prs_bedrijf_naam_upper
-    FROM prs_v_aanwezigbedrijf
-   WHERE prs_bedrijf_key IN
-     (SELECT res_backoffice_key FROM all_v_aanwezigbackoffice
-       WHERE res_backoffice_soort = 'B');
-
 DEFINIEER_VIEW_AANWEZIG(res_kenmerkwaarde, res_kenmerkwaarde_verwijder,
 res_v_aanwezigkenmerkwaarde, 0);
 
@@ -1684,6 +1640,7 @@ CREATE_VIEW(res_v_udr_reserveringincl, 1)
    voorziening_discipline_key,
    voorziening_type,
    voorziening_catalogus,
+   leverancier,
    voorziening_product_key,
    voorziening_product,
    voorziening_totaalprijs,
@@ -1859,6 +1816,10 @@ AS
           voorz.ins_discipline_key,
           voorz.vtype,
           voorz.catalogus,
+          (SELECT prs_bedrijf_naam
+             FROM res_disc_params rdp, prs_bedrijf b
+            WHERE     rdp.prs_bedrijf_key = b.prs_bedrijf_key
+                  AND rdp.res_ins_discipline_key = voorz.ins_discipline_key),
           voorz.product_key,
           voorz.product,
           voorz.totaalprijs,

_UP/CARE31to32.sql

@@ -0,0 +1,35 @@
+-- Once script tbv care.
+
+START RECAR32.sql;
+
+SET ECHO ON
+SPOOL xcare31_32.lst
+SET DEFINE OFF
+
+-- BONS#40385: Totaallijst clienten in zorg met medewerker:
+INSERT INTO fac_usrrap
+            (fac_usrrap_omschrijving,
+             fac_usrrap_view_name,
+             fac_usrrap_vraagbegindatum,
+             fac_usrrap_vraageinddatum,
+             fac_usrrap_functie,
+             fac_usrrap_info,
+             fac_functie_key,
+             fac_usrrap_autorefresh
+            )
+     SELECT  'Totaal lijst cliënten in zorg MDW',
+             'care_v_rap_tot_clientzorg_mdw',
+             0,
+             0,
+             1,
+             'Totaal lijst cliënten in zorg met gekoppelde medewerker',
+             fac_functie_key,
+             0
+    FROM fac_functie WHERE fac_functie_code = 'WEB_MLDBAC';
+
+BEGIN adm.systrackscriptId('$Id$'); END;
+/
+
+COMMIT;
+
+SPOOL OFF

_UP/DB30to31.src

@@ -7,15 +7,855 @@
 
 COMMIT;
 
+/////////////////////////////////////////////////////////////////////////////////////////// FSN#39780
+INSERT INTO fac_notificatie_job (fac_notificatie_job_view, fac_notificatie_job_oms, fac_notificatie_job_mode, fac_notificatie_job_interval, fac_notificatie_job_nextrun, fac_notificatie_job_flags)
+     VALUES ('FAC_V_NOTI_LICENTIE', 'Notificatie bij afwijkende licenties.', 2, 2160, (select add_months (trunc(SYSDATE, 'Q') + 0, 4) + 3/4  from dual), 1);
+
+DEF_FAC_SRTNOT('ADMLIC', 0, 'lcl_noti_ADMLIC', '', '0', null, 10);
+
 /////////////////////////////////////////////////////////////////////////////////////////// FSN#38888
 
-DROP VIEW mld_v_stdmelding_kenmerk;
+CREATE UNIQUE INDEX fac_i_fac_api1 ON fac_api (fac_api_name);
+
+CREATE UNIQUE INDEX fac_i_fac_session2 ON fac_session(fac_session_sessionid_hash);
+
+/////////////////////////////////////////////////////////////////////////////////////////// FSN#39394
+
+create index fac_i_fac_result1 on fac_result(fac_result_sessionid);
+
+DROP INDEX fac_i_import_appkey1;
+CREATE INDEX fac_i_import_appkey1 ON fac_import(fac_import_app_key, fac_import_key);
+
+ALTER TABLE fac_import_app
+    ADD fac_import_app_loglevel
+    NUMBER(1) DEFAULT 0 NOT NULL;
+
+/////////////////////////////////////////////////////////////////////////////////////////// AADS#38285
+/////////////////////////////////////////////////////////////////////////////////////////// KFNS#38873
+
+ALTER TABLE prs_bedrijfadres
+  ADD alg_district_key NUMBER(10)
+    DEFAULT NULL
+    CONSTRAINT prs_r_alg_distr_key
+    REFERENCES alg_district(alg_district_key) ON DELETE CASCADE;
+
+ALTER TABLE prs_bedrijfadres
+  ADD alg_locatie_key NUMBER(10)
+    DEFAULT NULL
+    CONSTRAINT prs_r_alg_loc_key
+    REFERENCES alg_locatie(alg_locatie_key) ON DELETE CASCADE;
+
+DROP INDEX prs_i_prs_bedrijfadres2;
+CREATE UNIQUE INDEX prs_i_prs_bedrijfadres2 on prs_bedrijfadres(prs_bedrijf_key, prs_bedrijfadres_type, mld_typeopdr_key, alg_district_key, alg_locatie_key);
+
+/////////////////////////////////////////////////////////////////////////////////////////// AAIT#33956
+CREATE SEQUENCE fac_s_fac_audit_key MINVALUE 1;
+
+CREATE_TABLE(fac_audit, 0)
+(
+   fac_audit_key
+       NUMBER(10)
+       CONSTRAINT fac_k_fac_audit_key PRIMARY KEY,
+   fac_audit_tabelnaam
+       VARCHAR2(30)
+       CONSTRAINT fac_k_fac_audit_tabelnaam CHECK(fac_audit_tabelnaam IS NOT NULL),
+   fac_audit_tabelkey
+       NUMBER(10),
+   fac_audit_veldnaam
+       VARCHAR2(30),
+   fac_audit_actie
+       VARCHAR2(1)
+       CONSTRAINT fac_k_fac_audit_actie CHECK(fac_audit_actie IN ('C', 'D', 'U')),
+   fac_audit_waarde_oud
+       VARCHAR2(4000),
+   fac_audit_waarde_nieuw
+       VARCHAR2(4000),
+   prs_perslid_key
+       NUMBER(10)
+       CONSTRAINT fac_r_prs_perslid_key9 REFERENCES prs_perslid(prs_perslid_key) ON DELETE SET NULL,
+   fac_audit_opmerking
+       VARCHAR2(320),
+   fac_audit_datum
+       DATE
+       DEFAULT SYSDATE
+       CONSTRAINT fac_c_fac_audit_datum CHECK(fac_audit_datum IS NOT NULL)
+);
+CREATE INDEX fac_i_audit_perslidkey1 ON fac_audit(prs_perslid_key);
+CREATE INDEX fac_i_audit_tabel1 ON fac_audit(fac_audit_tabelnaam, fac_audit_tabelkey);
+
+ALTER TABLE fac_profielwaarde ADD fac_profielwaarde_aanmaak DATE DEFAULT SYSDATE;
+ALTER TABLE fac_profiel ADD fac_profiel_aanmaak DATE DEFAULT SYSDATE;
+ALTER TABLE fac_gebruikersgroep ADD fac_gebruikersgroep_aanmaak DATE DEFAULT SYSDATE;
+
+-- FSN#40456 Ongeldige rechten verwijderen
+DELETE
+  FROM fac_groeprechten fr
+ WHERE (fac_gebruiker_prs_level_read = 9 OR fac_gebruiker_alg_level_read = 9);
+
+ALTER TABLE fac_groeprechten ADD fac_groeprechten_aanmaak DATE DEFAULT SYSDATE;
+ALTER TABLE prs_kostenplaatsgrp ADD prs_kostenplaatsgrp_aanmaak DATE DEFAULT SYSDATE;
+ALTER TABLE prs_kostenplaatsdisc ADD prs_kostenplaatsdisc_aanmaak DATE DEFAULT SYSDATE;
+ALTER TABLE mld_stdmelding ADD mld_stdmelding_aanmaak DATE DEFAULT SYSDATE;
+ALTER TABLE prs_perslidkostenplaats ADD prs_perslidkostenplaats_aanmk DATE DEFAULT SYSDATE;
+ALTER TABLE prs_kostencombinatie ADD prs_kostencombinatie_aanmaak DATE DEFAULT SYSDATE;
+
+/////////////////////////////////////////////////////////////////////////////////////////// FSN#32707
+ALTER TABLE fac_imp_mld
+  ADD ( mld_stdmelding_hint         VARCHAR2(1000)
+      , mld_stdmelding_kopieerbaar  NUMBER(1)
+      , mld_stdmelding_afmeldtext   NUMBER(1)
+      , mld_stdmelding_doublecheck  NUMBER(4)
+      , mld_stdmelding_slabewaken   NUMBER(1)
+      );
+
+/////////////////////////////////////////////////////////////////////////////////////////// AAVG#37310
+ALTER TABLE fac_imp_ext_bedrijf
+  ADD ( prs_relatietype  VARCHAR2(256)
+      );
+
+
+/////////////////////////////////////////////////////////////////////////////////////////// MDUX#38433
+ALTER TABLE bes_disc_params ADD
+      bes_disc_params_fiatflow
+      NUMBER(1)
+      DEFAULT 0
+      CONSTRAINT bes_c_disc_params_fiatflow CHECK(bes_disc_params_fiatflow IN (0,1));
+
+
+/////////////////////////////////////////////////////////////////////////////////////////// GRKL#38593
+ALTER TABLE fac_imp_onrgoed2
+  ADD res_discipline_expire_dagen NUMBER(3);
+
+/////////////////////////////////////////////////////////////////////////////////////////// FSN#38992
+ALTER TABLE adm_tracking ADD (adm_tracking_key NUMBER(10));
+CREATE SEQUENCE adm_s_adm_tracking_key START WITH 1;
+UPDATE adm_tracking SET adm_tracking_key = adm_s_adm_tracking_key.NEXTVAL;
+ALTER TABLE adm_tracking ADD CONSTRAINT adm_k_adm_tracking_key PRIMARY KEY (adm_tracking_key);
+
+// Normaal hoeven trigger niet in de upgrade maar adm.systrackscriptId wordt nogal vaak aangeroepen
+CREATE_TRIGGER(adm_t_adm_tracking_B_I)
+BEFORE INSERT ON adm_tracking
+FOR EACH ROW
+BEGIN
+    UPDATE_PRIMARY_KEY(adm_tracking_key, adm_s_adm_tracking_key);
+END;
+/
+ALTER TABLE fac_bookmark DROP PRIMARY KEY DROP INDEX;
+ALTER TABLE fac_bookmark ADD (fac_bookmark_key NUMBER(10));
+CREATE SEQUENCE fac_s_fac_bookmark_key START WITH 1;
+UPDATE fac_bookmark SET fac_bookmark_key = fac_s_fac_bookmark_key.NEXTVAL;
+ALTER TABLE fac_bookmark ADD CONSTRAINT fac_k_fac_bookmark_key PRIMARY KEY (fac_bookmark_key);
+CREATE UNIQUE INDEX fac_i_fac_bookmark1 ON fac_bookmark(fac_bookmark_id);
+
+ALTER TABLE fac_qvw_ticket ADD (fac_qvw_ticket_key NUMBER(10));
+CREATE SEQUENCE fac_s_fac_qvw_ticket_key START WITH 1;
+UPDATE fac_qvw_ticket SET fac_qvw_ticket_key = fac_s_fac_qvw_ticket_key.NEXTVAL;
+ALTER TABLE fac_qvw_ticket ADD CONSTRAINT fac_k_fac_qvw_ticket_key PRIMARY KEY (fac_qvw_ticket_key);
+
+ALTER TABLE fac_session ADD (fac_session_key NUMBER(10));
+CREATE SEQUENCE fac_s_fac_session_key START WITH 1;
+UPDATE fac_session SET fac_session_key = fac_s_fac_session_key.NEXTVAL;
+ALTER TABLE fac_session ADD CONSTRAINT fac_k_fac_session_key PRIMARY KEY (fac_session_key);
+
+ALTER TABLE fac_sequence DROP PRIMARY KEY DROP INDEX;
+ALTER TABLE fac_sequence MODIFY (fac_sequence_name VARCHAR2(50) NOT NULL);
+ALTER TABLE fac_sequence ADD (fac_sequence_key NUMBER(10));
+CREATE SEQUENCE fac_s_fac_sequence_key START WITH 1;
+UPDATE fac_sequence SET fac_sequence_key = fac_s_fac_sequence_key.NEXTVAL;
+ALTER TABLE fac_sequence ADD CONSTRAINT fac_k_fac_sequence_key PRIMARY KEY (fac_sequence_key);
+CREATE UNIQUE INDEX fac_i_fac_sequence1 ON fac_sequence(fac_sequence_name);
+
+/////////////////////////////////////////////////////////////////////////////////////////// MARX#39100
+CREATE_TABLE(prs_bedrijf_bedrijf,0)
+(
+   prs_bedrijf_bedrijf_key
+        NUMBER (10) PRIMARY KEY NOT NULL,
+   prs_bedrijf_key1
+        NUMBER (10)
+        CONSTRAINT prs_r_prs_bedrijf_bedrijf1 REFERENCES prs_bedrijf (prs_bedrijf_key) NOT NULL,
+   prs_bedrijf_externid1
+        VARCHAR2(60),     -- optional remote key of 1
+   prs_bedrijf_key2
+        NUMBER (10)
+        CONSTRAINT prs_r_prs_bedrijf_bedrijf2 REFERENCES prs_bedrijf (prs_bedrijf_key) NOT NULL,
+   prs_bedrijf_externid2
+        VARCHAR2(60),     -- optional remote key of 2
+   prs_bedrijf_bedrijf_startdatum
+        DATE
+        DEFAULT SYSDATE,
+   prs_bedrijf_bedrijf_einddatum
+        DATE,
+   prs_bedrijf_bedrijf_status
+        NUMBER(1)         -- voor mld_opdr_teverzenden: 0=niet te verzenden 1=te verzenden
+        DEFAULT(0)
+        NOT NULL,
+   prs_bedrijf_bedrijf_charged
+        NUMBER(1)         -- 0=niemand, 1=opdrachtnemer, 2=opdrachtgever
+        DEFAULT(0)
+        NOT NULL,
+   prs_bedrijf_bedrijf_chargemode
+        NUMBER(4),        -- een codering voor de "premiummode" waaruit afgeleid kan worden hoe de kosten worden berekend (per opdracht, per bestelling, enz), enigszins futureproof
+   prs_bedrijf_bedrijf_fee1
+        NUMBER(6,2),      -- bedrag in euro's tbv berekening icm chargemode
+   prs_bedrijf_bedrijf_fee2
+        NUMBER(6,2),      -- bedrag in euro's tbv berekening icm chargemode
+   prs_bedrijf_bedrijf_fee3
+        NUMBER(6,2)       -- bedrag in euro's tbv berekening icm chargemode
+);
+CREATE SEQUENCE prs_s_prs_bedrijfbedrijf_key   MINVALUE 1;
+CREATE_TRIGGER(prs_t_prs_bedrijfbedrijf_B_IU)
+BEFORE INSERT OR UPDATE ON prs_bedrijf_bedrijf
+FOR EACH ROW
+BEGIN
+    UPDATE_PRIMARY_KEY(prs_bedrijf_bedrijf_key, prs_s_prs_bedrijfbedrijf_key);
+END;
+/
+CREATE UNIQUE INDEX prs_i_prs_bedrijfbedrijf1 ON prs_bedrijf_bedrijf(prs_bedrijf_key1, prs_bedrijf_key2);
+
+DEF_MENUENTRY(2, 99140, 'lcl_menu_prs_bedrijf_bedrijf' , '', 'FAC', 'appl/mgt/prs_bedrijf_bedrijf.asp', 0, 0, 'WEB_PRSSYS');
+
+
+/////////////////////////////////////////////////////////////////////////////////////////// FSN#39054
+CREATE_TABLE(bgt_disc_params,0)
+(
+    bgt_disc_params_key
+        NUMBER (10) PRIMARY KEY NOT NULL,
+    bgt_ins_discipline_key
+        NUMBER (10)
+        CONSTRAINT bgt_r_ins_discipine_key REFERENCES ins_tab_discipline (ins_discipline_key),
+    bgt_disc_params_code  -- projectcode
+        VARCHAR2 (20 BYTE),
+    bgt_disc_params_opdrachtgever
+        VARCHAR2 (200 BYTE),
+    bgt_disc_params_startdatum
+        DATE
+);
+
+CREATE_TABLE(bgt_project, 0)
+(
+    bgt_project_key
+        NUMBER (10) PRIMARY KEY NOT NULL,
+    ins_discipline_key
+        NUMBER (10)
+        CONSTRAINT bgt_r_ins_discipline_key1 REFERENCES ins_tab_discipline (ins_discipline_key),
+    bgt_project_code
+        VARCHAR2 (20 BYTE),
+    bgt_project_omschrijving
+        VARCHAR2 (60 BYTE),
+    bgt_project_volgnr
+        NUMBER (3),
+    bgt_project_prijspeildatum
+        DATE,
+    bgt_project_info
+        VARCHAR2 (4000 BYTE),
+    bgt_project_notes
+        VARCHAR2 (4000 BYTE),
+    bgt_project_aanmaak
+        DATE DEFAULT SYSDATE,
+    bgt_project_verwijder
+        DATE
+);
+
+CREATE_TABLE(bgt_kostenrubriek,0)
+(
+    bgt_kostenrubriek_key
+        NUMBER (10) PRIMARY KEY NOT NULL,
+    bgt_project_key
+        NUMBER (10)
+        CONSTRAINT bgt_c_bgt_kostenrubriek1 NOT NULL
+        CONSTRAINT bgt_r_bgt_project_key1 REFERENCES bgt_project (bgt_project_key),
+    bgt_kostenrubriek_code
+        VARCHAR2 (20 BYTE),
+    bgt_kostenrubriek_oms
+        VARCHAR2 (60 BYTE) NOT NULL
+);
+
+ALTER TABLE prs_kostensoortgrp ADD bgt_kostenrubriek_key CONSTRAINT prs_r_bgt_kostenrubriek_key1 REFERENCES bgt_kostenrubriek (bgt_kostenrubriek_key);
+
+DROP INDEX prs_i_prs_kostensoort1;
+CREATE UNIQUE INDEX prs_i_prs_kostensoort1 ON prs_kostensoort(prs_kostensoortgrp_key, prs_kostensoort_upper);
+
+ALTER TABLE fin_factuurregel MODIFY ( fin_factuurregel_totaal NUMBER(12,2)
+                                    , fin_factuurregel_btw NUMBER(14,4));
+
+ALTER TABLE fin_factuur MODIFY ( fin_factuur_totaal NUMBER(12,2)
+                               , fin_factuur_totaal_btw NUMBER(14,4)
+                               , fin_factuur_gbedrag NUMBER(14,2) );
+
+CREATE_TABLE(bgt_budget,0)
+(
+    bgt_budget_key
+        NUMBER (10) PRIMARY KEY NOT NULL,
+    ins_discipline_key
+        NUMBER (10)
+        CONSTRAINT prs_r_ins_discipline_key1 REFERENCES ins_tab_discipline (ins_discipline_key),
+    bgt_project_key
+        NUMBER (10)
+        CONSTRAINT prs_r_bgt_project_key1 REFERENCES bgt_project (bgt_project_key),
+    bgt_kostenrubriek_key
+        NUMBER (10)
+        CONSTRAINT prs_r_bgt_kostenrubriek_key2 REFERENCES bgt_kostenrubriek (bgt_kostenrubriek_key),
+    prs_kostensoortgrp_key
+        NUMBER (10)
+        CONSTRAINT prs_r_kostensoortgrp_key2 REFERENCES prs_kostensoortgrp (prs_kostensoortgrp_key),
+    prs_kostensoort_key
+        NUMBER (10)
+        CONSTRAINT prs_r_kostensoort_key2 REFERENCES prs_kostensoort (prs_kostensoort_key),
+    prs_kostenplaatsgrp_key
+        NUMBER (10)
+        CONSTRAINT prs_r_kostenplaatsgrp_key3 REFERENCES prs_kostenplaatsgrp (prs_kostenplaatsgrp_key),
+    prs_kostenplaats_key
+        NUMBER (10)
+        CONSTRAINT prs_r_kostenplaats_key5 REFERENCES prs_kostenplaats (prs_kostenplaats_key),
+    bgt_budget_bedrag
+        NUMBER (12,2),
+    bgt_budget_btwbedrag
+        NUMBER (12,2),
+    bgt_budget_isreserve
+        NUMBER(1)
+        DEFAULT (0)
+        NOT NULL
+        CONSTRAINT bgt_c_bgt_budget_isreserve CHECK(bgt_budget_isreserve IN (0,1)),
+    bgt_budget_begin
+        DATE,
+    bgt_budget_eind
+        DATE,
+    bgt_budget_aanmaak
+        DATE DEFAULT SYSDATE,
+    bgt_budget_vervaldatum
+        DATE,
+    CONSTRAINT bgt_c_bgt_budget1 CHECK (  (bgt_budget_isreserve = 0 AND (   bgt_kostenrubriek_key IS NOT NULL
+                                                                        OR (bgt_kostenrubriek_key IS NOT NULL AND prs_kostensoortgrp_key IS NOT NULL)
+                                                                        OR (bgt_kostenrubriek_key IS NOT NULL AND prs_kostensoortgrp_key IS NOT NULL AND prs_kostensoort_key IS NOT NULL)
+                                                                        OR prs_kostenplaatsgrp_key IS NOT NULL
+                                                                        OR (prs_kostenplaatsgrp_key IS NOT NULL AND prs_kostenplaats_key IS NOT NULL)
+                                                                        )
+                                          )
+                                       OR (bgt_budget_isreserve = 1 AND prs_kostensoortgrp_key IS NULL AND prs_kostenplaats_key IS NULL)
+                                       )
+);
+
+CREATE_TABLE(bgt_budgetmutatie, 1)
+(
+   bgt_budgetmutatie_key
+        NUMBER (10) PRIMARY KEY,
+   bgt_budgetmutatie_datum
+        DATE NOT NULL,
+   bgt_budgetmutatie_omschrijving
+        VARCHAR2 (100) NOT NULL,
+   prs_perslid_key
+        NUMBER (10)
+        NOT NULL
+        CONSTRAINT bgt_r_prs_perslid_key2 REFERENCES prs_perslid (prs_perslid_key),
+   bgt_budget_key_van
+        NUMBER (10)
+        CONSTRAINT bgt_r_bgt_budget1 REFERENCES bgt_budget (bgt_budget_key),
+   bgt_budget_bedrag_van
+        NUMBER (12, 2),
+   bgt_budget_btwbedrag_van
+        NUMBER (12, 2),
+   bgt_budget_key_naar
+        NUMBER (10)
+        CONSTRAINT bgt_r_bgt_budget2 REFERENCES bgt_budget (bgt_budget_key),
+   bgt_budget_bedrag_naar
+        NUMBER (12, 2),
+   bgt_budget_btwbedrag_naar
+        NUMBER (12, 2),
+   CONSTRAINT bgt_c_bgt_budget_key1 CHECK(bgt_budget_key_van IS NOT NULL OR bgt_budget_key_naar IS NOT NULL)
+);
+
+CREATE SEQUENCE bgt_s_bgt_disc_params_key   MINVALUE 1;
+CREATE SEQUENCE bgt_s_bgt_project_key       MINVALUE 1;
+CREATE SEQUENCE bgt_s_bgt_kostenrubriek_key MINVALUE 1;
+CREATE SEQUENCE bgt_s_bgt_budget_key        MINVALUE 1;
+CREATE SEQUENCE bgt_s_bgt_budgetmutatie_key MINVALUE 1;
+
+ALTER TRIGGER mld_t_mld_opdr_B_IU DISABLE;
+ALTER TABLE mld_opdr
+  ADD ( prs_kostensoort_key
+           NUMBER(10)
+           CONSTRAINT mld_r_prs_kostensoort_key1 REFERENCES prs_kostensoort (prs_kostensoort_key),
+        mld_opdr_kosten_btw
+           NUMBER(12,2)
+           DEFAULT 0,
+        mld_opdr_meerwerk
+           NUMBER(1)
+           DEFAULT (0)
+           CONSTRAINT mld_c_mld_opdr_meerwerk CHECK(mld_opdr_meerwerk IN (0, 1))
+      );
+ALTER TRIGGER mld_t_mld_opdr_B_IU ENABLE;
+
+-- deze relatie is nu verplicht. Maak voor de ontbrekende verwijzingen een default aan.
+ALTER TABLE prs_kostensoort DROP CONSTRAINT prs_r_prs_kostensoortgrp_key;
+ALTER TABLE prs_kostensoort MODIFY (prs_kostensoortgrp_key CONSTRAINT prs_r_prs_kostensoortgrp_key REFERENCES prs_kostensoortgrp(prs_kostensoortgrp_key));
+DECLARE
+   gcnt   NUMBER;
+   gkey   NUMBER (10);
+BEGIN
+   SELECT COUNT ( * )
+     INTO gcnt
+     FROM prs_kostensoort
+    WHERE prs_kostensoortgrp_key IS NULL;
+
+   IF gcnt > 0
+   THEN
+      INSERT INTO prs_kostensoortgrp (prs_kostensoortgrp_oms)
+          VALUES ('Default')
+       RETURNING prs_kostensoortgrp_key
+            INTO gkey;
+
+      UPDATE prs_kostensoort
+         SET prs_kostensoortgrp_key = gkey
+       WHERE prs_kostensoortgrp_key IS NULL;
+   END IF;
+END;
+/
+ALTER TABLE prs_kostensoort MODIFY prs_kostensoortgrp_key NOT NULL;
+ALTER TABLE prs_kostensoort ADD fin_btwtabelwaarde_key NUMBER(10) CONSTRAINT prs_r_fin_btwtabelwaarde_key REFERENCES fin_btwtabelwaarde (fin_btwtabelwaarde_key);
+
+ALTER TABLE prs_kostenplaats DROP CONSTRAINT prs_r_prs_kostenplaatsgrp_key;
+ALTER TABLE prs_kostenplaats MODIFY (prs_kostenplaatsgrp_key CONSTRAINT prs_r_prs_kostenplaatsgrp_key REFERENCES prs_kostenplaatsgrp(prs_kostenplaatsgrp_key));
+// DB31d: Removed code, toch prs_kostenplaatsgrp.prs_kostenplaatsgrp_key weer NULL toestaan
+
+ALTER TABLE prs_kostenplaatsgrp ADD bgt_project_key NUMBER(10) CONSTRAINT prs_r_bgt_project_key2 REFERENCES bgt_project(bgt_project_key);
+
+ALTER TABLE mld_opdr DROP CONSTRAINT mld_r_mld_melding_key3;
+ALTER TABLE mld_opdr ADD
+(
+    CONSTRAINT mld_r_mld_melding_key3 CHECK(mld_melding_key IS NOT NULL OR cnt_contract_key IS NOT NULL OR prs_kostensoort_key IS NOT NULL)
+);
+
+_FAC_MODULE('BGT','lcl_module_BGT')
+DEF_FAC_FUNCTIE3('WEB_BGTMGT', 'BGT',  3, 1,    1);
+DEF_FAC_FUNCTIE3('WEB_BGTMAN', 'BGT',  3, 1,    1);
+DEF_FAC_FUNCTIE3('WEB_BGTUSE', 'BGT',  3, 1,    1);
+DEF_FAC_FUNCTIE3('WEB_BGTORD', 'BGT',  3, 1,    1);
+
+MENU_INSKOP_AFTER('lcl_bgt', 'lcl_menu_fac_qlikview_res', 1, 4) ;
+DEF_MENUITEM(1, 'lcl_menu_bgt_disciplines_1'   , '', 'BGT', 'appl/bgt/bgt_search.asp?mode=wrap&id={1}', 0, 1, 'WEB_BGTMAN', 'R', '1', '');
+//DEF_MENUITEM(1, 'lcl_menu_bgt_budget'           , '', 'BGT', 'appl/bgt/bgt_budget.asp', 0, 0, 'WEB_BGTMAN', 'R', '1', '');  // TODO ws weg
+DEF_MENUITEM(1, 'lcl_menu_bgt_disciplines'     , '', 'BGT', 'appl/bgt/bgt_discipline.asp', 0, 0, 'WEB_BGTMGT', 'W', '1', '');
+
+MENU_INS_AFTERKOP('lcl_menu_bgt_disciplines_1', 'lcl_bgt', 2) ;
+MENU_INS_AFTER( 'lcl_menu_bgt_disciplines', 'lcl_menu_bgt_disciplines_1', 2);
+
+
+/////////////////////////////////////////////////////////////////////////////////////////// HCAS#38260
+
+ALTER TABLE ins_deelsrtcontrole MODIFY (ins_deelsrtcontrole_opmerking VARCHAR(4000));
+
+/////////////////////////////////////////////////////////////////////////////////////////// GOUD#37603
+ALTER TABLE res_disc_params ADD res_disc_params_bonotify NUMBER(2) DEFAULT 0;
+ALTER TABLE res_disc_params ADD CONSTRAINT res_c_bonotify CHECK (res_disc_params_bonotify IS NOT NULL);
+DEF_FAC_SRTNOT('RES2BO', 0, 'lcl_noti_RES2BO', 'res/res_reservering.asp?rsv_ruimte_key=', '0', 'reservering', 10);
+
+/////////////////////////////////////////////////////////////////////////////////////////// KFNS#38265
+
+UPDATE fac_setting
+SET fac_setting_name = 'self_register_groep_keys'
+WHERE fac_setting_name = 'self_register_groep_key';
+
+/////////////////////////////////////////////////////////////////////////////////////////// UWVA#38459
+CREATE VIEW bez_v_udr_reserveringbezoeker AS SELECT '' dummy FROM DUAL;
+
+INSERT INTO fac_usrrap (fac_usrrap_omschrijving, fac_usrrap_view_name,fac_usrrap_info, fac_functie_key, fac_usrrap_functie)
+ SELECT 'UDR: Bezoekers bij reserveringen','BEZ_V_UDR_RESERVERINGBEZOEKER','Basisrapport voor bezoekers met reserveringsgegevens', fac_functie_key, 32
+   FROM fac_functie WHERE fac_functie_code='WEB_UDRMAN'
+    AND NOT EXISTS (SELECT '' FROM fac_usrrap WHERE UPPER(fac_usrrap_view_name)='BEZ_V_UDR_RESERVERINGBEZOEKER');
+
+/////////////////////////////////////////////////////////////////////////////////////////// FSN#39312
+UPDATE fac_menuitems
+   SET fac_menuitems_url = REPLACE(fac_menuitems_url, 'alg_kenmerk_niveau', 'level')
+ WHERE fac_menuitems_url LIKE '%alg_kenmerk.asp%';
+UPDATE fac_menuitems
+   SET fac_menuitems_url = REPLACE(fac_menuitems_url, 'prs_kenmerk_niveau', 'level')
+ WHERE fac_menuitems_url LIKE '%prs_kenmerk.asp%';
+UPDATE fac_menuitems
+   SET fac_menuitems_url = REPLACE(fac_menuitems_url, 'ALG_KENMERK_NIVEAU', 'level')
+ WHERE fac_menuitems_url LIKE '%alg_kenmerk.asp%';
+UPDATE fac_menuitems
+   SET fac_menuitems_url = REPLACE(fac_menuitems_url, 'PRS_KENMERK_NIVEAU', 'level')
+ WHERE fac_menuitems_url LIKE '%prs_kenmerk.asp%';
+
+/////////////////////////////////////////////////////////////////////////////////////////// HSLE#36221
+UPDATE fac_menuitems
+   SET fac_menuitems_url = REPLACE(fac_menuitems_url, 'fac_usergraph', 'fac_usrgraph')
+ WHERE fac_menuitems_url LIKE '%fac_usergraph%';
+UPDATE fac_menuitems
+   SET fac_menuitems_url = REPLACE(fac_menuitems_url, 'fac_notificatiejob', 'fac_notificatie_job')
+ WHERE fac_menuitems_url LIKE '%fac_notificatiejob%';
+UPDATE fac_menuitems
+   SET fac_menuitems_url = REPLACE(fac_menuitems_url, 'mld_stdmelding_groep', 'mld_stdmeldinggroep')
+ WHERE fac_menuitems_url LIKE '%mld_stdmelding_groep%';
+
+/////////////////////////////////////////////////////////////////////////////////////////// ASTE#37915
+ALTER TABLE prs_perslid ADD prs_perslid_timezone
+    VARCHAR2(40);
+
+/////////////////////////////////////////////////////////////////////////////////////////// MARX#39774
+ALTER TABLE fin_factuurregel MODIFY (fin_factuurregel_omschrijving VARCHAR2(250));
+ALTER TABLE fac_imp_factuur MODIFY (omschrijving VARCHAR2(250));
+
+/////////////////////////////////////////////////////////////////////////////////////////// DJIN#36213
+
+CREATE TABLE aut_idp
+(
+    aut_idp_key
+        NUMBER(10)
+        CONSTRAINT aut_k_idp_key PRIMARY KEY,
+    aut_idp_code            -- Voor &sso=<code>
+        VARCHAR2(30),
+    aut_idp_type            -- 1=Internal (login.asp, future use), 2=UID_DEC (deprecated),
+        NUMBER(3),          -- 3=GUID-encrypted (deprecated), 4=JWT, 5=SAML (future use)
+    aut_idp_algorithm       -- HS256 is HMAC-SHA256
+        VARCHAR2(30),
+    aut_idp_omschrijving
+        VARCHAR2(30),
+    aut_idp_opmerking
+        VARCHAR2(320),
+    aut_idp_secret
+        VARCHAR2(128),
+    aut_idp_audience
+        VARCHAR2(128),
+    aut_idp_issuer
+        VARCHAR2(128),
+    aut_idp_remote_loginurl
+        VARCHAR2(128),
+    aut_idp_remote_logouturl
+        VARCHAR2(128),
+    aut_idp_saml_metaurl
+        VARCHAR2(128),
+    aut_idp_clockskew
+        NUMBER(10),
+    aut_idp_duration
+        NUMBER(10),
+    aut_idp_autocreate
+        NUMBER(1)
+        DEFAULT 0 -- +1: create; +2: update
+        NOT NULL,
+-- Note: these column are defined in PRS_TAB.SRC
+--    prs_afdeling_key         NUMBER(10)
+--    prs_bedrijf_key          NUMBER(10)
+    fac_functie_key
+        NUMBER(10)
+        CONSTRAINT aut_r_idp_functie REFERENCES fac_functie(fac_functie_key),
+    aut_idp_internal        -- can be used for FACFAC
+        NUMBER(1)
+        DEFAULT 0 NOT NULL,
+    aut_idp_ipfilter
+        VARCHAR2(320),
+    aut_idp_ipauto
+        NUMBER(1)
+        DEFAULT 0 NOT NULL,
+    aut_idp_loglevel
+      NUMBER(1) DEFAULT 0 NOT NULL,
+    aut_idp_aanmaak
+        DATE
+        DEFAULT SYSDATE
+);
+
+CREATE TABLE aut_idp_map
+(
+    aut_idp_map_key
+        NUMBER(10)
+        CONSTRAINT aut_k_idp_map_key PRIMARY KEY,
+    aut_idp_key
+        NUMBER(10)
+        CONSTRAINT aut_r_idp_map_id REFERENCES aut_idp(aut_idp_key) ON DELETE CASCADE,
+    aut_idp_map_from --  as sent in JWT
+        VARCHAR(100)
+        NOT NULL,
+    aut_idp_map_to -- FACILITOR column of 1000+kenmerk_key
+        NUMBER(10)
+        NOT NULL,
+    aut_idp_map_identify
+        NUMBER(1)
+        DEFAULT 0
+        NOT NULL,
+    aut_idp_map_default
+        VARCHAR(256),
+    aut_idp_map_aanmaak
+        DATE
+        DEFAULT SYSDATE
+);
+ALTER TABLE aut_idp
+ADD
+(
+    prs_bedrijf_key
+        NUMBER(10)
+        CONSTRAINT aut_r_idp_prs_bedrijf REFERENCES prs_bedrijf(prs_bedrijf_key) ON DELETE CASCADE
+);
+ALTER TABLE aut_idp ADD
+(
+    prs_afdeling_key
+       NUMBER(10)
+       CONSTRAINT aut_r_idp_prs_afdeling REFERENCES prs_afdeling(prs_afdeling_key) ON DELETE CASCADE
+);
+
+CREATE SEQUENCE aut_s_aut_idp_key               MINVALUE 1;
+CREATE SEQUENCE aut_s_aut_idp_map_key           MINVALUE 1;
+
+CREATE UNIQUE INDEX aut_i_idp_code ON aut_idp(aut_idp_code);
+CREATE UNIQUE INDEX aut_i_idp2 ON aut_idp(aut_idp_issuer, aut_idp_audience, aut_idp_type);
+
+-- Alleen nodig voor het conversiestatement
+CREATE OR REPLACE TRIGGER aut_t_aut_idp_B_IU
+BEFORE INSERT OR UPDATE ON aut_idp
+FOR EACH ROW
+BEGIN
+   UPDATE_PRIMARY_KEY(aut_idp_key, aut_s_aut_idp_key);
+   :new.aut_idp_code := UPPER(:new.aut_idp_code);
+END;
+/
+
+INSERT INTO aut_idp (
+    aut_idp_code,
+    aut_idp_type,
+    aut_idp_algorithm,
+    aut_idp_omschrijving,
+    aut_idp_opmerking,
+    aut_idp_secret,
+    aut_idp_audience,
+    aut_idp_issuer,
+    aut_idp_remote_loginurl,
+    aut_idp_remote_logouturl,
+    aut_idp_clockskew,
+    aut_idp_duration,
+    aut_idp_internal,
+    aut_idp_ipfilter,
+    aut_idp_aanmaak)
+SELECT
+    fac_idp_code,
+    fac_idp_type,
+    fac_idp_algorithm,
+    fac_idp_omschrijving,
+    fac_idp_opmerking,
+    fac_idp_secret,
+    fac_idp_audience,
+    COALESCE (fac_idp_issuer, 'KEY_' || fac_idp_key),
+    fac_idp_remote_loginurl,
+    fac_idp_remote_logouturl,
+    fac_idp_clockskew,
+    fac_idp_duration,
+    fac_idp_internal,
+    fac_idp_ipfilter,
+    fac_idp_aanmaak
+FROM fac_idp;
+
+
+UPDATE fac_menu
+   SET fac_menu_alturl = 'appl/mgt/aut_idp.asp', fac_menu_altlabel = 'lcl_menu_aut_idp'
+ WHERE fac_menu_alturl = 'appl/mgt/fac_idp.asp';
+
+/////////////////////////////////////////////////////////////////////////////////////////// FSN#39750
+-- Clients (zoals al dan niet native App's)
+CREATE TABLE aut_client
+(
+    aut_client_key
+        NUMBER(10)
+        CONSTRAINT aut_k_aut_client_key PRIMARY KEY,
+    aut_client_id
+        VARCHAR2(64),
+    aut_client_type            -- 1=Internal (login.asp, future use), 2=UID_DEC (deprecated),
+        NUMBER(3),             -- 3=GUID-encrypted (deprecated), 4=JWT, 5=SAML (future use)
+    aut_client_omschrijving
+        VARCHAR2(30),
+    aut_client_opmerking
+        VARCHAR2(320),
+    aut_client_secret
+        VARCHAR2(128),
+    aut_client_customuri -- future use
+        VARCHAR2(128),
+    aut_client_aanmaak
+        DATE
+        DEFAULT SYSDATE
+);
+
+-- Koppeling client en (toestemming gegeven door) perslid
+CREATE TABLE aut_client_perslid
+(
+    aut_client_perslid_key
+        NUMBER(10)
+        CONSTRAINT aut_k_client_perslid PRIMARY KEY,
+    aut_client_key
+        NUMBER(10)
+        CONSTRAINT aut_r_aut_client_id REFERENCES aut_client(aut_client_key) ON DELETE CASCADE,
+    aut_client_perslid_device_id
+        VARCHAR(320),
+    aut_client_perslid_scope
+        VARCHAR(320)
+        DEFAULT NULL,
+    aut_client_perslid_pushtoken
+        VARCHAR(320),
+    aut_client_perslid_refreshtkn -- unused yet
+        VARCHAR(320),
+    aut_client_perslid_refreshdate
+        DATE,
+    aut_client_perslid_accesstoken
+        VARCHAR(320),
+    aut_client_perslid_accessdate
+        DATE,
+    aut_client_perslid_login -- wanneer voor het laatst de app gebruikt
+        DATE,
+// Note: this column is defined in PRS_TAB.SRC
+//    prs_perslid_key
+//        NUMBER(10)
+//        CONSTRAINT aut_r_aut_client_perslid REFERENCES prs_perslid(prs_perslid_key) ON DELETE CASCADE
+//        CONSTRAINT aut_c_aut_client_perslid CHECK(prs_perslid_key IS NOT NULL),
+    aut_client_perslid_aanmaak
+        DATE
+        DEFAULT SYSDATE
+);
+
+ALTER TABLE aut_client_perslid ADD (
+    prs_perslid_key
+        NUMBER(10)
+        CONSTRAINT aut_r_aut_client_perslid REFERENCES prs_perslid(prs_perslid_key) ON DELETE CASCADE
+        CONSTRAINT aut_c_aut_client_perslid CHECK(prs_perslid_key IS NOT NULL)
+);
+
+CREATE SEQUENCE aut_s_aut_client_key         MINVALUE 1;
+CREATE SEQUENCE aut_s_aut_client_perslid_key MINVALUE 1;
+
+DEF_MENUENTRY(2, 99110, 'lcl_menu_aut_client'          , '', 'FAC', 'appl/mgt/aut_client.asp', 0, 0, 'WEB_FACTAB');
+
+/////////////////////////////////////////////////////////////////////////////////////////// FSN#36229
+ALTER TABLE fac_functie
+ADD fac_functie_volgnr NUMBER(10);
+
+// As previous DB version
+UPDATE fac_functie
+   SET fac_functie_volgnr =
+          CASE
+             WHEN SUBSTR (fac_functie_code, 8, 3) IN ('USE', 'FOF', 'BOF')
+                  AND SUBSTR (fac_functie_code, 5, 3) <> 'UUR'
+             THEN 250
+             WHEN SUBSTR (fac_functie_code, 8, 3) IN ('BAC', 'MAN')
+             THEN 500
+             WHEN SUBSTR (fac_functie_code, 8, 3) IN ('BO2', 'BO3', 'AFR', 'NOS', 'OAP')
+             THEN 750
+          END;
+
+// In use
+UPDATE fac_functie ff
+   SET fac_functie_volgnr = 1000
+ WHERE EXISTS (SELECT 'x'
+                 FROM fac_groeprechten fgr, fac_groep fg, fac_functie ff2
+                WHERE EXISTS (SELECT 'y'
+                                FROM fac_gebruikersgroep fgg
+                               WHERE fgg.fac_groep_key = fg.fac_groep_key)
+                  AND fg.fac_groep_upper NOT IN ('_ADMIN', '_FACILITOR')
+                  AND ff.fac_functie_key = ff2.fac_functie_key
+                  AND ff2.fac_functie_key = fgr.fac_functie_key
+                  AND fgr.fac_groep_key = fg.fac_groep_key
+                  AND ff2.fac_functie_volgnr IS NULL);
+
+DROP TRIGGER fac_t_fac_functie_B_IU;
+
+/////////////////////////////////////////////////////////////////////////////////////////// MARX#39537
+ALTER TABLE mld_srtkenmerk DROP CONSTRAINT mld_c_mld_srtkenmerk_systeem;
+ALTER TABLE mld_srtkenmerk
+     MODIFY mld_srtkenmerk_systeem DEFAULT 0;
+UPDATE mld_srtkenmerk
+   SET mld_srtkenmerk_systeem = 0
+ WHERE mld_srtkenmerk_systeem IS NULL;
+ALTER TABLE mld_srtkenmerk
+    ADD CONSTRAINT mld_c_mld_srtkenmerk_systeem
+       CHECK(mld_srtkenmerk_systeem IS NOT NULL);
+
+
+/////////////////////////////////////////////////////////////////////////////////////////// ARAI#38183
+DEF_FAC_SRTNOT('ORDHLT', 0, 'lcl_noti_ORDHLT', 'mld/mld_opdr.asp?opdr_key=', '0', 'opdracht', 10);
+DEF_FAC_SRTNOT('ORDRSM', 0, 'lcl_noti_ORDRSM', 'mld/mld_opdr.asp?opdr_key=', '0', 'opdracht', 10);
+
+ALTER TRIGGER mld_t_mld_opdr_B_IU DISABLE;
+ALTER TABLE mld_opdr
+  ADD mld_opdr_halted  -- is de opdracht onderbroken {0=nee (default) | 1=ja}
+    NUMBER(1)
+    DEFAULT (0)
+    NOT NULL
+    CONSTRAINT mld_c_mld_opdr_halted CHECK(mld_opdr_halted IN (0, 1));
+ALTER TRIGGER mld_t_mld_opdr_B_IU ENABLE;
+
+/////////////////////////////////////////////////////////////////////////////////////////// ARAI#38184
+ALTER TABLE mld_typeopdr
+  ADD mld_typeopdr_sequential NUMBER(1) DEFAULT 0 NOT NULL;
+
+/////////////////////////////////////////////////////////////////////////////////////////// FSN#40101
+ALTER TABLE ins_deel MODIFY (ins_deel_aantal NUMBER(8,2));
+/////////////////////////////////////////////////////////////////////////////////////////// FSN#40190
+ALTER TABLE ins_srtcontroledl_xcp ADD ins_srtcontroledl_xcp_aantal NUMBER(8,2);
+ALTER TABLE ins_srtcontroledl_xcp ADD ins_srtcontroledl_xcp_aanteh VARCHAR2(30);
+
+/////////////////////////////////////////////////////////////////////////////////////////// FSN#40186
+ALTER TABLE mld_stdmsrtruimte ADD mld_stdmsrtruimte_regime NUMBER(2)
+ CONSTRAINT mld_c_stdmsrtruimte_regime CHECK (mld_stdmsrtruimte_regime IN (1,2,3));
+
+/////////////////////////////////////////////////////////////////////////////////////////// FSN#39832
+ALTER TABLE mld_melding DROP CONSTRAINT mld_r_mld_workflowstep_key4;
+ALTER TABLE mld_melding MODIFY mld_workflowstep_key CONSTRAINT mld_r_mld_workflowstep_key4 REFERENCES mld_workflowstep(mld_workflowstep_key);
+
+/////////////////////////////////////////////////////////////////////////////////////////// FSN#37488
+ALTER TABLE res_disc_params ADD prs_bedrijf_key NUMBER(10) CONSTRAINT res_r_prs_bedrijf_key REFERENCES prs_bedrijf (prs_bedrijf_key);
+
+/////////////////////////////////////////////////////////////////////////////////////////// STAM#39620
+ALTER TABLE mld_stdmelding ADD mld_stdmelding_externurl VARCHAR2(1024);
+
+/////////////////////////////////////////////////////////////////////////////////////////// FSN#37274
+CREATE VIEW ins_v_udr_deelinspect AS SELECT '' dummy FROM DUAL;
+
+INSERT INTO fac_usrrap (fac_usrrap_omschrijving, fac_usrrap_view_name,fac_usrrap_info, fac_functie_key, fac_usrrap_functie)
+ SELECT 'UDR: Object inspecties','INS_V_UDR_DEELINSPECT','Basisrapport voor object inspectie rapportages', fac_functie_key, 32
+   FROM fac_functie WHERE fac_functie_code='WEB_UDRMAN'
+    AND NOT EXISTS (SELECT '' FROM fac_usrrap WHERE UPPER(fac_usrrap_view_name)='INS_V_UDR_DEELINSPECT');
+
+CREATE VIEW ins_v_udr_deelsrtcontrole AS SELECT '' dummy FROM DUAL;
+
+INSERT INTO fac_usrrap (fac_usrrap_omschrijving, fac_usrrap_view_name,fac_usrrap_info, fac_functie_key, fac_usrrap_functie)
+ SELECT 'UDR: Object soort controles','INS_V_UDR_DEELSRTCONTROLE','Basisrapport voor object soort controle rapportages', fac_functie_key, 32
+   FROM fac_functie WHERE fac_functie_code='WEB_UDRMAN'
+    AND NOT EXISTS (SELECT '' FROM fac_usrrap WHERE UPPER(fac_usrrap_view_name)='INS_V_UDR_DEELSRTCONTROLE');
+
+/////////////////////////////////////////////////////////////////////////////////////////// KFNS#38663
+CREATE SEQUENCE alg_s_alg_algfaq_key MINVALUE 1;
+
+CREATE_TABLE(alg_algfaq, 0)
+(
+    alg_algfaq_key
+        NUMBER(10)
+        CONSTRAINT alg_k_algfaq_key PRIMARY KEY,
+    alg_locatie_key
+        NUMBER(10)
+        NOT_NULL(alg_locatie_key, mld_c_alg_locatie_key)
+        CONSTRAINT mld_r_mld_locatie_key1 REFERENCES alg_locatie(alg_locatie_key) ON DELETE CASCADE,
+    alg_onroerendgoed_keys
+        NUMBER(10),
+    fac_faq_key
+        NUMBER(10)
+        NOT_NULL(fac_faq_key, alg_c_fac_faq_key)
+        CONSTRAINT alg_r_fac_faq_key1 REFERENCES fac_faq(fac_faq_key) ON DELETE CASCADE
+);
+
+/////////////////////////////////////////////////////////////////////////////////////////// KFNS#37931
+DEF_FAC_SRTNOT('ORDDAT', 0, 'lcl_noti_ORDDAT', 'mld/mld_opdr.asp?opdr_key=', '0', 'opdracht', 60);
+
+/////////////////////////////////////////////////////////////////////////////////////////// AAIT#39909
+ALTER TABLE prs_bedrijfadres
+    ADD prs_bedrijfadres_lockuser_key
+        NUMBER(10)
+        CONSTRAINT prs_r_prs_bedrijfadres_lckser REFERENCES prs_perslid(prs_perslid_key);
+
+ALTER TABLE prs_bedrijfadres
+    ADD prs_bedrijfadres_locksecret
+        VARCHAR2(128);
+
+ALTER TABLE prs_bedrijfadres
+    ADD prs_bedrijfadres_lockexpire
+        NUMBER(10);
+
+/////////////////////////////////////////////////////////////////////////////////////////// FSN#40442
+DEF_MENUENTRY(2, 99130, 'lcl_menu_fac_anysql'          , '', 'FAC', 'appl/mgt/mgt_genericsql.asp', 0, 0, 'WEB_FACFAC');
 
-///////////////////////////////////////////////////////////////////////////////////////////
-///////////////////////////////////////////////////////////////////////////////////////////
-///////////////////////////////////////////////////////////////////////////////////////////
-///////////////////////////////////////////////////////////////////////////////////////////
-///////////////////////////////////////////////////////////////////////////////////////////
 ///////////////////////////////////////////////////////////////////////////////////////////
 ///////////////////////////////////////////////////////////////////////////////////////////
 
@@ -26,6 +866,79 @@ DROP VIEW mld_v_stdmelding_kenmerk;
 
 /////////////////////////////////////////////////////////////////////////////////////////// CLEANUP
 
+/////////////////////////////////////////////////////////////////////////////////////////// FSN#39586
+DELETE fac_localeitems
+ WHERE fac_localeitems_dialect_id = 'MLD_SRTDISCIPLINE_KEY'
+   AND fac_localeitems_lcl IN ('lcl_mld_urg_hold1',
+                               'lcl_mld_urg_hoog1',
+                               'lcl_mld_urg_kritiek1',
+                               'lcl_mld_urg_laag1',
+                               'lcl_mld_urg_normaal1');
+
+/////////////////////////////////////////////////////////////////////////////////////////// FSN#31475
+UPDATE cnt_disc_params SET cnt_srtcontract_type=4 WHERE cnt_srtcontract_type=2;
+DELETE FROM cnt_typecontract WHERE cnt_typecontract_key=2;
+
+DROP VIEW cnt_v_aanwezigcontract_data;
+DROP VIEW cnt_v_allonroerendgoed;
+DROP VIEW cnt_v_contract_locatie_geg;
+DROP VIEW cnt_v_cnt_contract_onrgoed_new;
+DROP VIEW cnt_v_cnt_contract_onrgoed_cur;
+DROP VIEW cnt_v_cnt_contract_onrgoed_mut;
+DROP VIEW cnt_v_contract_huurder;
+
+DROP INDEX cnt_i_cnt_contract_onrg1;
+DROP INDEX cnt_i_cnt_contract_onrg2;
+DROP TABLE cnt_contract_onrgoed PURGE;
+DROP TABLE cnt_mutatie_status PURGE;
+DROP TABLE cnt_mutatie PURGE;
+
+DROP SEQUENCE cnt_s_cnt_mutatie_key;
+DROP SEQUENCE cnt_s_cnt_onrgoed_key;
+
+/////////////////////////////////////////////////////////////////////////////////////////// FSN#38888
+
+DROP VIEW mld_v_stdmelding_kenmerk;
+DROP VIEW alg_v_alg_ruimte_verdieping;
+DROP VIEW all_backoffice;
+DROP VIEW all_v_aanwezigbackoffice;
+DROP VIEW all_v_aanwezigafdeling;
+DROP VIEW all_v_aanwezigbedrijf;
+DROP VIEW cad_v_cad_tekening_gegevens;
+DROP VIEW cad_v_cad_tekening;
+DROP VIEW cad_v_ins_deel;
+DROP VIEW cad_v_lpn_ins_deel_1;
+DROP VIEW cad_v_lpn_ins_deel_2;
+DROP VIEW cad_v_lpn_prs_werkplek_1;
+DROP VIEW cad_v_contour;
+DROP VIEW cad_v_discipline;
+DROP VIEW cad_v_plattegrond;
+DROP VIEW cad_v_prs_werkplek;
+DROP VIEW ins_v_deel_acadsymbol;
+DROP VIEW ins_v_compositie_gegevens;
+DROP VIEW fac_v_webfunctie;
+DROP VIEW fac_v_webuser;
+DROP VIEW fac_v_webfunctie_discipline;
+DROP VIEW fac_v_functie_discipline;
+DROP VIEW fac_v_gebruikersgroepgegevens;
+DROP VIEW all_v_srtdeel_gegevens;
+DROP VIEW all_v_srtgroep_gegevens;
+DROP VIEW all_v_aanwezigsrtdeel;
+DROP VIEW all_v_aanwezigsrtgroep;
+DROP VIEW all_v_aanwezigdiscipline;
+DROP VIEW all_discipline;
+DROP VIEW all_v_aanwezigdeel;
+
+DROP VIEW fac_v_perfmon_sample_overall60;
+DROP VIEW fac_v_perfmon_sample_overall10;
+DROP VIEW fac_v_perfmon_sample60;
+DROP VIEW fac_v_perfmon_sample10;
+DROP VIEW fac_v_perfmon_sample_ip;
+DROP VIEW fac_v_perfmon_sample_user;
+
+DROP TABLE fac_error PURGE;
+DROP TABLE fac_errorlog PURGE;
+
 ///////////////////////////////////////////////////////////////////////////////////////////
 REGISTERONCE('$Id$')
 

_UP/DB31_FSN#40763.sql

@@ -0,0 +1,39 @@
+--
+-- $Id$
+--
+-- Corrigeer menu voor klanten die met DB27 of later zijn aangemaakt
+-- En met DB31b of eerder naar DB31 zijn gebracht
+-- Specifiek: voor ASDL, VENT, PCIN, WZUV, QUAW en HCAS
+
+DEFINE thisfile = 'DB31_FSN#40763.sql'
+DEFINE dbuser   = '*'
+
+SET ECHO ON
+SET DEFINE ON
+COLUMN fcltlogfile NEW_VALUE fcltlogfile NOPRINT;
+WHENEVER SQLERROR EXIT;
+SELECT adm.scriptspoolfile('&dbuser', '&thisfile') AS fcltlogfile FROM DUAL;
+WHENEVER SQLERROR CONTINUE;
+SPOOL &fcltlogfile
+SET DEFINE OFF
+
+------ payload begin ------
+
+UPDATE fac_menuitems
+   SET fac_menuitems_url = REPLACE(fac_menuitems_url, 'ALG_KENMERK_NIVEAU', 'level')
+ WHERE fac_menuitems_url LIKE '%alg_kenmerk.asp%';
+UPDATE fac_menuitems
+   SET fac_menuitems_url = REPLACE(fac_menuitems_url, 'PRS_KENMERK_NIVEAU', 'level')
+ WHERE fac_menuitems_url LIKE '%prs_kenmerk.asp%';
+
+------ payload end   ------
+
+SET DEFINE OFF
+BEGIN adm.systrackscriptId ('$Id$', 1); END;
+/
+
+COMMIT;
+SET ECHO OFF
+SPOOL OFF
+SET DEFINE ON
+PROMPT Logfile of this upgrade is: &fcltlogfile

_UP/DB31cto31d.sql

@@ -0,0 +1,33 @@
+--
+-- $Id$
+--
+-- Toch prs_kostenplaatsgrp.prs_kostenplaatsgrp_key weer NULL toestaan
+-- Nodig voor alle databases die met DB31/a/b/c zijn aangemaakt
+
+DEFINE thisfile = 'DB31cto31d.sql'
+DEFINE dbuser   = '*'
+
+SET ECHO ON
+SET DEFINE ON
+COLUMN fcltlogfile NEW_VALUE fcltlogfile NOPRINT;
+WHENEVER SQLERROR EXIT;
+SELECT adm.scriptspoolfile('&dbuser', '&thisfile') AS fcltlogfile FROM DUAL;
+WHENEVER SQLERROR CONTINUE;
+SPOOL &fcltlogfile
+SET DEFINE OFF
+
+------ payload begin ------
+
+ALTER TABLE prs_kostenplaats MODIFY prs_kostenplaatsgrp_key NULL;
+
+------ payload end   ------
+
+SET DEFINE OFF
+BEGIN adm.systrackscriptId ('$Id$', 1); END;
+/
+
+COMMIT;
+SET ECHO OFF
+SPOOL OFF
+SET DEFINE ON
+PROMPT Logfile of this upgrade is: &fcltlogfile

_UP/DB31dto31e.sql

@@ -0,0 +1,35 @@
+--
+-- $Id$
+--
+-- Notification interval was initialized as daily but should be approximately quarterly.
+
+DEFINE thisfile = 'DB31cto31d.sql'
+DEFINE dbuser   = '*'
+
+SET ECHO ON
+SET DEFINE ON
+COLUMN fcltlogfile NEW_VALUE fcltlogfile NOPRINT;
+WHENEVER SQLERROR EXIT;
+SELECT adm.scriptspoolfile('&dbuser', '&thisfile') AS fcltlogfile FROM DUAL;
+WHENEVER SQLERROR CONTINUE;
+SPOOL &fcltlogfile
+SET DEFINE OFF
+
+------ payload begin ------
+
+UPDATE fac_notificatie_job
+   SET fac_notificatie_job_interval = 2160
+ WHERE fac_notificatie_job_interval = 24
+   AND fac_notificatie_job_view = 'FAC_V_NOTI_LICENTIE';
+
+------ payload end   ------
+
+SET DEFINE OFF
+BEGIN adm.systrackscriptId ('$Id$', 1); END;
+/
+
+COMMIT;
+SET ECHO OFF
+SPOOL OFF
+SET DEFINE ON
+PROMPT Logfile of this upgrade is: &fcltlogfile

_UP/DB31to31a.sql

@@ -0,0 +1,21 @@
+SPOOL DB31to31a.lst
+
+-- /////////////////////////////////////////////////////////////////////////////////////// MARX#39100
+ALTER TABLE prs_bedrijf_bedrijf ADD (
+   prs_bedrijf_bedrijf_startdatum
+        DATE
+        DEFAULT SYSDATE,
+   prs_bedrijf_bedrijf_einddatum
+        DATE,
+   prs_bedrijf_bedrijf_status
+        NUMBER(1)         -- voor mld_opdr_teverzenden: 0=niet te verzenden 1=te verzenden
+        DEFAULT(0)
+        NOT NULL
+);
+
+
+BEGIN adm.systrackscriptId('$Id$', 1); END;
+/
+COMMIT;
+
+SPOOL OFF

_UP/recreate.inc

@@ -18,6 +18,7 @@
 #include "bes\bes_vie.src"
 #include "mrk\mrk_vie.src"
 #include "fin\fin_vie.src"
+#include "bgt\bgt_vie.src"
 #include "prj\prj_vie.src"
 #include "msg\msg_vie.src"
 #include "kpi\kpi_vie.src"
@@ -38,6 +39,7 @@
 #include "bes\bes_pac.src"
 #include "mrk\mrk_pac.src"
 #include "fin\fin_pac.src"
+#include "bgt\bgt_pac.src"
 #include "prj\prj_pac.src"
 #include "msg\msg_pac.src"
 #include "kpi\kpi_pac.src"
@@ -46,6 +48,7 @@
 // Recreation all triggers
 #include "fac\fac_tri.src"
 #include "alg\alg_tri.src"
+#include "aut\aut_tri.src"
 #include "ins\ins_tri.src"
 #include "prs\prs_tri.src"
 #include "cnt\cnt_tri.src"
@@ -57,6 +60,7 @@
 #include "bes\bes_tri.src"
 #include "mrk\mrk_tri.src"
 #include "fin\fin_tri.src"
+#include "bgt\bgt_tri.src"
 #include "prj\prj_tri.src"
 #include "msg\msg_tri.src"
 #include "kpi\kpi_tri.src"

_UTIL/AnonymizeallFCLT.bat

@@ -1,4 +1,4 @@
-:: PRODUCTIE/Shared SaaS - Let op: ASFC staat uit maar de database is er nog wel
+:: PRODUCTIE/Shared SaaS
 CALL UPGRADEONEFCLT.BAT ALLI X37MgCj_MbaQnREwp ALLI
 CALL UPGRADEONEFCLT.BAT ALLV XbBQosfQXqiBvQVIa ALLV
 CALL UPGRADEONEFCLT.BAT ARAI XiZgOL0B2cGbSqvP_ ARAI
@@ -6,14 +6,11 @@ CALL UPGRADEONEFCLT.BAT ARBO X8z2F172BMEBJEaBS ARBO
 CALL UPGRADEONEFCLT.BAT AREO Xm9VTyaei0Q8PbTtV AREO
 CALL UPGRADEONEFCLT.BAT ARFR X9E8wtNlVg_PKQlY2 ARFR
 CALL UPGRADEONEFCLT.BAT ASDL X9pKB3XUG_u5ppc_F ASDL
-CALL UPGRADEONEFCLT.BAT ASFC X51UFEWMx99DHYvTE ASFC
 CALL UPGRADEONEFCLT.BAT ASLE XVUZfHU6nsRwZqdov ASLE
 CALL UPGRADEONEFCLT.BAT ASTE XIQPjjHmTrSY6pVe8 ASTE
-CALL UPGRADEONEFCLT.BAT ATCH X2ySxbsRKvMqZMZbW ATCH
 CALL UPGRADEONEFCLT.BAT BLCC Xa2s4Q38qI8dWS1TR BLCC
 CALL UPGRADEONEFCLT.BAT BOFO XQigftoWTdwV92ll8 BOFO
 CALL UPGRADEONEFCLT.BAT BONS XHLG_Zqa0DUM0QM9J BONS
-CALL UPGRADEONEFCLT.BAT BRWT XbJRt9Lwpt3LXwkVb BRWT
 CALL UPGRADEONEFCLT.BAT CSUN XsRVh_WnMCmUXIhH1 CSUN
 CALL UPGRADEONEFCLT.BAT CWTD XfW0o3qr4m1XjY2Bf CWTD
 CALL UPGRADEONEFCLT.BAT DCOL XKNNWym6GRK19Jsza DCOL
@@ -49,7 +46,6 @@ CALL UPGRADEONEFCLT.BAT PCHS XpZ3tqFfbIuHCI4Yb PCHS
 CALL UPGRADEONEFCLT.BAT PCHY XJUWs9TBeGdyvkJVO PCHY
 CALL UPGRADEONEFCLT.BAT PHBF XOyESf_eMpxxhK31S PHBF
 CALL UPGRADEONEFCLT.BAT PRIS Xg7M3eh8R_0MXD_mT PRIS
-CALL UPGRADEONEFCLT.BAT PZHO XW76hiUHz_ICfCMXR PZHO
 CALL UPGRADEONEFCLT.BAT QUAW XROwIyCrLRizuSeUv QUAW
 CALL UPGRADEONEFCLT.BAT RENK Xptt70T9YaTsJn_Dy RENK
 CALL UPGRADEONEFCLT.BAT RTWE X0PSnnjJle9NvDJTZ RTWE
@@ -61,7 +57,6 @@ CALL UPGRADEONEFCLT.BAT STAM XoJs8GkSngaBHHvHk STAM
 CALL UPGRADEONEFCLT.BAT STPH XyYAS7o7BvgtbUqyW STPH
 CALL UPGRADEONEFCLT.BAT SUTF XLP2sY1LHvSHlx1q8 SUTF
 CALL UPGRADEONEFCLT.BAT SVRZ XKmbhAX0f0t_e321S SVRZ
-CALL UPGRADEONEFCLT.BAT UBBO X3Ylqwb_ZbY8G8ysd UBBO
 CALL UPGRADEONEFCLT.BAT VEBE X_GvM7FRphkLOqjYP VEBE
 CALL UPGRADEONEFCLT.BAT VENR XZIhKs9hKfXiVcuAr VENR
 CALL UPGRADEONEFCLT.BAT VENT XgRiWIXYtdjBfPJQ1 VENT
@@ -70,7 +65,6 @@ CALL UPGRADEONEFCLT.BAT VIAR XB_eJSfilbJdNWN35 VIAR
 CALL UPGRADEONEFCLT.BAT VLKC XM25OGK3xc0iV2Fgp VLKC
 CALL UPGRADEONEFCLT.BAT WEHK XJvjh3WmdYRrR13xf WEHK
 CALL UPGRADEONEFCLT.BAT WELK X0L0tXXLY_JkR2dJv WELK
-CALL UPGRADEONEFCLT.BAT WIBC XXs8D6OKRDc8gf0uT WIBC
 CALL UPGRADEONEFCLT.BAT WTCA X1LPtVUw3PUdEl26_ WTCA
 
 :: PRODUCTIE/Dedicated SaaS
@@ -78,76 +72,6 @@ CALL UPGRADEONEFCLT.BAT PNBR Xnjy1KFYIkXtfqHqj PNBR
 CALL UPGRADEONEFCLT.BAT KFNS X3qtSZP2I2KkY9zAS KFNS
 CALL UPGRADEONEFCLT.BAT HSLE XLUDuA_vCCyWxXhj8 HSLE
 
-:: ACCEPTATIE/Shared SaaS - Let op: ASFC_TEST staat uit maar de database is er nog wel <20>n DEMO_TEST is extra
-CALL UPGRADEONEFCLT.BAT ALLI_TEST XHkPHavNCkGlamJHo ALLI_TEST
-CALL UPGRADEONEFCLT.BAT ALLV_TEST XUsf4h1rJO6COc2nf ALLV_TEST
-CALL UPGRADEONEFCLT.BAT ARAI_TEST XwPz0AKvKMiYt2YRo ARAI_TEST
-CALL UPGRADEONEFCLT.BAT ARBO_TEST XMvD5zclhbTKgsVto ARBO_TEST
-CALL UPGRADEONEFCLT.BAT AREO_TEST XLJWW0lNdTVSs6mhd AREO_TEST
-CALL UPGRADEONEFCLT.BAT ARFR_TEST X9K8YpSjFm5WbBgQv ARFR_TEST
-CALL UPGRADEONEFCLT.BAT ASDL_TEST XPtVgvZcn_pWQgdFZ ASDL_TEST
-CALL UPGRADEONEFCLT.BAT ASFC_TEST X_QGSyrF1btiDzLx_ ASFC_TEST
-CALL UPGRADEONEFCLT.BAT ASLE_TEST XzVdKiTvWDx3k5a1s ASLE_TEST
-CALL UPGRADEONEFCLT.BAT ASTE_TEST XNAv2WOmtFPsET_56 ASTE_TEST
-CALL UPGRADEONEFCLT.BAT ATCH_TEST Xqy8Xh1nDlDb_XP_G ATCH_TEST
-CALL UPGRADEONEFCLT.BAT BLCC_TEST XJIRfxgO3_ODeV7En BLCC_TEST
-CALL UPGRADEONEFCLT.BAT BONS_TEST Xy63AT8q7P3J3ZiJA BONS_TEST
-CALL UPGRADEONEFCLT.BAT CSUN_TEST Xf4WOxmaYgOz_7lgg CSUN_TEST
-CALL UPGRADEONEFCLT.BAT CWTD_TEST XwbIfm8BqQSWCcHaS CWTD_TEST
-CALL UPGRADEONEFCLT.BAT DCOL_TEST Xe8EhRwIgMHZWuCMu DCOL_TEST
-CALL UPGRADEONEFCLT.BAT DEMO_TEST X4GVDoR2dFhgjjV7W DEMO_TEST
-CALL UPGRADEONEFCLT.BAT DENB_TEST XijcY8Lagd_qsEe06 DENB_TEST
-CALL UPGRADEONEFCLT.BAT GDFS_TEST XnF6vbBQ_PMVpXMXo GDFS_TEST
-CALL UPGRADEONEFCLT.BAT GDZW_TEST XyWGPdnMKTKAHWc8m GDZW_TEST
-CALL UPGRADEONEFCLT.BAT GOUD_TEST Xvi6FL1Pi_GAoOlYf GOUD_TEST
-CALL UPGRADEONEFCLT.BAT GRKL_TEST Xpd___8AKLYEmOJl6 GRKL_TEST
-CALL UPGRADEONEFCLT.BAT GVBA_TEST XG2YkruFvGW0dPBcy GVBA_TEST
-CALL UPGRADEONEFCLT.BAT HAYG_TEST X6_CBNiMA5rUmXT8b HAYG_TEST
-CALL UPGRADEONEFCLT.BAT HCAS_TEST XkyeVIJ8FLv_kyGwa HCAS_TEST
-CALL UPGRADEONEFCLT.BAT HOUT_TEST XH5d1m73OGhGlluMR HOUT_TEST
-CALL UPGRADEONEFCLT.BAT HPJI_TEST X0yB2lCZDjh956rpO HPJI_TEST
-CALL UPGRADEONEFCLT.BAT IVET_TEST XMiQzjtDcJtbtu3EF IVET_TEST
-CALL UPGRADEONEFCLT.BAT KEMP_TEST Xl4w8lC1RNGtbdFYd KEMP_TEST
-CALL UPGRADEONEFCLT.BAT KFHT_TEST X4ky_5iUYR0dhH4WK KFHT_TEST
-CALL UPGRADEONEFCLT.BAT KIBE_TEST X3tBTaVd8ezB7zWh3 KIBE_TEST
-CALL UPGRADEONEFCLT.BAT LING_TEST XCblFT0UteIic2b9O LING_TEST
-CALL UPGRADEONEFCLT.BAT LOGI_TEST XoVvsuiJ4Cr3cdQUK LOGI_TEST
-CALL UPGRADEONEFCLT.BAT MARX_TEST XMdmxIaAD43zGrrRx MARX_TEST
-CALL UPGRADEONEFCLT.BAT MAYF_TEST XcGXq0Q1k6tpWkpaU MAYF_TEST
-CALL UPGRADEONEFCLT.BAT MDUX_TEST X5i68oFl7nQMQ0WqV MDUX_TEST
-CALL UPGRADEONEFCLT.BAT MNNL_TEST X_arN5s6ETCYRR2Rl MNNL_TEST
-CALL UPGRADEONEFCLT.BAT NMPC_TEST Xm3Oae0zMSiwrpgSD NMPC_TEST
-CALL UPGRADEONEFCLT.BAT NYBU_TEST XfMt4zea5YUSHevWH NYBU_TEST
-CALL UPGRADEONEFCLT.BAT PCHD_TEST XepCW9Hwk_5o_Fe5t PCHD_TEST
-CALL UPGRADEONEFCLT.BAT PCHE_TEST XkA0QtQAop2VCOaP7 PCHE_TEST
-CALL UPGRADEONEFCLT.BAT PCHH_TEST XMdWA6pkqYFeSVChI PCHH_TEST
-CALL UPGRADEONEFCLT.BAT PCHP_TEST XlY90bBMp5R_g92Ei PCHP_TEST
-CALL UPGRADEONEFCLT.BAT PHBF_TEST XHjTigW6ufhxcMkkc PHBF_TEST
-CALL UPGRADEONEFCLT.BAT PRIS_TEST XOwtYvvrjUTBocnEj PRIS_TEST
-CALL UPGRADEONEFCLT.BAT QUAW_TEST Xke4nsOVZCEjpg3oD QUAW_TEST
-CALL UPGRADEONEFCLT.BAT RENK_TEST XcmXYEqtutsb4jrW2 RENK_TEST
-CALL UPGRADEONEFCLT.BAT SBSH_TEST XLNUkrtD5QIeg94ha SBSH_TEST
-CALL UPGRADEONEFCLT.BAT SGGR_TEST XeQ8tb4nUQDAgWblY SGGR_TEST
-CALL UPGRADEONEFCLT.BAT SKAF_TEST XZPUdmDZocO70B26h SKAF_TEST
-CALL UPGRADEONEFCLT.BAT SORO_TEST XT0VJGxClksRDzXfw SORO_TEST
-CALL UPGRADEONEFCLT.BAT STAM_TEST XfxAuP2xYqzLKNd1g STAM_TEST
-CALL UPGRADEONEFCLT.BAT STPH_TEST XVuBtd_5PMThPASwR STPH_TEST
-CALL UPGRADEONEFCLT.BAT SUTF_TEST XaCxaBHwZXcViPFXu SUTF_TEST
-CALL UPGRADEONEFCLT.BAT SVRZ_TEST Xxg89EUh7e8IAGyjh SVRZ_TEST
-CALL UPGRADEONEFCLT.BAT VEBE_TEST XMlU_vQ6iN2TrYeFk VEBE_TEST
-CALL UPGRADEONEFCLT.BAT VENR_TEST XkCKy0_AmOP_Qxzzz VENR_TEST
-CALL UPGRADEONEFCLT.BAT VENT_TEST XqxigTd6JX3eQ1RU6 VENT_TEST
-CALL UPGRADEONEFCLT.BAT VGLD_TEST X8Rs0gC_0uETV5afp VGLD_TEST
-CALL UPGRADEONEFCLT.BAT VIAR_TEST XBcF7DbHSUeQI5EPm VIAR_TEST
-CALL UPGRADEONEFCLT.BAT VLKC_TEST XEBK2z9SN1mowurdo VLKC_TEST
-CALL UPGRADEONEFCLT.BAT WEHK_TEST XSUa_M66vXTifqH_h WEHK_TEST
-CALL UPGRADEONEFCLT.BAT WELK_TEST X5yf5CqdpdEdsIoV_ WELK_TEST
-CALL UPGRADEONEFCLT.BAT WIBC_TEST XGxlVhxg_TJwnA3NQ WIBC_TEST
-
-:: ACCEPTATIE/Dedicated SaaS
-CALL UPGRADEONEFCLT.BAT PNBR_TEST X7HTH13qCgqGL7Qcl PNBR_TEST
-CALL UPGRADEONEFCLT.BAT KFNS_TEST Xsum01tOJSBUJb5xT KFNS_TEST
-CALL UPGRADEONEFCLT.BAT HSLE_TEST Xi_G8_PMIZ78RgozH HSLE_TEST
 
 TITLE KLAAR!
 

_UTIL/SUPPORT_IDP/supportJWT_SAAS.sql

@@ -17,21 +17,20 @@ SET DEFINE OFF
 
 ------ payload begin ------
 
-INSERT INTO fac_idp (fac_idp_code,
-                     fac_idp_type,
-                     fac_idp_algorithm,
-                     fac_idp_omschrijving,
-                     fac_idp_opmerking,
-                     fac_idp_secret,
-                     fac_idp_remote_loginurl,
-                     fac_idp_remote_logouturl,
-                     fac_idp_clockskew,
-                     fac_idp_internal,
-                     fac_idp_ipfilter,
-                     fac_idp_ipauto,
-                     fac_idp_usermapping,
-                     fac_idp_audience,
-                     fac_idp_issuer)
+INSERT INTO aut_idp (aut_idp_code,
+                     aut_idp_type,
+                     aut_idp_algorithm,
+                     aut_idp_omschrijving,
+                     aut_idp_opmerking,
+                     aut_idp_secret,
+                     aut_idp_remote_loginurl,
+                     aut_idp_remote_logouturl,
+                     aut_idp_clockskew,
+                     aut_idp_internal,
+                     aut_idp_ipfilter,
+                     aut_idp_ipauto,
+                     aut_idp_audience,
+                     aut_idp_issuer)
     VALUES ('FACILITORSUPPORT',
             4, -- JWT
             'HS256',
@@ -44,7 +43,6 @@ INSERT INTO fac_idp (fac_idp_code,
             1,
             '87.249.108.135,87.249.108.136',
             0,
-            'username',
             'xxxx.facilitor.nl',
             'FACWS001');
 

_UTIL/TestOracle/_CREA_WORK_UPDATE.bat

@@ -18,13 +18,13 @@ sqlplus.exe system/XZSTXnHGjfNNODfQc@%targetSERVER% @.\CreateUser%targetSERVER%.
 @TITLE Running FCLT%DBPRV%.sql
 ECHO @@%DBPRVPATH% >xtmp.sql
 ECHO UPDATE fac_version SET fac_version_cust = 'CREA'; >>xtmp.sql
-ECHO @@supportJWT_SAAS.sql>>xtmp.sql
 ECHO EXIT >>xtmp.sql
 sqlplus.exe %targetUSER%/%targetPASS%@%targetSERVER% @xtmp.sql | FINDSTR /C:"BEGIN adm.sys" /C:"ORA-" /C:"SP2" /C:"Waarschuwing: package-body is aangemaakt met compilatiefouten."
 
 @TITLE Running DB%DBPRV%to%DBVER%.sql
 ECHO define ACCEPT_DB%DBVER%=1 >xtmp.sql
 ECHO @%BUILD%\DB%DBVER%\DB%DBPRV%to%DBVER%.sql >>xtmp.sql
+ECHO @@supportJWT_SAAS.sql>>xtmp.sql
 ECHO EXIT >>xtmp.sql
 sqlplus.exe %targetUSER%/%targetPASS%@%targetSERVER% @xtmp.sql | FINDSTR /C:"BEGIN adm.sys" /C:"ORA-" /C:"SP2" /C:"Waarschuwing: package-body is aangemaakt met compilatiefouten."
 DEL xtmp.sql

_UTIL/TestOracle/dirinfo

@@ -1,9 +1,9 @@
 
-testwork28.bat
+testwork31.bat
     Test de Oracle CREATE en UPGRADE scripts van de nog niet gecommitte scripts
 
-testora28.bat
-    Test de Oracle CREATE en UPGRADE scripts van de nog gecommitte scripts
+testsvn31.bat
+    Test de Oracle CREATE en UPGRADE scripts van de netjes gecommitte scripts
 
 Vooraan de scripts staan versienummers vermeld. Die moet je voor
 een volgende release mogelijk aanpassen

_UTIL/TestOracle/supportJWT_SAAS.sql

@@ -11,7 +11,6 @@ INSERT INTO fac_idp (fac_idp_code,
                      fac_idp_internal,
                      fac_idp_ipfilter,
                      fac_idp_ipauto,
-                     fac_idp_usermapping,
                      fac_idp_audience,
                      fac_idp_issuer)
     VALUES ('FACILITORSUPPORT',
@@ -26,7 +25,6 @@ INSERT INTO fac_idp (fac_idp_code,
             1,
             '87.249.108.135,87.249.108.136',
             0,
-            'username',
             'xxxx.facilitor.nl',
             'FACWS001');
 COMMIT;

_UTIL/TestOracle/testSVN30.bat

@@ -1,4 +1,4 @@
-@SET DBVER=30b
+@SET DBVER=30c
 @SET DBPRV=29
 @SET DBPRVPATH=z:\Archief\FACILITOR\2016\02\DB29c\FCLT29c.sql
 IF EXIST %DBPRVPATH% GOTO START

_UTIL/TestOracle/testSVN31.bat

@@ -0,0 +1,43 @@
+@SET DBVER=31
+@SET DBPRV=30
+@SET DBPRVPATH=z:\Archief\FACILITOR\2016\03\DB30f\FCLT30f.sql
+IF EXIST %DBPRVPATH% GOTO START
+ECHO %DBPRVPATH% niet gevonden
+PAUSE
+GOTO EINDE
+
+:START
+@echo off
+REM Usage: %0 [revision]
+REM Internal only
+REM Let op: je hebt SVN.EXE nodig die bijvoorbeeld meekomt als je bij TortoiseSVN
+REM         er voor kiest 'command line client tools' ook te installeren (default uit)
+REM
+
+SET PAD=http://facws001:8080/svn/Facilitor/Database/trunk
+
+SET SVNTOOLS=z:\Project\FACILITOR\Tools\MAKTOOLS\SlikSvn\bin
+
+IF x%1==x GOTO getrev
+SET REVISION=%1
+GOTO gotrev
+
+:getrev
+FOR /F "tokens=2 skip=4" %%G IN ('%SVNTOOLS%\svn info %PAD% --revision HEAD') DO ^
+IF NOT DEFINED REVISION SET REVISION=%%G
+
+:gotrev
+@TITLE Getting r%REVISION%
+SET FCLTMP=%TEMP%\FACILITOR_SVN_T_%REVISION%
+
+%SVNTOOLS%\svn export -r %REVISION% %PAD% %FCLTMP%
+PUSHD %FCLTMP%
+CALL mx NOWAIT %FCLTMP%\UIT
+POPD
+CALL _CREA_WORK %DBVER% %FCLTMP%\UIT
+CALL _CREA_WORK_UPDATE %DBPRV% %DBPRVPATH% %DBVER% %FCLTMP%\UIT
+
+cscript compare.js %DBPRV% %DBVER% >diff%DBVER%.lst 2>>&1
+
+::rmdir /S %FCLTMP%
+:EINDE

_UTIL/TestOracle/testwork30.bat

@@ -1,4 +1,4 @@
-@SET DBVER=30b
+@SET DBVER=30c
 @SET DBPRV=29
 @SET DBPRVPATH=z:\Archief\FACILITOR\2016\02\DB29c\FCLT29c.sql
 IF EXIST %DBPRVPATH% GOTO START

_UTIL/TestOracle/testwork31.bat

@@ -0,0 +1,28 @@
+@SET DBVER=31
+@SET DBPRV=30
+@SET DBPRVPATH=z:\Archief\FACILITOR\2016\03\DB30f\FCLT30f.sql
+IF EXIST %DBPRVPATH% GOTO START
+ECHO %DBPRVPATH% niet gevonden
+PAUSE
+GOTO EINDE
+
+:START
+@echo off
+REM Usage: %0
+
+PUSHD z:\Project\FACILITOR\Database\trunk
+CALL mx NOWAIT
+POPD
+ECHO Starting Create, see diffwork_%DBVER%.lst
+ECHO Starting Create>diffwork_%DBVER%.lst
+CALL _CREA_WORK %DBVER% z:\Project\FACILITOR\BUILD>>diffwork_%DBVER%.lst
+
+ECHO Starting Update, see diffwork_%DBVER%.lst
+ECHO Starting Update>>diffwork_%DBVER%.lst
+CALL _CREA_WORK_UPDATE %DBPRV% %DBPRVPATH% %DBVER% z:\Project\FACILITOR\BUILD>>diffwork_%DBVER%.lst
+
+ECHO Starting Compare, see diffwork_%DBVER%.lst
+ECHO Starting Compare>>diffwork_%DBVER%.lst
+cscript compare.js %DBPRV% %DBVER% >>diffwork_%DBVER%.lst 2>>&1
+
+:EINDE

_UTIL/anonymize.sql

@@ -22,6 +22,11 @@ UPDATE prs_perslid
           INITCAP (DBMS_RANDOM.string ('l', LENGTH (prs_perslid_voornaam)))
  WHERE prs_perslid_voornaam IS NOT NULL;
 
+UPDATE prs_perslid
+   SET prs_perslid_voorletters =
+          UPPER (DBMS_RANDOM.string ('l', LENGTH (prs_perslid_voorletters)))
+ WHERE prs_perslid_voorletters IS NOT NULL;
+
 UPDATE prs_perslid
    SET prs_perslid_naam =
              'INACTIEF:'
@@ -35,12 +40,24 @@ UPDATE prs_perslid SET prs_perslid_email='E'||TO_CHAR(prs_perslid_key)||'@facili
 UPDATE prs_perslid SET prs_perslid_oslogin2='O'||TO_CHAR(prs_perslid_key)
   WHERE prs_perslid_oslogin2 IS NOT NULL;
 
+DELETE FROM fac_imp_perslid;
+
 UPDATE prs_contactpersoon
    SET prs_contactpersoon_naam = INITCAP (reverse (prs_contactpersoon_naam));
 
 UPDATE prs_contactpersoon SET prs_contactpersoon_email='anonymous@facilitor.nl'
  WHERE prs_contactpersoon_email IS NOT NULL;
 
+ALTER TRIGGER bez_t_bez_afspraak_B_IU DISABLE;
+UPDATE bez_afspraak
+   SET bez_afspraak_gastheer = (SELECT SUBSTR(prs_perslid_naam_full,1,50) FROM prs_v_perslid_fullnames_all WHERE prs_perslid_key=bez_afspraak_host_key)
+ WHERE bez_afspraak_host_key IS NOT NULL;
+
+UPDATE bez_afspraak
+   SET bez_afspraak_gastheer = INITCAP (DBMS_RANDOM.string ('l', LENGTH (bez_afspraak_gastheer)))
+ WHERE bez_afspraak_host_key IS NULL;
+ALTER TRIGGER bez_t_bez_afspraak_B_IU ENABLE;
+
 UPDATE bez_bezoekers
    SET bez_afspraak_naam = UPPER(SUBSTR(bez_afspraak_naam,1,1))||'. Bezoeker'
  WHERE bez_afspraak_naam IS NOT NULL;