diff --git a/UWVA/uwva_misc.sql b/UWVA/uwva_misc.sql index ca3efb57e..6ea0f1d9e 100644 --- a/UWVA/uwva_misc.sql +++ b/UWVA/uwva_misc.sql @@ -15277,11 +15277,109 @@ AS ORDER BY datum, ins_deel_key; -- UWVA#61083: Bewaartermijnen/automatische schoning! +CREATE OR REPLACE VIEW uwva_v_rap_cnt_schoning +( + ins_discipline_key, + huur_jn, + contractsoort, + cnt_contract_key, + contractnr, + cnt_contract_omschrijving, + cnt_contract_looptijd_tot, + cnt_contract_status, + bes_bestelling_key +) +AS + WITH c + AS (SELECT c.ins_discipline_key, + c.cnt_contract_key, + c.cnt_contract_nummer_intern, + c.cnt_contract_versie, + c.cnt_contract_omschrijving, + c.cnt_contract_verwijder, + c.cnt_contract_looptijd_tot, + c.cnt_contract_status, + c.cnt_contract_mantel_key, + cp.cnt_alg_plaats_key, + cp.cnt_alg_plaats_code, + c.bes_bestelopdr_key + FROM cnt_contract c, cnt_contract_plaats cp + WHERE c.ins_discipline_key IN (198, 412) -- Huurcontracten/Mantel huurcontracten + AND c.cnt_contract_key = cp.cnt_contract_key(+)) + SELECT DISTINCT + c.ins_discipline_key, + 'J' huur_jn, + cd.ins_discipline_omschrijving, + c.cnt_contract_key, + c.cnt_contract_nummer_intern || DECODE (c.cnt_contract_versie, NULL, '', '.' || c.cnt_contract_versie) + contractnr, + c.cnt_contract_omschrijving, + c.cnt_contract_looptijd_tot, + c.cnt_contract_status, + (SELECT MAX (bbi.bes_bestelling_key) + FROM bes_bestelopdr_item boi, bes_bestelling_item bbi + WHERE boi.bes_bestelopdr_item_key = bbi.bes_bestelopdr_item_key + AND boi.bes_bestelopdr_key = c.bes_bestelopdr_key) bes_bestelling_key + FROM c, cnt_discipline cd + WHERE c.cnt_contract_looptijd_tot < TRUNC (ADD_MONTHS (SYSDATE, -120), 'yyyy') -- Verlopen > 10 jaar geleden + AND c.ins_discipline_key = cd.ins_discipline_key + AND NOT EXISTS -- Geen dossier-contract op dezelfde plaats <= 10 jaar geleden + (SELECT 1 + FROM c dc + WHERE dc.cnt_contract_verwijder IS NULL + AND dc.cnt_contract_looptijd_tot >= TRUNC (ADD_MONTHS (SYSDATE, -120), 'yyyy') + AND dc.cnt_alg_plaats_key = c.cnt_alg_plaats_key + AND dc.cnt_alg_plaats_code = c.cnt_alg_plaats_code) + AND NOT EXISTS -- Geen dossier-contract onder dezelfde mantel <= 10 jaar geleden + (SELECT 1 + FROM c dc + WHERE dc.cnt_contract_verwijder IS NULL + AND dc.cnt_contract_looptijd_tot >= TRUNC (ADD_MONTHS (SYSDATE, -120), 'yyyy') + AND dc.cnt_contract_mantel_key = c.cnt_contract_key) + AND NOT EXISTS -- Geen lopende facturen op contract! + (SELECT 1 + FROM fin_factuur + WHERE fin_factuur_verwijder IS NULL + AND fin_factuur_statuses_key IN (2, 3, 5, 6) -- Lopende factuur + AND cnt_contract_key = c.cnt_contract_key) + UNION ALL + SELECT DISTINCT + c.ins_discipline_key, + 'N' huur_jn, + cd.ins_discipline_omschrijving, + c.cnt_contract_key, + c.cnt_contract_nummer_intern || DECODE (c.cnt_contract_versie, NULL, '', '.' || c.cnt_contract_versie) + contractnr, + c.cnt_contract_omschrijving, + c.cnt_contract_looptijd_tot, + c.cnt_contract_status, + (SELECT MAX (bbi.bes_bestelling_key) + FROM bes_bestelopdr_item boi, bes_bestelling_item bbi + WHERE boi.bes_bestelopdr_item_key = bbi.bes_bestelopdr_item_key + AND boi.bes_bestelopdr_key = c.bes_bestelopdr_key) bes_bestelling_key + FROM cnt_contract c, cnt_discipline cd + WHERE c.cnt_contract_looptijd_tot < TRUNC (ADD_MONTHS (SYSDATE, -84), 'yyyy') -- Verlopen > 7 jaar geleden + AND c.ins_discipline_key = cd.ins_discipline_key + AND cd.ins_discipline_key NOT IN (198, 412) -- Huurcontracten/Mantel huurcontracten + AND NOT EXISTS -- Geen dossier-contract onder dezelfde mantel <= 7 jaar geleden + (SELECT 1 + FROM cnt_contract dc + WHERE dc.cnt_contract_verwijder IS NULL + AND dc.cnt_contract_looptijd_tot >= TRUNC (ADD_MONTHS (SYSDATE, -84), 'yyyy') + AND dc.cnt_contract_mantel_key = c.cnt_contract_key) + AND NOT EXISTS -- Geen lopende facturen op contract! + (SELECT 1 + FROM fin_factuur + WHERE fin_factuur_verwijder IS NULL + AND fin_factuur_statuses_key IN (2, 3, 5, 6) -- Lopende factuur + AND cnt_contract_key = c.cnt_contract_key); + -- TODO: Periodieke bestelaanvragen/opdrachten niet beschouwen? => Bij UWV niet gebruikt! CREATE OR REPLACE VIEW uwva_v_rap_bes_schoning ( jaar, - bes_bestelling_key + bes_bestelling_key, + contracten ) AS WITH b @@ -15297,45 +15395,56 @@ AS FROM bes_bestelling WHERE bes_bestelling_status IN (1, 6, 7, 8, 9) -- Gesloten bestelling AND bes_bestelling_datum < TRUNC (ADD_MONTHS (SYSDATE, -84), 'yyyy')) -- Aangemaakt > 7 jaar geleden - SELECT TO_CHAR (b.bes_bestelling_datum, 'yyyy') jaar, bes_bestelling_key - FROM b - WHERE 1 = 1 --b.gesloten < TRUNC (ADD_MONTHS (SYSDATE, -84), 'yyyy') -- Gesloten > 7 jaar geleden - AND bes_bestelling_retourvan_key IS NULL -- Alleen bron-bestelling (dus zonder de retouren) - --AND NOT EXISTS - -- (SELECT 1 - -- FROM bes_bestelling_item bbi, bes_bestelopdr_item boi, bes_bestelopdr bo - -- WHERE bbi.bes_bestelopdr_item_key = boi.bes_bestelopdr_item_key - -- AND boi.bes_bestelopdr_key = bo.bes_bestelopdr_key - -- AND bo.bes_bestelopdr_status IN (2, 3, 4, 5) -- Lopende bestelopdracht - -- AND bbi.bes_bestelling_key = b.bes_bestelling_key) - AND NOT EXISTS -- Geen later gewijzigde child-bestelopdrachten! - (SELECT 1 - FROM fac_tracking t, fac_srtnotificatie sn, bes_bestelopdr_item boi, bes_bestelling_item bbi - WHERE t.fac_tracking_datum > TRUNC (ADD_MONTHS (SYSDATE, -84), 'yyyy') - AND t.fac_srtnotificatie_key = sn.fac_srtnotificatie_key - AND sn.fac_srtnotificatie_xmlnode = 'bestelopdracht' - AND t.fac_tracking_refkey = boi.bes_bestelopdr_key - AND boi.bes_bestelopdr_item_key = bbi.bes_bestelopdr_item_key - AND bbi.bes_bestelling_key = b.bes_bestelling_key) - --AND NOT EXISTS -- Evt. retour-bestelling ook > 7 jaar gesloten! - -- (SELECT 1 - -- FROM bes_bestelling rb, -- Retour-bestelling! - -- fac_tracking t, - -- fac_srtnotificatie sn - -- WHERE rb.bes_bestelling_retourvan_key = b.bes_bestelling_key - -- AND rb.bes_bestelling_key = t.fac_tracking_refkey - -- AND t.fac_srtnotificatie_key = sn.fac_srtnotificatie_key - -- AND sn.fac_srtnotificatie_xmlnode = 'bestelling' - -- AND (rb.bes_bestelling_status NOT IN (1, 6, 7, 8, 9) -- Lopend - -- OR t.fac_tracking_datum > TRUNC (ADD_MONTHS (SYSDATE, -84), 'yyyy'))) -- Geraakt < 7 jaar geleden - AND NOT EXISTS -- Geen lopende facturen op child-bestelopdrachten! - (SELECT 1 - FROM fin_factuur f, bes_bestelopdr_item boi, bes_bestelling_item bbi - WHERE f.fin_factuur_verwijder IS NULL - AND f.fin_factuur_statuses_key IN (2, 3, 5, 6) -- Lopende factuur - AND f.bes_bestelopdr_key = boi.bes_bestelopdr_key - AND boi.bes_bestelopdr_item_key = bbi.bes_bestelopdr_item_key - AND bbi.bes_bestelling_key = b.bes_bestelling_key); + SELECT TO_CHAR (b.bes_bestelling_datum, 'yyyy') jaar, b.bes_bestelling_key, c.contracten + FROM b, + ( SELECT bes_bestelling_key, COUNT (DISTINCT cnt_contract_key) contracten + FROM uwva_v_rap_cnt_schoning + GROUP BY bes_bestelling_key) c + WHERE 1 = 1 --b.gesloten < TRUNC (ADD_MONTHS (SYSDATE, -84), 'yyyy') -- Gesloten > 7 jaar geleden + AND bes_bestelling_retourvan_key IS NULL -- Alleen bron-bestelling (dus zonder de retouren) + AND b.bes_bestelling_key = c.bes_bestelling_key(+) + AND (c.bes_bestelling_key IS NOT NULL -- Gekoppeld contract ook geschoond? => Apart tellen! + OR NOT EXISTS -- Geen enkel gekoppeld contract! + (SELECT 1 + FROM cnt_contract c, bes_bestelopdr_item boi, bes_bestelling_item bbi + WHERE c.bes_bestelopdr_key = boi.bes_bestelopdr_key + AND boi.bes_bestelopdr_item_key = bbi.bes_bestelopdr_item_key + AND bbi.bes_bestelling_key = b.bes_bestelling_key)) + --AND NOT EXISTS + -- (SELECT 1 + -- FROM bes_bestelling_item bbi, bes_bestelopdr_item boi, bes_bestelopdr bo + -- WHERE bbi.bes_bestelopdr_item_key = boi.bes_bestelopdr_item_key + -- AND boi.bes_bestelopdr_key = bo.bes_bestelopdr_key + -- AND bo.bes_bestelopdr_status IN (2, 3, 4, 5) -- Lopende bestelopdracht + -- AND bbi.bes_bestelling_key = b.bes_bestelling_key) + AND NOT EXISTS -- Geen later gewijzigde child-bestelopdrachten! + (SELECT 1 + FROM fac_tracking t, fac_srtnotificatie sn, bes_bestelopdr_item boi, bes_bestelling_item bbi + WHERE t.fac_tracking_datum > TRUNC (ADD_MONTHS (SYSDATE, -84), 'yyyy') + AND t.fac_srtnotificatie_key = sn.fac_srtnotificatie_key + AND sn.fac_srtnotificatie_xmlnode = 'bestelopdracht' + AND t.fac_tracking_refkey = boi.bes_bestelopdr_key + AND boi.bes_bestelopdr_item_key = bbi.bes_bestelopdr_item_key + AND bbi.bes_bestelling_key = b.bes_bestelling_key) + --AND NOT EXISTS -- Evt. retour-bestelling ook > 7 jaar gesloten! + -- (SELECT 1 + -- FROM bes_bestelling rb, -- Retour-bestelling! + -- fac_tracking t, + -- fac_srtnotificatie sn + -- WHERE rb.bes_bestelling_retourvan_key = b.bes_bestelling_key + -- AND rb.bes_bestelling_key = t.fac_tracking_refkey + -- AND t.fac_srtnotificatie_key = sn.fac_srtnotificatie_key + -- AND sn.fac_srtnotificatie_xmlnode = 'bestelling' + -- AND (rb.bes_bestelling_status NOT IN (1, 6, 7, 8, 9) -- Lopend + -- OR t.fac_tracking_datum > TRUNC (ADD_MONTHS (SYSDATE, -84), 'yyyy'))) -- Geraakt < 7 jaar geleden + AND NOT EXISTS -- Geen lopende facturen op child-bestelopdrachten! + (SELECT 1 + FROM fin_factuur f, bes_bestelopdr_item boi, bes_bestelling_item bbi + WHERE f.fin_factuur_verwijder IS NULL + AND f.fin_factuur_statuses_key IN (2, 3, 5, 6) -- Lopende factuur + AND f.bes_bestelopdr_key = boi.bes_bestelopdr_key + AND boi.bes_bestelopdr_item_key = bbi.bes_bestelopdr_item_key + AND bbi.bes_bestelling_key = b.bes_bestelling_key); CREATE OR REPLACE VIEW uwva_v_rap_bez_schoning ( @@ -15452,93 +15561,6 @@ AS AND f.mld_opdr_key = o.mld_opdr_key AND o.mld_melding_key = m.mld_melding_key); -CREATE OR REPLACE VIEW uwva_v_rap_cnt_schoning -( - ins_discipline_key, - huur_jn, - contractsoort, - cnt_contract_key, - contractnr, - cnt_contract_omschrijving, - cnt_contract_looptijd_tot, - cnt_contract_status -) -AS - WITH c - AS (SELECT c.ins_discipline_key, - c.cnt_contract_key, - c.cnt_contract_nummer_intern, - c.cnt_contract_versie, - c.cnt_contract_omschrijving, - c.cnt_contract_verwijder, - c.cnt_contract_looptijd_tot, - c.cnt_contract_status, - c.cnt_contract_mantel_key, - cp.cnt_alg_plaats_key, - cp.cnt_alg_plaats_code - FROM cnt_contract c, cnt_contract_plaats cp - WHERE c.ins_discipline_key IN (198, 412) -- Huurcontracten/Mantel huurcontracten - AND c.cnt_contract_key = cp.cnt_contract_key(+)) - SELECT DISTINCT - c.ins_discipline_key, - 'J' huur_jn, - cd.ins_discipline_omschrijving, - c.cnt_contract_key, - c.cnt_contract_nummer_intern || DECODE (c.cnt_contract_versie, NULL, '', '.' || c.cnt_contract_versie) - contractnr, - c.cnt_contract_omschrijving, - c.cnt_contract_looptijd_tot, - c.cnt_contract_status -- c.cnt_alg_plaats_key, c.cnt_alg_plaats_code - FROM c, cnt_discipline cd - WHERE c.cnt_contract_looptijd_tot < TRUNC (ADD_MONTHS (SYSDATE, -120), 'yyyy') -- Verlopen > 10 jaar geleden - AND c.ins_discipline_key = cd.ins_discipline_key - AND NOT EXISTS -- Geen dossier-contract op dezelfde plaats <= 10 jaar geleden - (SELECT 1 - FROM c dc - WHERE dc.cnt_contract_verwijder IS NULL - AND dc.cnt_contract_looptijd_tot >= TRUNC (ADD_MONTHS (SYSDATE, -120), 'yyyy') - AND dc.cnt_alg_plaats_key = c.cnt_alg_plaats_key - AND dc.cnt_alg_plaats_code = c.cnt_alg_plaats_code) - AND NOT EXISTS -- Geen dossier-contract onder dezelfde mantel <= 10 jaar geleden - (SELECT 1 - FROM c dc - WHERE dc.cnt_contract_verwijder IS NULL - AND dc.cnt_contract_looptijd_tot >= TRUNC (ADD_MONTHS (SYSDATE, -120), 'yyyy') - AND dc.cnt_contract_mantel_key = c.cnt_contract_key) - AND NOT EXISTS -- Geen lopende facturen op contract! - (SELECT 1 - FROM fin_factuur - WHERE fin_factuur_verwijder IS NULL - AND fin_factuur_statuses_key IN (2, 3, 5, 6) -- Lopende factuur - AND cnt_contract_key = c.cnt_contract_key) - UNION ALL - SELECT DISTINCT - c.ins_discipline_key, - 'N' huur_jn, - cd.ins_discipline_omschrijving, - c.cnt_contract_key, - c.cnt_contract_nummer_intern || DECODE (c.cnt_contract_versie, NULL, '', '.' || c.cnt_contract_versie) - contractnr, - c.cnt_contract_omschrijving, - c.cnt_contract_looptijd_tot, - c.cnt_contract_status - FROM cnt_contract c, cnt_discipline cd - WHERE c.cnt_contract_looptijd_tot < TRUNC (ADD_MONTHS (SYSDATE, -84), 'yyyy') -- Verlopen > 7 jaar geleden - AND c.ins_discipline_key = cd.ins_discipline_key - AND cd.ins_discipline_key NOT IN (198, 412) -- Huurcontracten/Mantel huurcontracten - AND NOT EXISTS -- Geen dossier-contract onder dezelfde mantel <= 7 jaar geleden - (SELECT 1 - FROM cnt_contract dc - WHERE dc.cnt_contract_verwijder IS NULL - AND dc.cnt_contract_looptijd_tot >= TRUNC (ADD_MONTHS (SYSDATE, -84), 'yyyy') - AND dc.cnt_contract_mantel_key = c.cnt_contract_key) - AND NOT EXISTS -- Geen lopende facturen op contract! - (SELECT 1 - FROM fin_factuur - WHERE fin_factuur_verwijder IS NULL - AND fin_factuur_statuses_key IN (2, 3, 5, 6) -- Lopende factuur - AND cnt_contract_key = c.cnt_contract_key); - CREATE OR REPLACE VIEW uwva_v_rap_auto_schoning ( module, @@ -15551,7 +15573,7 @@ CREATE OR REPLACE VIEW uwva_v_rap_auto_schoning omschrijving ) AS - SELECT 'BES', jaar, NULL ins_discipline_key, COUNT (*) aantal, NULL subaantal, NULL fac_key, NULL fac_id, NULL omschrijving + SELECT 'BES', jaar, NULL ins_discipline_key, COUNT (*) aantal, SUM (contracten) subaantal, NULL fac_key, NULL fac_id, NULL omschrijving FROM uwva_v_rap_bes_schoning GROUP BY 'BES', jaar UNION ALL @@ -15613,6 +15635,7 @@ AS v_datum DATE; v_datum1 DATE; v_datum2 DATE; + v_contracten NUMBER; BEGIN -- Aanname dat er in elk jaar minimaal te schonen BEZ zijn! v_errormsg := 'Fout bepalen of er nog iets te schonen valt'; @@ -15637,6 +15660,12 @@ BEGIN FROM uwva_v_rap_bes_schoning WHERE jaar > '1999'; + v_errormsg := 'Fout bepalen contracten!'; + SELECT SUM (contracten) + INTO v_contracten + FROM uwva_v_rap_bes_schoning + WHERE jaar <= v_jaar2; + FOR r IN cbes (v_jaar2) LOOP BEGIN @@ -15663,6 +15692,10 @@ BEGIN ELSE fac.writelog ('DAILY', 'S', '#Bestellingen geschoond (jaar=' || v_jaar1 || ' t/m ' || v_jaar2 || '): ' || TO_CHAR (v_count), TO_CHAR (ROUND ((v_datum2 - v_datum1) * 24 * 60), 'FM990') || 'm'); END IF; + IF v_contracten > 0 + THEN + fac.writelog ('DAILY', 'S', '#B-Contracten geschoond (jaar=' || v_jaar1 || '): ' || TO_CHAR (v_contracten), TO_CHAR (ROUND ((v_datum2 - v_datum1) * 24 * 60), 'FM990') || 'm'); + END IF; COMMIT; v_count := 0; @@ -16190,8 +16223,8 @@ AS -- UWVA#77362: QR-codes/Verbeteren klantreis! CREATE OR REPLACE VIEW UWVA_V_RAP_QRC AS - SELECT fac_bookmark_naam || '|' || pa.alg_plaatsaanduiding hide_f_sort, - fac_bookmark_naam fclt_f_bookmark, + SELECT b.fac_bookmark_naam || '|' || pa.alg_plaatsaanduiding hide_f_sort, + b.fac_bookmark_naam fclt_f_bookmark, --'Plaats' gekoppeld_aan, l.alg_locatie_omschrijving fclt_f_locatie, pa.alg_plaatsaanduiding || ' / ' || r.alg_ruimte_omschrijving fclt_f_plaats, @@ -16204,14 +16237,12 @@ AS NULL res_ruimte_key, b.fac_bookmark_id hide_f_bookmark_id FROM --fac_bookmark b, - (SELECT SUBSTR (SUBSTR (UPPER (fac_bookmark_query), INSTR (UPPER (fac_bookmark_query), 'DISC=') + 5), 1, INSTR (SUBSTR (UPPER (fac_bookmark_query), INSTR (UPPER (fac_bookmark_query), 'DISC=') + 5) || '&', '&') - 1) - disc_key, - fac_bookmark_naam, - fac_bookmark_id + (SELECT fac_bookmark_naam, fac_bookmark_id FROM fac_bookmark WHERE (fac_bookmark_expire IS NULL OR fac_bookmark_expire > SYSDATE) - AND UPPER (TRIM (fac_bookmark_path)) = 'APPL/PDA/MELDING.ASP' - AND INSTR (UPPER (fac_bookmark_query), 'DISC=') > 0) b, -- DISC-bookmarks tbv. ruimtemeldingen SANITAIR! + --AND UPPER (TRIM (fac_bookmark_path)) = 'APPL/PDA/MELDING.ASP' + --AND INSTR (UPPER (fac_bookmark_query), 'STDM_KEYS=') > 0 + AND INSTR (fac_bookmark_id, 'dQ2oGB1GCAdm13yV') > 0) b, -- Bookmark tbv. ruimtemeldingen SANITAIR! alg_v_aanwezigruimte r, alg_verdieping v, alg_gebouw g, @@ -16223,8 +16254,7 @@ AS AND g.alg_locatie_key = l.alg_locatie_key AND pa.alg_onroerendgoed_type = 'R' AND r.alg_ruimte_key = pa.alg_onroerendgoed_keys - --AND b.disc_key = md.ins_discipline_key -- TODO:Bestaat vakgroep? - UNION ALL -- Reserveerbare ruimtes 50=Gemeentehuis + UNION ALL SELECT b.fac_bookmark_naam || '|' || d.ins_deel_omschrijving hide_f_sort, b.fac_bookmark_naam fclt_f_bookmark, --'Plaats' gekoppeld_aan, @@ -16239,14 +16269,12 @@ AS NULL res_ruimte_key, b.fac_bookmark_id hide_f_bookmark_id FROM --fac_bookmark b, - (SELECT SUBSTR (SUBSTR (UPPER (fac_bookmark_query), INSTR (UPPER (fac_bookmark_query), 'STDMKINA=') + 9), 1, INSTR (SUBSTR (UPPER (fac_bookmark_query), INSTR (UPPER (fac_bookmark_query), 'STDMKINA=') + 9) || '&', '&') - 1) - stdmkina, - fac_bookmark_naam, - fac_bookmark_id + (SELECT fac_bookmark_naam, fac_bookmark_id FROM fac_bookmark WHERE (fac_bookmark_expire IS NULL OR fac_bookmark_expire > SYSDATE) - AND UPPER (TRIM (fac_bookmark_path)) = 'APPL/PDA/INS_DEEL.ASP' - AND INSTR (UPPER (fac_bookmark_query), 'STDMKINA=') > 0) b, -- STDMKINA-bookmarks tbv. objectmeldingen KOFFIEAUTOMAAT! + --AND UPPER (TRIM (fac_bookmark_path)) = 'APPL/PDA/INS_DEEL.ASP' + --AND INSTR (UPPER (fac_bookmark_query), 'STDMKINA=') > 0 + AND INSTR (fac_bookmark_id, 'KIx4a1nTxSUEMVU-') > 0) b, -- Bookmark tbv. objectmeldingen KOFFIEAUTOMAAT! ins_v_aanwezigdeel d, ins_srtdeel sd, ins_srtgroep sg, @@ -16267,8 +16295,8 @@ AS --AND sm.mld_stdmelding_key = smsd.mld_stdmelding_key --AND smsd.ins_srtinstallatie_key = DECODE (smsd.ins_srtinstallatie_niveau, 'S', sd.ins_srtdeel_key, 'G', sg.ins_srtgroep_key, 'D', dd.ins_discipline_key) UNION ALL - SELECT fac_bookmark_naam || '|' || l.alg_locatie_code || rr.res_ruimte_nr hide_f_sort, - fac_bookmark_naam fclt_f_bookmark, + SELECT b.fac_bookmark_naam || '|' || l.alg_locatie_code || rr.res_ruimte_nr hide_f_sort, + b.fac_bookmark_naam fclt_f_bookmark, --NULL gekoppeld_aan, l.alg_locatie_omschrijving fclt_f_locatie, l.alg_locatie_code || ' / ' || rr.res_ruimte_nr fclt_f_plaats, @@ -16281,13 +16309,11 @@ AS rr.res_ruimte_key, b.fac_bookmark_id FROM --fac_bookmark b, - (SELECT SUBSTR (SUBSTR (UPPER (fac_bookmark_query), INSTR (UPPER (fac_bookmark_query), 'DISC=') + 5), 1, INSTR (SUBSTR (UPPER (fac_bookmark_query), INSTR (UPPER (fac_bookmark_query), 'DISC=') + 5) || '&', '&') - 1) - disc_key, - fac_bookmark_naam, - fac_bookmark_id + (SELECT fac_bookmark_naam, fac_bookmark_id FROM fac_bookmark WHERE (fac_bookmark_expire IS NULL OR fac_bookmark_expire > SYSDATE) - AND UPPER (TRIM (fac_bookmark_path)) = 'APPL/PDA/RESERVERINGEN.ASP') b, -- Bookmarks tbv. ruimtereserveringen VERGADERING! + --AND UPPER (TRIM (fac_bookmark_path)) = 'APPL/PDA/RESERVERINGEN.ASP' + AND INSTR (fac_bookmark_id, '3XaYsCdQbN36seGf') > 0) b, -- Bookmark tbv. ruimtereserveringen VERGADERING! res_ruimte rr, ( SELECT res_ruimte_key, MAX (alg_ruimte_key) alg_ruimte_key FROM res_alg_ruimte @@ -16307,8 +16333,7 @@ AS ; /* UNION ALL - SELECT DISTINCT - b.fac_bookmark_naam || '|' || d.ins_deel_omschrijving hide_f_sort, + SELECT b.fac_bookmark_naam || '|' || d.ins_deel_omschrijving hide_f_sort, b.fac_bookmark_naam fclt_f_bookmark, --'Persoon' gekoppeld_aan, NULL fclt_f_locatie, @@ -16321,14 +16346,11 @@ AS d.ins_deel_key, b.fac_bookmark_id hide_f_bookmark_id FROM --fac_bookmark b, - (SELECT SUBSTR (SUBSTR (UPPER (fac_bookmark_query), INSTR (UPPER (fac_bookmark_query), 'STDMKINA=') + 9), 1, INSTR (SUBSTR (UPPER (fac_bookmark_query), INSTR (UPPER (fac_bookmark_query), 'STDMKINA=') + 9) || '&', '&') - 1) - stdmkina, - fac_bookmark_naam, - fac_bookmark_id + (SELECT fac_bookmark_naam, fac_bookmark_id FROM fac_bookmark WHERE (fac_bookmark_expire IS NULL OR fac_bookmark_expire > SYSDATE) AND UPPER (TRIM (fac_bookmark_path)) = 'APPL/PDA/INS_DEEL.ASP' - AND INSTR (UPPER (fac_bookmark_query), 'STDMKINA=') > 0) b, -- STDMKINA-bookmarks tbv. objectmeldingen PERSOONSGEBONDEN! + AND INSTR (UPPER (fac_bookmark_query), 'STDMKINA=') > 0) b, -- Bookmark tbv. objectmeldingen PERSOONSGEBONDEN! ins_v_aanwezigdeel d, ins_srtdeel sd, ins_srtgroep sg,