FCLT#79219 bugfix, dit had gewoon externnr moeten zijn, niet externnr2

svn path=/Database/branches/DB47/; revision=63970

CTR/CTR_VIE.SRC

@@ -50,8 +50,10 @@ AS
                 comps(ins_deel_key,
                       ins_srtcontrole_key,
                       ins_deelsrtcontrole_datum,
+                      ins_srtcontrole_mode,
                       ins_srtcontrole_eenheid,
                       ins_srtcontrole_periode,
+                      ins_srtcontrole_bits,
                       volgendedatum,
                       discipline,
                       soort,
@@ -83,8 +85,10 @@ AS
                              SELECT di.deel_key ins_deel_key,
                                     xcp.ins_srtcontrole_key,
                                     di.ins_deelsrtcontrole_datum,
+                                    xcp.ins_srtcontrole_mode,
                                     xcp.ins_srtcontrole_eenheid,
                                     xcp.ins_srtcontrole_periode,
+                                    xcp.ins_srtcontrole_bits,
                                     COALESCE(di.ins_deelsrtcontrole_plandatum,
                                              CASE
                                              WHEN di.ins_deelsrtcontrole_status IN (2, 3)
@@ -241,8 +245,10 @@ AS
                              SELECT d.deel_key ins_deel_key,
                                     xcp.ins_srtcontrole_key,
                                     NULL,
+                                    xcp.ins_srtcontrole_mode,
                                     xcp.ins_srtcontrole_eenheid,
                                     xcp.ins_srtcontrole_periode,
+                                    xcp.ins_srtcontrole_bits,
                                     -- Gestart(2) en de allereerste inspectie (ins_deelsrtcontrole_datum_org is NULL).
                                     -- Periodieke taken:
                                     -- De startdatum is MAX(startdatum, aanmaakdatum/registratiedatum) en heeft altijd een waarde (ins_deel_aanmaak is altijd gevuld).
@@ -349,13 +355,17 @@ AS
                      SELECT m.ins_deel_key,
                             m.ins_srtcontrole_key,
                             NULL ins_deelsrtcontrole_datum,
+                            m.ins_srtcontrole_mode,
                             m.ins_srtcontrole_eenheid,
                             m.ins_srtcontrole_periode,
-                            ADD_MONTHS(m.volgendedatum,
-                                       CASE
-                                       WHEN m.ins_srtcontrole_eenheid = 3 THEN m.ins_srtcontrole_periode
-                                       ELSE m.ins_srtcontrole_periode * 12
-                                       END),
+                            m.ins_srtcontrole_bits,
+                            fac.nextcyclusdate(m.volgendedatum,
+                                               m.ins_srtcontrole_mode,
+                                               m.ins_srtcontrole_eenheid,
+                                               m.ins_srtcontrole_periode,
+                                               m.ins_srtcontrole_bits,
+                                               1,
+                                               0),
                             m.discipline,
                             m.soort,
                             m.groep,
@@ -379,13 +389,14 @@ AS
                             m.vervaldatum,
                             NULL ins_deelsrtcontrole_key
                        FROM comps m
-                      WHERE ADD_MONTHS(m.volgendedatum,
-                                       CASE
-                                       WHEN m.ins_srtcontrole_eenheid = 3 THEN m.ins_srtcontrole_periode
-                                       ELSE m.ins_srtcontrole_periode * 12
-                                       END) <=
-                            TRUNC(ADD_MONTHS(SYSDATE, 24), 'YYYY')
-                                                                  )
+                      WHERE TRUNC(fac.nextcyclusdate(m.volgendedatum,
+                                                     m.ins_srtcontrole_mode,
+                                                     m.ins_srtcontrole_eenheid,
+                                                     m.ins_srtcontrole_periode,
+                                                     m.ins_srtcontrole_bits,
+                                                     1,
+                                                     0), 'YYYY') <=
+                            TRUNC(ADD_MONTHS(SYSDATE, 24), 'YYYY'))
             SELECT *
               FROM comps) ig
      WHERE (ig.vervaldatum IS NULL

EXC/EXC_PAC.SRC

@@ -1580,14 +1580,6 @@ AS
                            --               AND res_rsv_ruimte_externnr NOT LIKE '%|'||rec.recur_id||'|%'
                            AND res_rsv_ruimte_verwijder IS NULL;
 
-                    -- Succesvol afgerond; zet vlag.
-                    -- TODO: komen we hier ook als er iets mis ging met de bezoekers?
-                    UPDATE exc_import
-                       SET gelukt = 1
-                     WHERE     appt_id || '|' || recur_id =
-                               rec.appt_id || '|' || rec.recur_id
-                           AND gelukt IS NULL;
-
                     -- Er bestaan al deelreserveringen voor andere occurences van deze recurring appointment
                     -- Deelreservering binnen de bijbehorende res_reservering aanmaken
                     IF (v_count > 0)
@@ -1715,6 +1707,14 @@ AS
                     v_errorhint := 'Toevoegen bezoekers';
                     exc.importBezoekers(p_import_key, rec.appt_id, rec.recur_id, v_rsv_ruimte_key, date_interval_start, date_interval_end);
 
+                    -- Succesvol afgerond; zet vlag.
+                    -- TODO: komen we hier ook als er iets mis ging met de bezoekers?
+                    UPDATE exc_import
+                       SET gelukt = 1
+                     WHERE     appt_id || '|' || recur_id =
+                               rec.appt_id || '|' || rec.recur_id
+                           AND gelukt IS NULL;
+
                     IF (v_debug)
                     THEN
                         fac.imp_writelog (p_import_key,

FAC/FAC_INI.SRC

@@ -2473,6 +2473,7 @@ DEF_IMPORT('WEB_PRSSYS', 'MLDAFMTXT',           'FIP: Afmeldteksten',
 DEF_IMPORT('WEB_PRSSYS', 'BEDRIJFADRES',        'FIP: Aanvullen technische bedrijfadressen',               'FIP: Add company technical addresses')
 DEF_IMPORT('WEB_LCLSYS', 'TRANSLATION',         'Import of FACILITOR translation file',                    'Import of FACILITOR translation file')
 DEF_IMPORT('WEB_PRSSYS', 'KPN',                 'FIP: Aanmaken/bijwerken van kostenplaatsen',              'FIP: Create/Update cost centres')
+DEF_IMPORT('WEB_PRSSYS', 'KOSTENSOORT',         'FIP: Aanmaken/bijwerken van kostensoorten',               'FIP: Create/Update cost categories')
 
 DEF_IMPORT('WEB_FACTAB', 'GENERICCSV',          'FIP: Generieke CSV import',                               'FIP: Generic CSV import')
 

FAC/FAC_LCL.SRC

@@ -669,7 +669,7 @@ FAC_LCL('frm_wplistframe', 'Werkplekken', 'Workplaces')
 FAC_LCL('frm_prsframe', 'Persoon', 'Person')
 FAC_LCL('frm_prsbedrijfframe', 'Relatie', 'Company')
 FAC_LCL('frm_perslistframe', 'Personen', 'Persons')
-FAC_LCL('frm_afdlistframe', 'Afdelingen', 'Departments')
+FAC_LCL('frm_afdlistframe', 'Ruimtegebruik', 'Room usage')
 FAC_LCL('frm_deellistframe', 'Objecten', 'Objects')
 FAC_LCL('frm_cntlistframe', 'Contracten', 'Contracts')
 FAC_LCL('frm_algverdframe', 'Verdieping', 'Floor')
@@ -753,7 +753,7 @@ FAC_LCL('lcl_prs_dienst_scope_voor_bedrijf', 'Voor opdrachtgever/bedrijf', 'For
 FAC_LCL('lcl_prs_dienst_scope_loc', 'Plaats-scope', 'Location-scope')
 FAC_LCL('lcl_prs_dienst_scope_loc_hint', 'Heeft deze Dienst-Relatie een plaats-scope', 'Does this Service-Company have a location-scope')
 FAC_LCL('lcl_prs_dienst_scope_sla', 'Dienst/Relatie/Plaats-specifieke uitvoertijd', 'Service/Company/Location-specific processing time')
-FAC_LCL('lcl_prs_dienst_scope_autoorder', 'Automatische opdracht', 'Automatic order')
+FAC_LCL('lcl_prs_dienst_scope_autoorder', 'Uitsluiten van automatische opdracht', 'Exclude from automatic order')
 FAC_LCL('lcl_prs_code', 'Code', 'Code')
 FAC_LCL('lcl_kpi_definitie_frame', 'KPI definities', 'KPI definitions')
 FAC_LCL('lcl_kpi_score_frame', 'KPI scores', 'KPI scores')
@@ -1577,6 +1577,7 @@ FAC_LCL('lcl_mldclose_after_opdrclose', 'Voordat je deze melding kunt afmelden z
 FAC_LCL('lcl_orders_hint', 'Accepteer deze melding en maak direct een opdracht aan', 'Accept this call and create an order directly')
 FAC_LCL('lcl_orders_no_contractor', 'Opdracht niet automatisch aangemaakt omdat uitvoerende niet bepaald kon worden', '(Auto) order has not been created because no contractor could be determined')
 FAC_LCL('lcl_orders_no_account', 'Opdracht niet automatisch aangemaakt omdat kostenplaats niet bepaald kon worden', '(Auto) order has not been created because no cost centre could be determined')
+FAC_LCL('lcl_orders_no_ordertype', 'Opdracht niet automatisch aangemaakt omdat opdrachttype niet bepaald kon worden', '(Auto) order has not been created because no order type could be determined')
 FAC_LCL('lcl_bes_hint', 'Accepteer deze melding en maak direct een bestelling aan', 'Accept this call and create a purchase order directly')
 FAC_LCL('lcl_continue_hint', 'Maak een vervolgmelding aan', 'Create a follow-up call')
 FAC_LCL('lcl_link_hint', 'De behandeling van deze melding via een andere melding laten verlopen', 'Process this call through another call')
@@ -1794,7 +1795,9 @@ FAC_LCL('lcl_res_setup_time_warning', 'Let op: voor verschillende opstellingen k
 FAC_LCL('lcl_res_status_dirty', 'ONGELDIG', 'INVALID')
 FAC_LCL('lcl_res_rsv_kosten', 'Totale kosten', 'Total costs')
 FAC_LCL('lcl_res_from_actual', 'Gearriveerd', 'Arrived')
-FAC_LCL('lcl_res_rsv_deel_end_premature', 'Je meldt deze reservering eerder af dan de geplande eindtijd.' || CHR(10) || 'Wil je de gereserveerde voorzieningen ook direct al vrijgeven?', '')
+FAC_LCL('lcl_res_rsv_deel_end_premature', 'Je meldt deze reservering eerder af dan de geplande eindtijd.' || CHR(10) || 'Wil je de gereserveerde voorziening(en) ook direct al vrijgeven?', 'You are closing this reservation before its planned end time.' || CHR(10) || 'Would you like to release the reserved equipment immediately?')
+FAC_LCL('lcl_res_rsv_art_name', 'Voor vrije artikelnaam moet een naam worden ingevuld.', 'For a free article name, a name is mandatory.')
+FAC_LCL('lcl_res_rsv_art_count', 'Aantal artikelen mag niet 0 zijn.', 'The number of Articles cannot be 0.')
 FAC_LCL('lcl_res_plan_tt_eerder', 'Dag eerder', 'Day before')
 FAC_LCL('lcl_res_plan_tt_later', 'Dag later', 'Day later')
 FAC_LCL('lcl_res_plan_tt_meer_eerder', 'Dag erbij', 'Extra day')
@@ -2065,6 +2068,7 @@ FAC_LCL('lcl_msg_search', 'Berichten', 'Messages')
 FAC_LCL('lcl_message', 'Bericht', 'Message')
 FAC_LCL('lcl_msg_new', 'Nieuw bericht', 'New message')
 FAC_LCL('lcl_msg_no_messages', 'Geen berichten', 'No messages')
+FAC_LCL('lcl_msg_no_messages_first', 'Er zijn nu geen berichten, maar als er iets nieuws voor je is, kun je dat hier terugvinden!', 'There are no messages right now, if any messages pop up you can find them right here!')
 FAC_LCL('lcl_msg_reply', 'Antwoord', 'Reply')
 FAC_LCL('lcl_msg_replies', 'Antwoorden', 'Replies')
 FAC_LCL('lcl_msg_del_concept', 'Concept verwijderen?', 'Delete concept?')
@@ -5349,6 +5353,7 @@ FAC_LCL('lcl_prs_opvolger', 'Opvolger', 'Successor')
 FAC_LCL('lcl_prs_upload_foto', 'Foto upload', 'Photo upload')
 FAC_LCL('lcl_prs_in_guide', 'Toon in gids', 'Show in phonebook')
 FAC_LCL('lcl_prs_gdprstats', 'Statistieken AVG-gerelateerde gegevens', 'Statistiscs GDPR-related data')
+FAC_LCL('lcl_prs_ruimteafdeling', 'Ruimtegebruik', 'Room usage')
 FAC_LCL('lcl_prs_ruimteafdeling_new', 'Ruimtegebruik: afdeling {0} is toegevoegd', 'Room usage: Department {0} has been added')
 FAC_LCL('lcl_prs_ruimteafdeling_upd', 'Ruimtegebruik {0} is gewijzigd', 'Room usage {0} has been changed')
 FAC_LCL('lcl_prs_ruimteafdeling_del', 'Ruimtegebruik: afdeling {0} is verwijderd', 'Room usage: Department {0} has been deleted')
@@ -7145,7 +7150,7 @@ FAC_LCL('ins_srtcontrole_kosten2', 'Kosten 2', 'Price 2')
 FAC_LCL('ins_srtcontrole_kosten3', 'Kosten 3', 'Price 3')
 FAC_LCL('ins_srtcontrole_percentage', 'Betreft(%)', 'Percentage')
 FAC_LCL('ins_srtcontrole_opmerking', 'Opmerking', 'Remark')
-FAC_LCL('ins_srtcontrole_opmerking_text', 'Opmerkingstekst', 'Comment text')
+FAC_LCL('ins_srtcontrole_opmerking_text', 'Afhandelingstekst verplicht bij', 'Comment text mandatory when')
 FAC_LCL('lcl_ins_optioneel', 'Optioneel', 'Optional')
 FAC_LCL('lcl_ins_verplicht', 'Verplicht', 'Mandatory')
 FAC_LCL('ins_srtcontrole_delete', 'Wilt u dit record verwijderen?', 'Are you sure you want to delete this record?')

FAC/FAC_PACANO.SRC

@@ -758,7 +758,7 @@ CREATE OR REPLACE PACKAGE BODY ano AS
                                                                                                WHERE nc.fac_srtnotificatie_code = 'RESANO'
                                                                                              )
                                                         )
-                   ) BETWEEN to_date('01-01-2023','dd-mm-yyyy') AND to_date('01-07-2023','dd-mm-yyyy')
+                   ) BETWEEN p_startdatum AND p_einddatum
                AND (  r.res_status_bo_key IN (5,6)
                    OR r.res_rsv_ruimte_verwijder IS NOT NULL
                    )
@@ -864,6 +864,7 @@ CREATE OR REPLACE PACKAGE BODY ano AS
         END IF;
     END;
 
+    -- Bitje 1 gezet: PRSSYS wachtwoorden (ook) wissen
     PROCEDURE anonymizefull(p_flags NUMBER DEFAULT 65535)
     AS
     BEGIN
@@ -897,8 +898,18 @@ CREATE OR REPLACE PACKAGE BODY ano AS
            SET prs_perslid_oslogin2='O' || TO_CHAR(prs_perslid_key)
          WHERE prs_perslid_oslogin2 IS NOT NULL;
 
-        UPDATE prs_perslid
-           SET prs_perslid_wachtwoord_hash = null;
+        IF BITAND(p_flags, 1) = 1 THEN
+            UPDATE prs_perslid
+               SET prs_perslid_wachtwoord_hash = null;
+        ELSE -- PRSSYS ingemoeid laten
+            UPDATE prs_perslid
+               SET prs_perslid_wachtwoord_hash = null
+             WHERE prs_perslid_key NOT IN
+                       (SELECT fw.prs_perslid_key
+                          FROM fac_v_webgebruiker fw, fac_functie f
+                         WHERE fw.fac_functie_key = f.fac_functie_key
+                           AND fac_functie_code = 'WEB_PRSSYS');
+        END IF;
 
         UPDATE prs_perslid
            SET prs_perslid_apikey = 'TEST_' || dbms_utility.get_hash_value(prs_perslid_apikey  , 0, power(2,24))
@@ -1044,7 +1055,14 @@ CREATE OR REPLACE PACKAGE BODY ano AS
          WHERE mld_ins_discipline_key IN (SELECT ins_discipline_key
                                             FROM mld_discipline);
 
-        ano.table_column('mld_opdr',           'mld_opdr_contactpersoon',        'naam');
+        BEGIN
+            EXECUTE IMMEDIATE 'ALTER TRIGGER mld_t_mld_opdr_B_IU DISABLE';
+            ano.table_column('mld_opdr', 'mld_opdr_contactpersoon', 'naam');
+            EXECUTE IMMEDIATE 'ALTER TRIGGER mld_t_mld_opdr_B_IU ENABLE';
+        EXCEPTION
+            WHEN OTHERS THEN
+                EXECUTE IMMEDIATE 'ALTER TRIGGER mld_t_mld_opdr_B_IU ENABLE';
+        END;
         ano.table_column('fin_verkoopfactuur', 'prs_debiteur_naam',              'naam');
         ano.table_column('alg_gebouw',         'alg_gebouw_email',               'email');
         ano.table_column('alg_locatie',        'alg_locatie_email',              'email');

FAC/FAC_PACF.SRC

@@ -145,6 +145,18 @@ BEGIN
 END;
 /
 
+CREATE OR REPLACE FUNCTION fac_check_import_header(p_field IN VARCHAR2, p_value IN VARCHAR2) RETURN BOOLEAN
+IS
+    v_result  BOOLEAN := False;
+BEGIN
+    IF ( UPPER (REPLACE(p_field, '_',' ')) = p_value)
+    THEN
+        v_result := True;
+    END IF;
+    RETURN v_result;
+END;
+/
+
 -- Geen PROCEDURE fac_update_genericcsv, dat gebeurt in de praktijk met een custom once script
 
 -- Procedures om catalogi in te lezen en te verwerken
@@ -7005,11 +7017,11 @@ BEGIN
          -- Ik negeer alles totdat ik een geldige header gepasseerd ben
          IF (header_is_valid = 0)
          THEN
-            IF     UPPER (v_srtdiscipline_omschrijving) = 'VAKGROEPTYPE'
-               AND UPPER (v_discipline_omschrijving)    = 'VAKGROEP'
-               AND UPPER (v_stdmelding_omschrijving)    = 'STANDAARDMELDING'
-               AND UPPER (v_stdmelding_uitvoertijd4)    = 'UITVOERTIJD LAAG'
-               AND UPPER (v_stdmelding_slabewaken)      = 'SLA BEWAKEN'
+            IF     fac_check_import_header(v_srtdiscipline_omschrijving, 'VAKGROEPTYPE')
+               AND fac_check_import_header(v_discipline_omschrijving,    'VAKGROEP')
+               AND fac_check_import_header(v_stdmelding_omschrijving,    'STANDAARDMELDING')
+               AND fac_check_import_header(v_stdmelding_uitvoertijd4,    'UITVOERTIJD LAAG')
+               AND fac_check_import_header(v_stdmelding_slabewaken,      'SLA BEWAKEN')
             THEN
                header_is_valid := 1;
             END IF;
@@ -13385,38 +13397,38 @@ BEGIN
             END IF;
             IF (p_checkheader = 2)
             THEN
-                IF     UPPER (v_prs_bedrijf_naam) = 'BEDRIJFSNAAM'
-                   AND UPPER (v_prs_leverancier_nr) = 'LEVERANCIERNUMMER'
-                   AND UPPER (v_prs_bedrijf_bezoek_adres) = 'BEZOEK ADRES'
-                   AND UPPER (v_prs_bedrijf_bezoek_postcode) = 'BEZOEK POSTCODE'
-                   AND UPPER (v_prs_bedrijf_bezoek_plaats) = 'BEZOEK PLAATS'
-                   AND UPPER (v_prs_bedrijf_bezoek_land) = 'BEZOEK LAND'
-                   AND UPPER (v_prs_bedrijf_post_adres) = 'POST ADRES'
-                   AND UPPER (v_prs_bedrijf_post_postcode) = 'POST POSTCODE'
-                   AND UPPER (v_prs_bedrijf_post_plaats) = 'POST PLAATS'
-                   AND UPPER (v_prs_bedrijf_post_land) = 'POST LAND'
-                   AND UPPER (v_prs_bedrijf_telefoon) = 'BEDRIJF TELEFOON'
-                   AND UPPER (v_prs_bedrijf_fax) = 'BEDRIJF FAX'
-                   AND UPPER (v_prs_bedrijf_email) = 'BEDRIJF EMAIL'
-                   AND UPPER (v_prs_bedrijf_contact_persoon) = 'CONTACT PERSOON'
-                   AND UPPER (v_prs_bedrijf_contact_telefoon) = 'CONTACT TELEFOON'
-                   AND UPPER (v_prs_bedrijf_contact_fax) = 'CONTACT FAX'
-                   AND UPPER (v_prs_bedrijf_xsl) = 'BEDRIJF XSL'
-                   AND UPPER (v_prs_bedrijf_mldorder_adres) = 'BEDRIJF ORDERADRES'
-                   AND UPPER (v_prs_bedrijf_leverancier) = 'LEVERANCIER'
-                   AND UPPER (v_prs_bedrijf_uitvoerende) = 'UITVOERENDE'
-                   AND UPPER (v_prs_bedrijf_contract) = 'CONTRACTANT'
-                   AND UPPER (v_prs_bedrijf_huurder) = 'HUURDER'
-                   AND UPPER (v_prs_bedrijf_ingids) = 'TOONINGIDS'
-                   AND UPPER (v_prs_bedrijf_uurloon) = 'UURLOON'
-                   AND UPPER (v_prs_overeenkomst_nr) = 'OVEREENKOMSTNUMMER'
-                   AND UPPER (v_prs_overeenkomst_datum) = 'OVEREENKOMSTDATUM'
-                   AND UPPER (v_prs_bedrijf_opmerking) = 'OPMERKING'
-                   AND UPPER (v_prs_dienst_omschrijving) = 'DIENST'
-                   AND UPPER (v_alg_locatie_code) = 'LOCATIECODE'
-                   AND UPPER (v_alg_gebouw_code) = 'GEBOUWCODE'
-                   AND UPPER (v_prs_relatietype) = 'RELATIETYPE'
-                          THEN
+                IF     fac_check_import_header(v_prs_bedrijf_naam,             'BEDRIJFSNAAM')
+                   AND fac_check_import_header(v_prs_leverancier_nr,           'LEVERANCIERNUMMER')
+                   AND fac_check_import_header(v_prs_bedrijf_bezoek_adres,     'BEZOEK ADRES')
+                   AND fac_check_import_header(v_prs_bedrijf_bezoek_postcode,  'BEZOEK POSTCODE')
+                   AND fac_check_import_header(v_prs_bedrijf_bezoek_plaats,    'BEZOEK PLAATS')
+                   AND fac_check_import_header(v_prs_bedrijf_bezoek_land,      'BEZOEK LAND')
+                   AND fac_check_import_header(v_prs_bedrijf_post_adres,       'POST ADRES')
+                   AND fac_check_import_header(v_prs_bedrijf_post_postcode,    'POST POSTCODE')
+                   AND fac_check_import_header(v_prs_bedrijf_post_plaats,      'POST PLAATS')
+                   AND fac_check_import_header(v_prs_bedrijf_post_land,        'POST LAND')
+                   AND fac_check_import_header(v_prs_bedrijf_telefoon,         'BEDRIJF TELEFOON')
+                   AND fac_check_import_header(v_prs_bedrijf_fax,              'BEDRIJF FAX')
+                   AND fac_check_import_header(v_prs_bedrijf_email,            'BEDRIJF EMAIL')
+                   AND fac_check_import_header(v_prs_bedrijf_contact_persoon,  'CONTACT PERSOON')
+                   AND fac_check_import_header(v_prs_bedrijf_contact_telefoon, 'CONTACT TELEFOON')
+                   AND fac_check_import_header(v_prs_bedrijf_contact_fax,      'CONTACT FAX')
+                   AND fac_check_import_header(v_prs_bedrijf_xsl,              'BEDRIJF XSL')
+                   AND fac_check_import_header(v_prs_bedrijf_mldorder_adres,   'BEDRIJF ORDERADRES')
+                   AND fac_check_import_header(v_prs_bedrijf_leverancier,      'LEVERANCIER')
+                   AND fac_check_import_header(v_prs_bedrijf_uitvoerende,      'UITVOERENDE')
+                   AND fac_check_import_header(v_prs_bedrijf_contract,         'CONTRACTANT')
+                   AND fac_check_import_header(v_prs_bedrijf_huurder,          'HUURDER')
+                   AND fac_check_import_header(v_prs_bedrijf_ingids,           'TOONINGIDS')
+                   AND fac_check_import_header(v_prs_bedrijf_uurloon,          'UURLOON')
+                   AND fac_check_import_header(v_prs_overeenkomst_nr,          'OVEREENKOMSTNUMMER')
+                   AND fac_check_import_header(v_prs_overeenkomst_datum,       'OVEREENKOMSTDATUM')
+                   AND fac_check_import_header(v_prs_bedrijf_opmerking,        'OPMERKING')
+                   AND fac_check_import_header(v_prs_dienst_omschrijving,      'DIENST')
+                   AND fac_check_import_header(v_alg_locatie_code,             'LOCATIECODE')
+                   AND fac_check_import_header(v_alg_gebouw_code,              'GEBOUWCODE')
+                   AND fac_check_import_header(v_prs_relatietype,              'RELATIETYPE')
+                THEN
                    header_is_valid := 1;
                 END IF;
             END IF;
@@ -14692,21 +14704,21 @@ BEGIN
          -- Ik negeer alles totdat ik een geldige header ben gepasseerd.
          IF (header_is_valid = 0)
          THEN
-            IF UPPER (v_prs_bedrijf_naam) = 'BEDRIJFSNAAM'
-               AND UPPER (v_prs_leverancier_nr) = 'LEVERANCIERNUMMER'
-               AND UPPER (v_prs_bedrijfadres_type) = 'KANAAL'
-               AND UPPER (v_mld_typeopdr_omschrijving) = 'OPDRACHTTYPE'
-               AND UPPER (v_prs_bedrijfadres_url) = 'ADRES'
-               AND UPPER (v_prs_bedrijfadres_ordermode) = 'ORDERMODE'
-               AND UPPER (v_prs_bedrijfadres_certificate) = 'CERTIFICAAT'
-               AND UPPER (v_prs_bedrijfadres_xsl) = 'XSL TEMPLATE'
-               AND UPPER (v_prs_bedrijfadres_ext) = 'EXTENSIE'
-               AND UPPER (v_prs_bedrijfadres_attachfile) = 'VASTE BIJLAGE'
-               AND UPPER (v_prs_bedrijfadres_username) = 'LOGIN'
-               AND UPPER (v_prs_bedrijfadres_password) = 'WACHTWOORD'
-               AND UPPER (v_prs_bedrijfadres_sender) = 'AFZENDER'
-               AND UPPER (v_prs_bedrijfadres_lockuser) = 'VASTE GEBRUIKER'
-               AND UPPER (v_prs_bedrijfadres_lockexpire) = 'EXPIRE DAYS'
+            IF     fac_check_import_header(v_prs_bedrijf_naam,             'BEDRIJFSNAAM')
+               AND fac_check_import_header(v_prs_leverancier_nr,           'LEVERANCIERNUMMER')
+               AND fac_check_import_header(v_prs_bedrijfadres_type,        'KANAAL')
+               AND fac_check_import_header(v_mld_typeopdr_omschrijving,    'OPDRACHTTYPE')
+               AND fac_check_import_header(v_prs_bedrijfadres_url,         'ADRES')
+               AND fac_check_import_header(v_prs_bedrijfadres_ordermode,   'ORDERMODE')
+               AND fac_check_import_header(v_prs_bedrijfadres_certificate, 'CERTIFICAAT')
+               AND fac_check_import_header(v_prs_bedrijfadres_xsl,         'XSL TEMPLATE')
+               AND fac_check_import_header(v_prs_bedrijfadres_ext,         'EXTENSIE')
+               AND fac_check_import_header(v_prs_bedrijfadres_attachfile,  'VASTE BIJLAGE')
+               AND fac_check_import_header(v_prs_bedrijfadres_username,    'LOGIN')
+               AND fac_check_import_header(v_prs_bedrijfadres_password,    'WACHTWOORD')
+               AND fac_check_import_header(v_prs_bedrijfadres_sender,      'AFZENDER')
+               AND fac_check_import_header(v_prs_bedrijfadres_lockuser,    'VASTE GEBRUIKER')
+               AND fac_check_import_header(v_prs_bedrijfadres_lockexpire,  'EXPIRE DAYS')
             THEN
                header_is_valid := 1;
             END IF;
@@ -18996,14 +19008,14 @@ BEGIN
            -- Ik negeer alles totdat ik een geldige header ben gepasseerd.
            IF (header_is_valid = 0)
            THEN
-               IF     UPPER (v_ins_discipline_omschrijving) = 'DISCIPLINEOMSCHRIJVING'
-                  AND UPPER (v_ins_srtgroep_omschrijving) = 'GROEPSOORTOMSCHRIJVING'
-                  AND UPPER (v_ins_srtdeel_code) = 'OBJECTSOORTCODE'
-                  AND UPPER (v_ins_srtcontrole_omschrijving) = 'CONTROLE OMSCHRIJVING'
-                  AND UPPER (v_ins_srtcontrole_info) = 'CONTROLE INFORMATIE'
-                  AND UPPER (v_ins_srtcontrole_periode) = 'CONTROLE PERIODE'
-                  AND UPPER (v_ins_srtcontrole_eenheid) = 'EENHEID'
-                  AND UPPER (v_ins_srtcontrole_mode) = 'CONTROLE MODE'
+               IF     fac_check_import_header(v_ins_discipline_omschrijving,  'DISCIPLINEOMSCHRIJVING')
+                  AND fac_check_import_header(v_ins_srtgroep_omschrijving,    'GROEPSOORTOMSCHRIJVING')
+                  AND fac_check_import_header(v_ins_srtdeel_code,             'OBJECTSOORTCODE')
+                  AND fac_check_import_header(v_ins_srtcontrole_omschrijving, 'CONTROLE OMSCHRIJVING')
+                  AND fac_check_import_header(v_ins_srtcontrole_info,         'CONTROLE INFORMATIE')
+                  AND fac_check_import_header(v_ins_srtcontrole_periode,      'CONTROLE PERIODE')
+                  AND fac_check_import_header(v_ins_srtcontrole_eenheid,      'EENHEID')
+                  AND fac_check_import_header(v_ins_srtcontrole_mode,         'CONTROLE MODE')
                THEN
                    header_is_valid := 1;
                END IF;

FAC/FAC_PACFLEX.SRC

@@ -705,7 +705,8 @@
                                -20001,
                                   'Error parsing flex-expression ' || pmodule || ' kenmerkkey:' || expr.fac_kenmwaarden_kenmerk_key
                                   || CHR(10) || SQLERRM
-                                  || CHR(10) || l_sql_exprval);
+                                  || CHR(10) || l_sql_exprval
+                                  || CHR(10) || 'Original: ' || l_expr);
                END;
                --DBMS_SQL.describe_columns(l_cursor_exprval, l_colcnt, l_desctab);
                IF expr.fac_kenmwaarden_kenmerktype = 'N'
