admin/Customer
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

FMHN#63881 KPI/Sleutelbestand

Browse Source 
svn path=/Customer/trunk/; revision=55604
This commit is contained in:
Maarten van der Heide
2022-04-15 15:17:00 +00:00
parent 852a4c6631
commit da345111ca
1 changed files with 47 additions and 67 deletions
Download Patch File Download Diff File Expand all files Collapse all files

114
FMHN/fmhn.sql
View File

@@ -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