diff --git a/FMHN/fmhn.sql b/FMHN/fmhn.sql index 37ce69ece..147491bc9 100644 --- a/FMHN/fmhn.sql +++ b/FMHN/fmhn.sql @@ -5549,15 +5549,17 @@ AS prs_kostenplaats_key, LEVEL - 1 idmlevel, mincode, - afdid, + extid afdid, afdoms, afdidparent, - SYS_CONNECT_BY_PATH (afdoms, '/') pad + SYS_CONNECT_BY_PATH (afdoms, '/') pad, + SYS_CONNECT_BY_PATH (afdid, '/') idpad FROM (SELECT NULL prs_bedrijf_key, NULL prs_afdeling_key, NULL prs_afdeling_parentkey, NULL prs_kostenplaats_key, NULL mincode, + 'IDM' extid, 'IDM' afdid, 'IDM' afdoms, NULL afdidparent @@ -5568,7 +5570,8 @@ AS NULL prs_afdeling_parentkey, NULL prs_kostenplaats_key, mc_ud.fac_usrdata_code mincode, - UPPER (mc_ud.fac_usrdata_code || oc.prs_kenmerklink_waarde) afdid, -- UPPER! + UPPER (mc_ud.fac_usrdata_code || oc.prs_kenmerklink_waarde) extid, -- UPPER! + UPPER (mc_ud.fac_usrdata_code || REPLACE (oc.prs_kenmerklink_waarde, '/', '#')) afdid, -- UPPER! b.prs_bedrijf_naam afdoms, -- Alleen gedeelte tussen haakjes? 'IDM' afdidparent FROM prs_bedrijf b, @@ -5586,7 +5589,8 @@ AS a.prs_afdeling_parentkey, a.prs_kostenplaats_key, SUBSTR (a.prs_afdeling_externid, 1, 2) mincode, - a.prs_afdeling_externid afdid, -- UPPER-gevuld! + a.prs_afdeling_externid extid, -- UPPER-gevuld! + REPLACE (a.prs_afdeling_externid, '/', '#') afdid, -- UPPER-gevuld! REPLACE (a.prs_afdeling_omschrijving, '/', '#') afdoms, UPPER (SUBSTR (a.prs_afdeling_externid, 1, 2) || kl.prs_kenmerklink_waarde) afdidparent -- UPPER! FROM prs_afdeling a, prs_v_aanwezigkenmerklink kl @@ -5610,7 +5614,8 @@ AS afdcode.prs_kenmerklink_waarde afdcode, x.afdoms, x.afdidparent, - SUBSTR (x.pad, 6) pad + SUBSTR (x.pad, 6) pad, + SUBSTR (x.idpad, 6) idpad FROM fmhn_v_idm_afdeling x, (SELECT * FROM prs_v_aanwezigkenmerklink WHERE prs_kenmerk_key = 1001) afdcode -- Afdelingscode WHERE x.idmlevel > 0 @@ -6481,23 +6486,9 @@ AS TO_CHAR (rra.res_rsv_artikel_levering, 'yyyy') jaar FROM res_v_aanwezigrsv_artikel rra, res_v_aanwezigrsv_ruimte rrr WHERE rra.res_status_bo_key = 2 - AND rra.res_rsv_artikel_levering < TRUNC (SYSDATE - 1) + AND rra.res_rsv_artikel_levering < TRUNC (SYSDATE - 7) AND rra.res_rsv_artikel_dirtlevel = 0 AND rra.res_rsv_ruimte_key = rrr.res_rsv_ruimte_key - AND (EXISTS -- Roomservice - (SELECT 1 - FROM alg_v_allonroerendgoed - WHERE alg_locatie_key = 18 -- Rijnstraat 8 - AND alg_ruimte_key = rrr.alg_ruimte_key) - OR EXISTS -- Zaalreservering - (SELECT 1 - FROM res_ruimte_opstelling ro, - res_alg_ruimte rar, - alg_v_allonroerendgoed aog - WHERE ro.res_ruimte_key = rar.res_ruimte_key - AND rar.alg_ruimte_key = aog.alg_ruimte_key - AND aog.alg_locatie_key = 18 -- Rijnstraat 8 - AND ro.res_ruimte_opstel_key = rrr.res_ruimte_opstel_key)) UNION ALL SELECT '[' || TO_CHAR (rrd.res_rsv_ruimte_key) || '|' || TO_CHAR (rrd.res_rsv_deel_key) || '] ' aanduiding, rrd.res_rsv_ruimte_key, @@ -6508,24 +6499,10 @@ AS TO_CHAR (rrd.res_rsv_deel_tot, 'yyyy') jaar FROM res_v_aanwezigrsv_deel rrd, res_v_aanwezigrsv_ruimte rrr WHERE rrd.res_status_bo_key = 2 - AND rrd.res_rsv_deel_tot < TRUNC (SYSDATE - 1) + AND rrd.res_rsv_deel_tot < TRUNC (SYSDATE - 7) AND rrd.res_rsv_deel_dirtlevel = 0 AND rrd.res_rsv_ruimte_key IS NOT NULL -- Geen parkeerplaatsen bij niet reservering-gebonden afspraken? AND rrd.res_rsv_ruimte_key = rrr.res_rsv_ruimte_key - AND (EXISTS -- Roomservice - (SELECT 1 - FROM alg_v_allonroerendgoed - WHERE alg_locatie_key = 18 -- Rijnstraat 8 - AND alg_ruimte_key = rrr.alg_ruimte_key) - OR EXISTS -- Zaalreservering - (SELECT 1 - FROM res_ruimte_opstelling ro, - res_alg_ruimte rar, - alg_v_allonroerendgoed aog - WHERE ro.res_ruimte_key = rar.res_ruimte_key - AND rar.alg_ruimte_key = aog.alg_ruimte_key - AND aog.alg_locatie_key = 18 -- Rijnstraat 8 - AND ro.res_ruimte_opstel_key = rrr.res_ruimte_opstel_key)) UNION ALL SELECT '[' || TO_CHAR (rrr.res_rsv_ruimte_key) || '] ' aanduiding, rrr.res_rsv_ruimte_key, @@ -6535,24 +6512,10 @@ AS NULL res_artikel_key, TO_CHAR (rrr.res_rsv_ruimte_tot, 'yyyy') jaar FROM res_v_aanwezigrsv_ruimte rrr - WHERE rrr.res_status_bo_key = 2 -- Dit sluit "roomservice" al uit? - AND rrr.res_rsv_ruimte_tot < TRUNC (SYSDATE - 1) + WHERE rrr.res_status_bo_key = 2 -- Dit sluit "roomservice" al uit? + AND rrr.res_rsv_ruimte_tot < TRUNC (SYSDATE - 7) AND rrr.res_rsv_ruimte_dirtlevel = 0 AND rrr.res_ruimte_opstel_key IS NOT NULL -- Geen "roomservice" - AND (EXISTS -- Roomservice - (SELECT 1 - FROM alg_v_allonroerendgoed - WHERE alg_locatie_key = 18 -- Rijnstraat 8 - AND alg_ruimte_key = rrr.alg_ruimte_key) - OR EXISTS -- Zaalreservering - (SELECT 1 - FROM res_ruimte_opstelling ro, - res_alg_ruimte rar, - alg_v_allonroerendgoed aog - WHERE ro.res_ruimte_key = rar.res_ruimte_key - AND rar.alg_ruimte_key = aog.alg_ruimte_key - AND aog.alg_locatie_key = 18 -- Rijnstraat 8 - AND ro.res_ruimte_opstel_key = rrr.res_ruimte_opstel_key)) ORDER BY 2, 3; BEGIN v_old_rsv_ruimte_key := -1; @@ -8375,7 +8338,7 @@ BEGIN -- Jaarlijks schonen gevolgde (herhalings)lessen door bhv-ers! fmhn.schonen_lessen (); - -- Dagelijks schonen alle RS8-reserveringen van voor gisteren! + -- Dagelijks schonen alle reserveringen ouder dan 7 dagen! fmhn.afmelden_res (); -- Toekennen(/TODO:afnemen) FE-autorisatiegroepen volgens ministerie(onderdeel). @@ -9937,7 +9900,7 @@ AS ins_srtdiscipline sd, mld_statusopdr os WHERE o.mld_opdr_kosten <> 0 - AND o.mld_statusopdr_key IN (5, 6, 7, 8, 9) + -- AND o.mld_statusopdr_key IN (5, 6, 7, 8, 9) AND o.mld_typeopdr_key = ot.mld_typeopdr_key AND ot.mld_typeopdr_key IN (5, 157, 241, 361, 582) -- Uitvoeringsopdracht/RBO/Drank- en Snoepautomaat/RVB/Uitvoeringopdracht PC AND o.mld_melding_key = m.mld_melding_key @@ -9998,8 +9961,8 @@ AS bes_srtgroep sg, bes_discipline bd, bes_bestelopdrstatuses bos - WHERE bo.bes_bestelopdr_status IN (4, 6, 7) -- In bestelling/Geleverd/Verwerkt - AND bo.bes_bestelopdr_key = boi.bes_bestelopdr_key + WHERE -- bo.bes_bestelopdr_status IN (4, 6, 7) -- In bestelling/Geleverd/Verwerkt + bo.bes_bestelopdr_key = boi.bes_bestelopdr_key AND boi.bes_bestelopdr_item_key = bi.bes_bestelopdr_item_key AND bi.bes_bestelling_key = b.bes_bestelling_key @@ -10017,7 +9980,7 @@ AS alg_locatie l, alg_district d, alg_regio r - WHERE tab.prs_kostenplaats_key = fa.prs_kostenplaats_key + WHERE tab.prs_kostenplaats_key = fa.prs_kostenplaats_key(+) AND fa.prs_afdeling_key = a2d.prs_afdeling_key AND tab.prs_kostensoort_key = ks.prs_kostensoort_key(+) AND ks.prs_kostensoortgrp_key = ksg.prs_kostensoortgrp_key(+) @@ -10197,6 +10160,10 @@ AS m.prs_perslid_key prs_perslid_key, m.prs_perslid_key_voor host_key, o.mld_opdr_externnr planonnr, + CASE WHEN m.mld_stdmelding_key IN (301, 721) + THEN + '2230.04' + ELSE DECODE ( md.ins_discipline_key, 683, @@ -10212,13 +10179,19 @@ AS 1), '[^0-9.]', '')) + END nummer, + CASE WHEN m.mld_stdmelding_key IN (301, 721) + THEN + 'Evenementenservice' + ELSE DECODE (md.ins_discipline_key, 74, 'Extra bewaking en beveiliging', 830, 'Extra bewaking en beveiliging', 683, 'Facilitair medewerker FCC', 47, 'Facilitair medewerker FCC', md.ins_discipline_omschrijving) + END categorie, sd.ins_srtdiscipline_prefix || TO_CHAR (m.mld_melding_key) @@ -10236,7 +10209,7 @@ AS FROM mld_kenmerkopdr mk WHERE mk.mld_opdr_key = o.mld_opdr_key AND mld_kenmerk_key IN (1187, 1188)) - ,o.mld_opdr_kosten, 0) bedrag_incl, + ,o.mld_opdr_kosten * 1.21, 0) bedrag_incl, COALESCE ( (SELECT SUM (fac.safe_to_number (mk.mld_kenmerkopdr_waarde)) FROM mld_kenmerkopdr mk @@ -10283,7 +10256,7 @@ AS ins_srtdiscipline sd, mld_statusopdr os WHERE o.mld_opdr_kosten <> 0 - AND o.mld_statusopdr_key IN (5, 6, 7, 8, 9) + -- AND o.mld_statusopdr_key IN (5, 6, 7, 8, 9) AND o.mld_typeopdr_key = ot.mld_typeopdr_key AND ot.mld_typeopdr_key IN (5, 157, 241, 361, 582) -- Uitvoeringsopdracht/RBO/Drank- en Snoepautomaat/RVB/Uitvoeringopdracht PC AND o.mld_melding_key = m.mld_melding_key @@ -10349,8 +10322,8 @@ AS bes_srtgroep sg, bes_discipline bd, bes_bestelopdrstatuses bos - WHERE bo.bes_bestelopdr_status IN (4, 6, 7) -- In bestelling/Geleverd/Verwerkt - AND bo.bes_bestelopdr_key = boi.bes_bestelopdr_key + WHERE -- bo.bes_bestelopdr_status IN (4, 6, 7) -- In bestelling/Geleverd/Verwerkt + bo.bes_bestelopdr_key = boi.bes_bestelopdr_key AND boi.bes_bestelopdr_item_key = bi.bes_bestelopdr_item_key AND bi.bes_bestelling_key = b.bes_bestelling_key @@ -10368,7 +10341,7 @@ AS alg_locatie l, alg_district d, alg_regio r - WHERE tab.prs_kostenplaats_key = fa.prs_kostenplaats_key + WHERE tab.prs_kostenplaats_key = fa.prs_kostenplaats_key(+) AND fa.prs_afdeling_key = a2d.prs_afdeling_key AND tab.prs_kostensoort_key = ks.prs_kostensoort_key(+) AND ks.prs_kostensoortgrp_key = ksg.prs_kostensoortgrp_key(+) @@ -11060,7 +11033,7 @@ AS --DECODE (ab.prs_afdeling_key3, 97, 'Ja', 'Nee') facilitair_oog, -- 97=o653=DGVBR/FMHaaglanden;TODO:Klantverzoek=NVT??? CASE WHEN ab.prs_afdeling_key3 = 97 -- Melder-afdeling o653=DGVBR/FMHaaglanden - OR k2a.prs_afdeling_key = 467 -- FMHN#71415: Kosten voor-afdeling o2086=DGVBR/UBR/FBU/Rijksbeveiligingsorg. + OR INSTR (k2a.idpad, '04O2086') > 0 -- FMHN#71415: Kosten voor-afdeling o2086=DGVBR/UBR/FBU/Rijksbeveiligingsorg. THEN 'Ja' ELSE @@ -11342,7 +11315,7 @@ AS --DECODE (ab.prs_afdeling_key3, 97, 'Ja', 'Nee') facilitair_oog, -- 97=o653=DGVBR/FMHaaglanden;TODO:Klantverzoek=NVT??? CASE WHEN ab.prs_afdeling_key3 = 97 -- Melder-afdeling o653=DGVBR/FMHaaglanden - OR k2a.prs_afdeling_key = 467 -- FMHN#71415: Kosten voor-afdeling o2086=DGVBR/UBR/FBU/Rijksbeveiligingsorg. + OR INSTR (k2a.idpad, '04O2086') > 0 -- FMHN#71415: Kosten voor-afdeling o2086=DGVBR/UBR/FBU/Rijksbeveiligingsorg. THEN 'Ja' ELSE @@ -11500,6 +11473,7 @@ CREATE OR REPLACE VIEW fmhn_v_rap_afh_klachten --kosten_incl, aanvraag_voor, toelichting, + gewensteopl, standaardorder_code, standaardorder_oms, sla, -- Was prioriteit @@ -11568,7 +11542,7 @@ AS --DECODE (ab.prs_afdeling_key3, 97, 'Ja', 'Nee') facilitair_oog, -- 97=o653=DGVBR/FMHaaglanden;TODO:Klantverzoek=NVT??? CASE WHEN ab.prs_afdeling_key3 = 97 -- Melder-afdeling o653=DGVBR/FMHaaglanden - OR k2a.prs_afdeling_key = 467 -- FMHN#71415: Kosten voor-afdeling o2086=DGVBR/UBR/FBU/Rijksbeveiligingsorg. + OR INSTR (k2a.idpad, '04O2086') > 0 -- FMHN#71415: Kosten voor-afdeling o2086=DGVBR/UBR/FBU/Rijksbeveiligingsorg. THEN 'Ja' ELSE @@ -11593,7 +11567,9 @@ AS --NULL kosten_incl, NULL aanvraag_voor, --TRIM (REPLACE (SUBSTR (m.mld_melding_omschrijving, 1, 200), '"', '''')) toelichting, -- FMHN#71415: Graag toch vullen! - m.mld_melding_omschrijving toelichting, -- FMHN#71415: Graag toch vullen! + --m.mld_melding_omschrijving toelichting, -- FMHN#71415: Graag toch vullen! + omsk.mld_kenmerkmelding_waarde toelichting, -- FMHN#71415: Graag toch vullen (uit kenmerkveld igv. Klacht)! + wowj.mld_kenmerkmelding_waarde gewensteopl, TO_CHAR (m.mld_stdmelding_key) standaardorder_code, x.subproductgroep standaardorder_oms, DECODE (x.sla_accpturen, NULL, DECODE (x.sla_accptdgn, NULL, '1D', TO_CHAR (x.sla_accptdgn) || 'D'), TO_CHAR (x.sla_accpturen) || 'U') sla, @@ -11645,7 +11621,9 @@ AS prs_v_perslid_fullnames_all pfm, prs_v_perslid_fullnames_all pfb, (SELECT * FROM mld_v_aanwezigkenmerkmelding WHERE mld_kenmerk_key = 279) tbv, -- Klacht tbv - fac_v_aanwezigusrdata tbv_ud + fac_v_aanwezigusrdata tbv_ud, + (SELECT * FROM mld_v_aanwezigkenmerkmelding WHERE mld_kenmerk_key = 175) omsk, -- Omschrijving klacht + (SELECT * FROM mld_v_aanwezigkenmerkmelding WHERE mld_kenmerk_key = 181) wowj -- Welke oplossing wil je? WHERE COALESCE (x.melding_accepted, SYSDATE) > TRUNC (ADD_MONTHS (SYSDATE, -12), 'yyyy') -- Of m.melding_datum??? --AND x.sla_nvt = 0 -- Alleen meldingen waarvoor SLA bewaken aangevinkt! --AND x.melding_start_key IS NULL -- Geen (WF-)vervolgmeldingen! @@ -11671,7 +11649,9 @@ AS AND fac.safe_to_number (fm.alg_onrgoedkenmerk_waarde) = pfm.prs_perslid_key(+) AND COALESCE (m.mld_melding_behandelaar2_key, m.mld_melding_behandelaar_key) = pfb.prs_perslid_key(+) AND x.melding_key = tbv.mld_melding_key(+) - AND fac.safe_to_number (tbv.mld_kenmerkmelding_waarde) = tbv_ud.fac_usrdata_key(+); + AND fac.safe_to_number (tbv.mld_kenmerkmelding_waarde) = tbv_ud.fac_usrdata_key(+) + AND x.melding_key = omsk.mld_melding_key(+) + AND x.melding_key = wowj.mld_melding_key(+); -- NoShow catering en reserveringen CREATE OR REPLACE VIEW fmhn_v_rap_res_noshow