@@ -714,9 +715,6 @@
                ELSIF expr.fac_kenmwaarden_kenmerktype = 'V'
                THEN
                   DBMS_SQL.define_column(l_cursor_exprval, 1, l_exprval_num);
-               ELSIF expr.fac_kenmwaarden_kenmerktype = 'D'
-               THEN
-                  DBMS_SQL.define_column(l_cursor_exprval, 1, l_exprval_date);
                ELSE
                   DBMS_SQL.define_column(l_cursor_exprval, 1, l_exprval, 4000);
                END IF;
@@ -808,10 +806,6 @@
                THEN
                   DBMS_SQL.column_value (l_cursor_exprval, 1, l_exprval_num);
                   l_exprval := TO_CHAR(l_exprval_num);
-               ELSIF expr.fac_kenmwaarden_kenmerktype = 'D'
-               THEN
-                  DBMS_SQL.column_value (l_cursor_exprval, 1, l_exprval_date);
-                  l_exprval := TO_CHAR(l_exprval_date, 'DD-MM-YYYY');
                ELSE
                   DBMS_SQL.column_value (l_cursor_exprval, 1, l_exprval);
                END IF;
@@ -871,7 +865,8 @@
                               -20001,
                                  'Error parsing flex-expression ' || pmodule || ' kenmerkkey:' || expr.fac_kenmwaarden_kenmerk_key
                                  || CHR(10) || SQLERRM
-                                 || CHR(10) || l_sql_exprval);
+                                 || CHR(10) || l_sql_exprval
+                                 || CHR(10) || 'Original: ' || l_expr);
               END;
                --DBMS_SQL.describe_columns(l_cursor_exprval, l_colcnt, l_desctab);
                DBMS_SQL.define_column(l_cursor_exprval, 1, l_exprval_num); -- onze expressie is altijd numeriek

FAC/FAC_PACX.SRC

@@ -6919,6 +6919,8 @@ AS
       CURSOR c1
       IS
            SELECT k.bes_kenmerk_key,
+                  k.bes_kenmerk_code,
+                  s.bes_srtkenmerk_code,
                   COALESCE (
                       lcl.x ('bes_kenmerk_omschrijving', k.bes_kenmerk_key, bes_kenmerk_omschrijving),
                       lcl.x ('bes_srtkenmerk_omschrijving', s.bes_srtkenmerk_key, bes_srtkenmerk_omschrijving)) bes_kenmerk_omschrijving,
@@ -6969,19 +6971,19 @@ AS
                                  p_key,
                                  rec1.bes_kenmerk_key);
 
-         createxmltagvalueattributes ('kenmerk',
-                                      'naam',
-                                      rec1.bes_kenmerk_omschrijving,
-                                      'type',
-                                      rec1.bes_srtkenmerk_kenmerktype,
-                                      'volgnummer',
-                                      rec1.volgnummer,
-                                      'key',
-                                      rec1.bes_kenmerk_key,
-                                      'dimensie',
-                                      rec1.dimensie,
-                                      rec1.fac_kenmerkdomein_key,
-                                      v_kenmerk_waarde);
+         createxmltagvalueattributes9 ('kenmerk',
+                                       'kenmerkcode',    rec1.bes_kenmerk_code,
+                                       'srtkenmerkcode', rec1.bes_srtkenmerk_code,
+                                       'naam',           rec1.bes_kenmerk_omschrijving,
+                                       'type',           rec1.bes_srtkenmerk_kenmerktype,
+                                       'volgnummer',     rec1.volgnummer,
+                                       'key',            rec1.bes_kenmerk_key,
+                                       'dimensie',       rec1.dimensie,
+                                       NULL, NULL,
+                                       NULL, NULL,
+                                       rec1.fac_kenmerkdomein_key,
+                                       v_kenmerk_waarde
+                                      );
       END LOOP;
    END;
 

FAC/FAC_SET.SRC

@@ -401,7 +401,7 @@ DEFINE_SETTING('CNT', 0001, 'WEB_PRSSYS', 'cnt_contract_recent'
 DEFINE_SETTING('CNT', 0001, 'WEB_PRSSYS', 'cnt_contract_requestor_required'       , 'boolean'                     , 'false'                       , 'Set the contract requestor field as required (true) or optional (false)')
 DEFINE_SETTING('CNT', 0001, 'WEB_PRSSYS', 'cnt_enable_kostensoort'                , 'number'                      , '1'                           , 'can contract kostensoort be changed?')
 DEFINE_SETTING('CNT', 0001, 'WEB_PRSSYS', 'cnt_factuur_totaalmarge'               , 'number'                      , '0'                           , 'De toegestane marge op de totaal factuur (default 0)')
-DEFINE_SETTING('CNT', 0001, 'WEB_PRSSYS', 'cnt_inactivate_mode'                   , 'number'                      , '0'                           , 'inactivate contract with WEB_CNTMAN/WEB_CNTUSE read rights and WEB_CNTMSU rights (0) or with extra WEB_CNTMAN write rights (1)')
+DEFINE_SETTING('CNT', 0001, 'WEB_PRSSYS', 'cnt_inactivate_mode'                   , 'number'                      , '0'                           , 'inactivate contract with WEB_CNTMAN/WEB_CNTUSE read rights and WEB_CNTMSU rights (0) or with extra WEB_CNTMAN write rights (1) and WEB_CNTMAN may edit older, inactive contract versions (2)')
 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_rappel_abonnement'                 , 'number'                      , '3'                           , 'Rappel termijn van een abonnement contract')
 DEFINE_SETTING('CNT', 0001, 'WEB_PRSSYS', 'cnt_scopeverdeling'                    , 'number'                      , '0'                           , '0|1, cost distribution by scope weights 0=relative weight, 1=absolute amount')

FAC/FAC_VIE.SRC

@@ -1164,8 +1164,6 @@ AS
 CREATE_VIEW (fac_v_lcrap_fe_vs_key, 0)
 (
     tijdstip,
-    licensed_fe,
-    licensed_key,
     all_users,
     fe_users,
     key_users,
@@ -1177,8 +1175,6 @@ CREATE_VIEW (fac_v_lcrap_fe_vs_key, 0)
 BEQUEATH DEFINER
 AS
     SELECT tijdstip,
-           licensed_fe,
-           licensed_key,
            all_users,
            fe_users,
            key_users,
@@ -1188,10 +1184,6 @@ AS
            recent_login
       FROM (SELECT SYSDATE
                        tijdstip,
-                   fac.getsetting ('licensed_fe_users')
-                       licensed_fe,
-                   fac.getsetting ('licensed_key_users')
-                       licensed_key,
                    COUNT (*)
                        all_users,
                    COUNT (*) - SUM (DECODE (x.key_user, NULL, DECODE (x.xd_user, NULL, 0, 1), 1))
@@ -1286,22 +1278,6 @@ AS
                               FROM   fac_gebruikersgroep
                              WHERE   prs_perslid_key = p.prs_perslid_key);
 
-CREATE_VIEW(fac_v_lcrap_saldo, 1)
-(
-   tijdstip,
-   fe_saldo,
-   key_saldo,
-   fe_diff_pct,
-   key_diff_pct
-)
-AS
-   SELECT TO_CHAR (SYSDATE, 'dd-mm-yyyy hh24:mi:ss') tijdstip,
-          fac.getsetting ('licensed_fe_users') - fe_users fe_saldo,
-          fac.getsetting ('licensed_key_users') - key_users key_saldo,
-          DECODE(fac.getsetting ('licensed_fe_users'),0,100,100*(fac.getsetting ('licensed_fe_users') - fe_users)/fac.getsetting ('licensed_fe_users')),
-          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_usage_statistics, 0)
 AS
 SELECT SYSDATE

FAC/FAC_VIEEXP.SRC

@@ -83,11 +83,11 @@ SELECT b.prs_bedrijf_naam              Bedrijfsnaam
      , b.prs_bedrijf_contact_fax       Contact_fax
      , NULL                            Bedrijf_xsl
      , NULL                            Bedrijf_orderadres
-     , b.prs_bedrijf_leverancier       Leverancier
-     , b.prs_bedrijf_uitvoerende       Uitvoerende
-     , b.prs_bedrijf_contract          Contractant
-     , b.prs_bedrijf_huurder           Huurder
-     , b.prs_bedrijf_ingids            Tooningids
+     , CASE WHEN b.prs_bedrijf_leverancier = 1 THEN 'J' ELSE '' END Leverancier
+     , CASE WHEN b.prs_bedrijf_uitvoerende = 1 THEN 'J' ELSE '' END Uitvoerende
+     , CASE WHEN b.prs_bedrijf_contract    = 1 THEN 'J' ELSE '' END Contractant
+     , CASE WHEN b.prs_bedrijf_huurder     = 1 THEN 'J' ELSE '' END Huurder
+     , CASE WHEN b.prs_bedrijf_ingids      = 1 THEN 'J' ELSE '' END Tooningids
      , b.prs_bedrijf_uurloon           Uurloon
      , b.prs_overeenkomst_nr           Overeenkomstnummer
      , b.prs_overeenkomst_datum        Overeenkomstdatum

INS/INS_VIE.SRC

@@ -2383,20 +2383,19 @@ SELECT di.deel_key,
             END
        WHEN iscx.ins_srtcontrole_mode = 0 AND iscx.ins_srtcontrole_eenheid = 4
        THEN
-            CASE
-            WHEN BITAND(iscx.ins_srtcontrole_bits, 2048) = 2048 THEN INITCAP(lcl.l('lcl_maand_12'))
-            WHEN BITAND(iscx.ins_srtcontrole_bits, 1024) = 1024 THEN INITCAP(lcl.l('lcl_maand_11'))
-            WHEN BITAND(iscx.ins_srtcontrole_bits,  512) =  512 THEN INITCAP(lcl.l('lcl_maand_10'))
-            WHEN BITAND(iscx.ins_srtcontrole_bits,  256) =  256 THEN INITCAP(lcl.l('lcl_maand_9'))
-            WHEN BITAND(iscx.ins_srtcontrole_bits,  128) =  128 THEN INITCAP(lcl.l('lcl_maand_8'))
-            WHEN BITAND(iscx.ins_srtcontrole_bits,   64) =   64 THEN INITCAP(lcl.l('lcl_maand_7'))
-            WHEN BITAND(iscx.ins_srtcontrole_bits,   32) =   32 THEN INITCAP(lcl.l('lcl_maand_6'))
-            WHEN BITAND(iscx.ins_srtcontrole_bits,   16) =   16 THEN INITCAP(lcl.l('lcl_maand_5'))
-            WHEN BITAND(iscx.ins_srtcontrole_bits,    8) =    8 THEN INITCAP(lcl.l('lcl_maand_4'))
-            WHEN BITAND(iscx.ins_srtcontrole_bits,    4) =    4 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
+            TRIM(CASE WHEN BITAND(iscx.ins_srtcontrole_bits,    1) =    1 THEN INITCAP(lcl.l('lcl_maand_1'))  || ' ' END ||
+                 CASE WHEN BITAND(iscx.ins_srtcontrole_bits,    2) =    2 THEN INITCAP(lcl.l('lcl_maand_2'))  || ' ' END ||
+                 CASE WHEN BITAND(iscx.ins_srtcontrole_bits,    4) =    4 THEN INITCAP(lcl.l('lcl_maand_3'))  || ' ' END ||
+                 CASE WHEN BITAND(iscx.ins_srtcontrole_bits,    8) =    8 THEN INITCAP(lcl.l('lcl_maand_4'))  || ' ' END ||
+                 CASE WHEN BITAND(iscx.ins_srtcontrole_bits,   16) =   16 THEN INITCAP(lcl.l('lcl_maand_5'))  || ' ' END ||
+                 CASE WHEN BITAND(iscx.ins_srtcontrole_bits,   32) =   32 THEN INITCAP(lcl.l('lcl_maand_6'))  || ' ' END ||
+                 CASE WHEN BITAND(iscx.ins_srtcontrole_bits,   64) =   64 THEN INITCAP(lcl.l('lcl_maand_7'))  || ' ' END ||
+                 CASE WHEN BITAND(iscx.ins_srtcontrole_bits,  128) =  128 THEN INITCAP(lcl.l('lcl_maand_8'))  || ' ' END ||
+                 CASE WHEN BITAND(iscx.ins_srtcontrole_bits,  256) =  256 THEN INITCAP(lcl.l('lcl_maand_9'))  || ' ' END ||
+                 CASE WHEN BITAND(iscx.ins_srtcontrole_bits,  512) =  512 THEN INITCAP(lcl.l('lcl_maand_10')) || ' ' END ||
+                 CASE WHEN BITAND(iscx.ins_srtcontrole_bits, 1024) = 1024 THEN INITCAP(lcl.l('lcl_maand_11')) || ' ' END ||
+                 CASE WHEN BITAND(iscx.ins_srtcontrole_bits, 2048) = 2048 THEN INITCAP(lcl.l('lcl_maand_12')) || ' ' END
+                )
        END ins_srtcontrole_bits,
        iscx.ins_srtcontrole_kosten,
        iscx.ins_srtcontrole_kosten2,

MLD/MLD_LCL.SRC

@@ -212,6 +212,27 @@ DEFINE_LOCALEITEM(lcl_mld_vakgroep)
 DEFINE_LOCALEITEM(lcl_mld_subject)
 DEFINE_LOCALEITEM(lcl_mld_fe_newmelding_confirm)
 DEFINE_LOCALEITEM(lcl_menu_mld_fe_3)
+DEFINE_LOCALEITEM(frm_mldframe)
+DEFINE_LOCALEITEM(frm_mldworkflowframe)
+DEFINE_LOCALEITEM(frm_mldmldlistframe)
+DEFINE_LOCALEITEM(frm_opdrlistframe)
+DEFINE_LOCALEITEM(frm_mldbeslistframe)
+DEFINE_LOCALEITEM(frm_resframe)
+
+DEFINE_LOCALEITEM(lcl_mld_urgentie)
+DEFINE_LOCALEITEM(lcl_mld_impact)
+DEFINE_LOCALEITEM(lcl_mld_urgentie1)
+DEFINE_LOCALEITEM(lcl_mld_urgentie2)
+DEFINE_LOCALEITEM(lcl_mld_urgentie3)
+DEFINE_LOCALEITEM(lcl_mld_impact1)
+DEFINE_LOCALEITEM(lcl_mld_impact2)
+DEFINE_LOCALEITEM(lcl_mld_impact3)
+DEFINE_LOCALEITEM(lcl_mld_urgentie1_info)
+DEFINE_LOCALEITEM(lcl_mld_urgentie2_info)
+DEFINE_LOCALEITEM(lcl_mld_urgentie3_info)
+DEFINE_LOCALEITEM(lcl_mld_impact1_info)
+DEFINE_LOCALEITEM(lcl_mld_impact2_info)
+DEFINE_LOCALEITEM(lcl_mld_impact3_info)
 END_LOCALEITEMS()
 
 START_LOCALEITEMS('MLD_TYPEOPDR_KEY')

MLD/MLD_PAC.SRC

@@ -1623,7 +1623,6 @@ CREATE OR REPLACE PACKAGE BODY mld AS
    BEGIN
       BEGIN
          SELECT sm.mld_stdmelding_autoorder
-              , bdl.mld_autoorder
               , m.prs_perslid_key
               , sm.mld_stdmelding_key
               , mdp.mld_disc_params_opdr_kosten
@@ -1642,7 +1641,6 @@ CREATE OR REPLACE PACKAGE BODY mld AS
               , mdp.mld_disc_params_bestellimiet
               , m.mld_melding_conceptstatus
            INTO l_autoorder
-              , l_mld_autoorder
               , l_prs_perslid_key
               , l_mld_stdmelding_key
               , l_mld_disc_params_opdr_kosten
@@ -1665,17 +1663,10 @@ CREATE OR REPLACE PACKAGE BODY mld AS
               , ins_tab_discipline d
               , mld_disc_params mdp
               , prs_kostenplaats k
-              , prs_bedrijfdienstlocatie bdl
-              , prs_bedrijfadres ba
           WHERE m.mld_stdmelding_key = sm.mld_stdmelding_key
             AND sm.mld_ins_discipline_key = d.ins_discipline_key
             AND d.ins_discipline_key = mdp.mld_ins_discipline_key
             AND m.prs_kostenplaats_key = k.prs_kostenplaats_key(+)
-            AND bdl.alg_locatie_key = m.mld_alg_locatie_key
-            AND bdl.prs_dienst_key = sm.prs_dienst_key
-            AND bdl.prs_bedrijf_key = ba.prs_bedrijf_key(+)
-            AND ba.prs_bedrijfadres_type = 'O'
-            AND ba.prs_bedrijfadres_url IS NOT NULL
             AND m.mld_melding_key = p_melding_key;
       EXCEPTION
          WHEN NO_DATA_FOUND
@@ -1692,7 +1683,7 @@ CREATE OR REPLACE PACKAGE BODY mld AS
      END IF;
 
       -- Moet er bij deze melding automatisch een opdracht worden aangemaakt?
-      IF l_autoorder = 0 OR l_mld_autoorder = 0 OR l_conceptstatus <> 0
+      IF l_autoorder = 0 OR l_conceptstatus <> 0
       THEN
          -- No, done.
          RETURN;
@@ -1905,8 +1896,9 @@ CREATE OR REPLACE PACKAGE BODY mld AS
                   AND bdl.prs_dienst_key = l_prs_dienst_key
                   AND ((bdl.alg_gebouw_key = l_alg_gebouw_key
                      OR bdl.alg_gebouw_key IS NULL)
-                   AND (bdl.alg_locatie_key = l_mld_alg_locatie_key
-                     OR bdl.alg_locatie_key IS NULL));
+                  AND (bdl.alg_locatie_key = l_mld_alg_locatie_key
+                     OR bdl.alg_locatie_key IS NULL))
+                  AND bdl.mld_autoorder = 1;
             ELSIF l_mld_alg_locatie_key IS NOT NULL
             THEN
                SELECT MIN(bdl.prs_bedrijf_key) prs_bedrijf_key
@@ -1922,7 +1914,8 @@ CREATE OR REPLACE PACKAGE BODY mld AS
                 WHERE bdl.prs_bedrijf_key = b.prs_bedrijf_key
                   AND bdl.prs_dienst_key = l_prs_dienst_key
                   AND (bdl.alg_locatie_key = l_mld_alg_locatie_key
-                    OR bdl.alg_locatie_key IS NULL);
+                    OR bdl.alg_locatie_key IS NULL)
+                  AND bdl.mld_autoorder = 1;
             ELSE
                SELECT MIN(bdl.prs_bedrijf_key) prs_bedrijf_key
                     , COUNT(DISTINCT bdl.prs_bedrijf_key) aantal
@@ -1937,7 +1930,8 @@ CREATE OR REPLACE PACKAGE BODY mld AS
                 WHERE bdl.prs_bedrijf_key = b.prs_bedrijf_key
                   AND bdl.prs_dienst_key = l_prs_dienst_key
                   AND bdl.alg_gebouw_key IS NULL
-                  AND bdl.alg_locatie_key IS NULL; -- Bestaat er dan misschien maar 1 bedrijf voor deze dienst zonder loc/geb scope ?
+                  AND bdl.alg_locatie_key IS NULL
+                  AND bdl.mld_autoorder = 1; -- Bestaat er dan misschien maar 1 bedrijf voor deze dienst zonder loc/geb scope ?
             END IF;
             -- Indien dienst vereist en aantal is 0, dan is de dienst niet beschikbaar voor deze locatie/dit gebouw.
             -- Indien aantal groter is dan 0, dan kan ik geen goede keuze maken.

_UP/DB46to47.src

@@ -179,8 +179,8 @@ UPDATE res_rsv_ruimte
 
 -- Zo kan de procedure ze ook terugvinden
 UPDATE res_rsv_ruimte
-   SET res_rsv_ruimte_externnr2 = res_rsv_ruimte_externnr2 || '|'
- WHERE res_rsv_ruimte_externnr2 LIKE '##iCalUId##%'
+   SET res_rsv_ruimte_externnr = res_rsv_ruimte_externnr || '|'
+ WHERE res_rsv_ruimte_externnr LIKE '##iCalUId##%'
    AND res_rsv_ruimte_verwijder IS NULL;
 
 /////////////////////////////////////////////////////////////////////////////////////////// VGLD#81656
@@ -448,6 +448,12 @@ INSERT INTO fac_groeprechten(fac_groep_key,
    AND gr.ins_discipline_key = cdp.ctr_ins_discipline_key
    AND cdp.ctr_disc_params_ismjob = 0);
 
+/////////////////////////////////////////////////////////////////////////////////////////// YASK#81268
+DEF_IMPORT('WEB_PRSSYS', 'KOSTENSOORT',         'FIP: Aanmaken/bijwerken van kostensoorten',               'FIP: Create/Update cost categories')
+
+/////////////////////////////////////////////////////////////////////////////////////////// FCLT#82295
+DROP VIEW fac_v_lcrap_saldo;
+
 /////////////////////////////////////////////////////////////////////////////////////////// FCLT#00000
 
 REGISTERONCE('$Id$')