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

FMHN#63881 KPI

Browse Source 
svn path=/Customer/trunk/; revision=54156
This commit is contained in:
Maarten van der Heide
2021-12-14 20:00:18 +00:00
parent 8118dd0a72
commit 798a23b3f8
1 changed files with 388 additions and 261 deletions
Download Patch File Download Diff File Expand all files Collapse all files

649
FMHN/fmhn.sql
View File

@@ -4836,6 +4836,32 @@ EXCEPTION
END;
/
-- Kopie van ORG- en PRS-import met Charset op Windows-1252!
CREATE OR REPLACE PROCEDURE fmhn_import_org2 (p_import_key IN NUMBER)
AS
BEGIN
fmhn_import_org (p_import_key);
END;
/
CREATE OR REPLACE PROCEDURE fmhn_update_org2 (p_import_key IN NUMBER)
AS
BEGIN
fmhn_update_org (p_import_key);
END;
/
CREATE OR REPLACE PROCEDURE fmhn_import_prs2 (p_import_key IN NUMBER)
AS
BEGIN
fmhn_import_prs (p_import_key);
END;
/
CREATE OR REPLACE PROCEDURE fmhn_update_prs2 (p_import_key IN NUMBER)
AS
BEGIN
fmhn_update_prs (p_import_key);
END;
/
CREATE OR REPLACE PROCEDURE fmhn_import_rel (p_import_key IN NUMBER)
AS
c_delim VARCHAR2 (1) := ';'; -- Field seperator
@@ -7311,6 +7337,18 @@ AS
(SELECT 1 -- Satellietzetel op afdeling8 van persoon!
FROM prs_afdeling
WHERE prs_afdeling_key = ab.prs_afdeling_key7
AND UPPER (prs_afdeling_externid) =
UPPER (SUBSTR (ud.fac_usrdata_code, 1, INSTR (ud.fac_usrdata_code, '/') - 1)))
OR EXISTS
(SELECT 1 -- Satellietzetel op afdeling9 van persoon!
FROM prs_afdeling
WHERE prs_afdeling_key = ab.prs_afdeling_key8
AND UPPER (prs_afdeling_externid) =
UPPER (SUBSTR (ud.fac_usrdata_code, 1, INSTR (ud.fac_usrdata_code, '/') - 1)))
OR EXISTS
(SELECT 1 -- Satellietzetel op afdeling10 van persoon!
FROM prs_afdeling
WHERE prs_afdeling_key = ab.prs_afdeling_key9
AND UPPER (prs_afdeling_externid) =
UPPER (SUBSTR (ud.fac_usrdata_code, 1, INSTR (ud.fac_usrdata_code, '/') - 1))))
AND NOT EXISTS (SELECT 1 -- Nog geen WP op satellietzetel!
@@ -9428,6 +9466,7 @@ SELECT m.mld_melding_key,
FROM mld_melding m, mld_v_udr_melding x
WHERE m.mld_meldbron_nr IS NOT NULL AND m.mld_melding_key = x.melding_key;
*/
-- Tbv. de volgende tabs in Excel van P&C: PD doorlooptijd DV, PD exploitatie/maand, PD Facilitair oog, PD KWIS meldingen
CREATE OR REPLACE VIEW fmhn_v_rap_doorlooptijd_dv
(
binnen_norm,
@@ -9444,7 +9483,7 @@ CREATE OR REPLACE VIEW fmhn_v_rap_doorlooptijd_dv
omschrijving,
ruimtenr,
plaatsaanduiding,
prioriteit,
prioriteit, -- Was urgentie
aanvrager, -- Was melder
kosten_voor,
kosten_incl,
@@ -9488,7 +9527,7 @@ AS
UPPER (x.uitvoering_sla_optijd),
'NEE', 'Buiten norm',
'Binnen norm'),
DECODE (
DECODE ( -- Gemigreerde melding uit Planon!
SIGN (x.melding_einddatum_std - COALESCE (fac.gettrackingdate ('MLDAFM', x.melding_key), fac.gettrackingdate ('MLDAFR', x.melding_key))),
-1, 'Buiten norm',
'Binnen norm'))
@@ -9498,9 +9537,9 @@ AS
NULL,
DECODE (
UPPER (x.uitvoering_sla_optijd),
'NEE', COALESCE ((x.doorlooptijd_werkdgn - x.sla_werkdgn), (x.doorlooptijd_werkuren - x.sla_werkuren)),
'NEE', COALESCE ((x.doorlooptijd_werkdgn - x.sla_werkdgn) * 9, x.doorlooptijd_werkuren - x.sla_werkuren),
0),
DECODE (
DECODE ( -- Gemigreerde melding uit Planon!
SIGN (x.melding_einddatum_std - COALESCE (fac.gettrackingdate ('MLDAFM', x.melding_key), fac.gettrackingdate ('MLDAFR', x.melding_key))),
-1, mld.getactualuitvoer (
x.melding_einddatum_std,
@@ -9512,19 +9551,11 @@ AS
'U').tijdsduur,
0))
buiten_norm_uren,
--mld.getactualuitvoer (
-- x.melding_datum,
-- COALESCE (fac.gettrackingdate ('MLDAFM', x.melding_key), fac.gettrackingdate ('MLDAFR', x.melding_key)),
-- m.mld_stdmelding_key,
-- NULL,
-- NULL,
-- NULL,
-- 'D').tijdsduur
DECODE (
m.mld_meldbron_nr,
NULL,
x.doorlooptijd_werkdgn * 9,
mld.getactualuitvoer (
COALESCE (x.doorlooptijd_werkdgn, x.doorlooptijd_werkuren / 9),
mld.getactualuitvoer ( -- Gemigreerde melding uit Planon!
x.melding_datum,
COALESCE (fac.gettrackingdate ('MLDAFM', x.melding_key), fac.gettrackingdate ('MLDAFR', x.melding_key)),
m.mld_stdmelding_key,
@@ -9535,12 +9566,12 @@ AS
afhandelingstijd,
TRIM(SUBSTR (mc_ud.fac_usrdata_omschr, INSTR (mc_ud.fac_usrdata_omschr, '-') + 1))
klant,
'TODO' fm,
DECODE (mc_ud.fac_usrdata_code, '04', 'Ja', 'Nee') facilitair_oog, -- TODO:Klantverzoek=NVT???
pfm.prs_perslid_naam_full fm,
DECODE (ab.prs_afdeling_key3, 97, 'Ja', 'Nee') facilitair_oog, -- 97=o653=DGVBR/FMHaaglanden;TODO:Klantverzoek=NVT???
x.melding_district locatieteam,
x.melding_locatie pand,
x.meldingnummer nummer,
x.soortmelding || '???' gebruikerstype,
x.soortmelding gebruikerstype, -- Vakgroeptype
x.melding_status status,
NULL omschrijving,
NULL ruimtenr,
@@ -9553,7 +9584,7 @@ AS
NULL toelichting,
TO_CHAR (m.mld_stdmelding_key) standaardorder_code,
x.subproductgroep standaardorder_oms,
'TODO' sla,
DECODE (x.sla_werkuren, NULL, DECODE (x.sla_werkdgn, NULL, NULL, TO_CHAR (x.sla_werkdgn) || 'D'), TO_CHAR (x.sla_werkuren) || 'U') sla,
NULL nsk_of_overig,
REGEXP_REPLACE (REGEXP_SUBSTR (x.productgroep,
'\(([^}]+)\)',
@@ -9564,9 +9595,9 @@ AS
productdienstnr,
x.productgroep productdienstnaam,
x.actieve_behandelgroep behandelteam,
'TODO' uitvoerder_intext,
pf.prs_perslid_naam_full uitvoerder_intern,
'TODO' uitvoerder_extern,
DECODE (b.prs_bedrijf_key, NULL, 'Intern', 'Extern') uitvoerder_intext,
pfb.prs_perslid_naam_full uitvoerder_intern,
b.prs_bedrijf_naam uitvoerder_extern,
x.melding_datum datum_gemeld, -- MLDNEW?
TO_CHAR (x.melding_datum, 'hh24:mi') datum_gemeld_tijd, -- MLDNEW?
TO_CHAR (x.melding_datum, 'month') datum_gemeld_maand, -- MLDNEW?
@@ -9582,168 +9613,357 @@ AS
x.melding_accepted datum_in_behandeling, -- / Res. def. / Offerte
TO_CHAR (x.melding_accepted, 'hh24:mi') datum_in_behandeling_tijd, -- / Res. def. / Offerte tijd
TO_CHAR (x.melding_accepted, 'month') datum_in_behandeling_maand, -- / Res. def. / Offerte maand
'TODO' datum_opdracht_gereed,
'TODO' datum_opdracht_gereed_tijd,
o.opdracht_gereed datum_opdracht_gereed,
TO_CHAR (o.opdracht_gereed, 'hh24:mi') datum_opdracht_gereed_tijd,
NULL datum_technisch_gereed,
NULL datum_technisch_gereed_tijd
FROM mld_v_udr_melding x,
mld_melding m,
(SELECT * FROM prs_v_aanwezigkenmerklink WHERE prs_kenmerk_key = 1008) mc, -- Ministeriecode
fac_v_aanwezigusrdata mc_ud,
prs_v_perslid_fullnames_all pf,
fmhn_v_rap_idm_afdboom k2a -- Kostenplaats2Afdeling???
WHERE --x.melding_afgemeld > TRUNC (ADD_MONTHS (SYSDATE, -12), 'yyyy') -- Of m.melding_datum
prs_perslid p,
prs_v_afdeling_boom ab,
fmhn_v_rap_idm_afdboom k2a, -- Kostenplaats2Afdeling
alg_locatie l,
(SELECT * FROM alg_v_aanwezigonrgoedkenmerk WHERE alg_kenmerk_key = 1060) fm, -- Facilitair Manager
prs_v_perslid_fullnames_all pfm,
--(SELECT o1.mld_melding_key, o1.mld_opdr_bedrijfopdr_volgnr volgnr, o1.mld_uitvoerende_keys prs_perslid_key
-- FROM mld_opdr o1
-- WHERE EXISTS (SELECT 1 FROM prs_perslid WHERE prs_perslid_key = o1.mld_uitvoerende_keys) -- Laatst uitgegeven interne opdracht!
-- AND NOT EXISTS (SELECT 1 FROM mld_opdr o2 WHERE o2.mld_melding_key = o1.mld_melding_key AND o2.mld_opdr_key > o1.mld_opdr_key)) int_o,
--(SELECT o1.mld_melding_key, o1.mld_opdr_bedrijfopdr_volgnr volgnr, o1.mld_uitvoerende_keys prs_bedrijf_key
-- FROM mld_opdr o1
-- WHERE EXISTS (SELECT 1 FROM prs_bedrijf WHERE prs_bedrijf_key = o1.mld_uitvoerende_keys) -- Laatst uitgegeven externe opdracht!
-- AND NOT EXISTS (SELECT 1 FROM mld_opdr o2 WHERE o2.mld_melding_key = o1.mld_melding_key AND o2.mld_opdr_key > o1.mld_opdr_key)) ext_o,
(SELECT o1.mld_melding_key, o1.mld_uitvoerende_keys, fac.gettrackingdate ('ORDAFM', o1.mld_opdr_key) opdracht_gereed -- Laatst uitgegeven opdracht!
FROM mld_opdr o1
WHERE NOT EXISTS (SELECT 1 FROM mld_opdr o2 WHERE o2.mld_melding_key = o1.mld_melding_key AND o2.mld_opdr_key > o1.mld_opdr_key)) o,
prs_v_perslid_fullnames_all pfb,
prs_bedrijf b
WHERE --x.melding_afgemeld > TRUNC (ADD_MONTHS (SYSDATE, -12), 'yyyy') -- Of m.melding_datum???
COALESCE (fac.gettrackingdate ('MLDAFM', x.melding_key), fac.gettrackingdate ('MLDAFR', x.melding_key)) > TRUNC (ADD_MONTHS (SYSDATE, -12), 'yyyy') -- Of m.melding_datum???
AND x.sla_nvt = 0
AND x.sla_nvt = 0 -- Alleen meldingen waarvoor SLA bewaken aangevinkt!
AND INSTR (UPPER (x.subproductgroep), 'KLACHT') = 0
AND x.prioriteit IN (3, 4)
--AND x.prioriteit IN (3, 4) -- Alle prioriteiten, want bronrapport tbv. niet urgente en urgente meldingen!
AND x.melding_key = m.mld_melding_key
AND m.prs_perslid_key_voor = mc.prs_link_key(+)
AND fac.safe_to_number (mc.prs_kenmerklink_waarde) = mc_ud.fac_usrdata_key(+)
AND COALESCE (m.mld_melding_behandelaar2_key, m.mld_melding_behandelaar_key) = pf.prs_perslid_key
AND m.prs_kostenplaats_key = k2a.prs_kostenplaats_key;
AND m.prs_perslid_key_voor = p.prs_perslid_key
AND p.prs_afdeling_key = ab.prs_afdeling_key
AND m.prs_kostenplaats_key = k2a.prs_kostenplaats_key
AND m.mld_alg_locatie_key = l.alg_locatie_key(+)
AND l.alg_district_key = fm.alg_onrgoed_key(+)
AND fac.safe_to_number (fm.alg_onrgoedkenmerk_waarde) = pfm.prs_perslid_key(+)
--AND m.mld_melding_key = int_o.mld_melding_key(+)
--AND m.mld_melding_key = ext_o.mld_melding_key(+)
AND m.mld_melding_key = o.mld_melding_key(+)
--AND COALESCE (int_o.prs_perslid_key, m.mld_melding_behandelaar2_key, m.mld_melding_behandelaar_key) = pf.prs_perslid_key(+)
AND COALESCE (m.mld_melding_behandelaar2_key, m.mld_melding_behandelaar_key) = pfb.prs_perslid_key(+)
AND o.mld_uitvoerende_keys = b.prs_bedrijf_key(+);
-- Afhandeling klachten.
CREATE OR REPLACE VIEW fmhn_v_rap_afh_klachten
(
klacht_idee_compliment,
binnen_norm,
buiten_norm_uren,
afhandelingstijd,
klant,
fm,
facilitair_oog,
locatieteam,
pand,
nummer,
gebruikerstype,
status,
omschrijving,
ruimtenr,
plaatsaanduiding,
prioriteit, -- Was urgentie
aanvrager, -- Was melder
kosten_voor,
--kosten_incl,
aanvraag_voor,
toelichting,
standaardorder_code,
standaardorder_oms,
sla, -- Was prioriteit
--nsk_of_overig,
productdienstnr,
productdienstnaam,
behandelteam, -- Was vakgroep
--uitvoerder_intext,
uitvoerder_intern,
--uitvoerder_extern,
datum_gemeld, --_datum
datum_gemeld_tijd,
datum_gemeld_maand,
datum_startdatum,
datum_startdatum_tijd,
datum_gewenst_gereed,
datum_gewenst_gereed_tijd,
datum_gereed, -- KV?
datum_gereed_tijd, -- KV?
datum_admgereed,
datum_admgereed_tijd,
datum_admgereed_maand,
datum_in_behandeling, -- / Res. def. / Offerte
datum_in_behandeling_tijd, -- / Res. def. / Offerte tijd
datum_in_behandeling_maand, -- / Res. def. / Offerte maand
datum_opdracht_gereed,
datum_opdracht_gereed_tijd,
datum_technisch_gereed,
datum_technisch_gereed_tijd
)
AS
SELECT '???' klacht_idee_compliment,
DECODE (
m.mld_meldbron_nr,
NULL,
DECODE (
UPPER (x.uitvoering_sla_optijd),
'NEE', 'Buiten norm',
'Binnen norm'),
DECODE ( -- Gemigreerde melding uit Planon!
SIGN (x.melding_einddatum_std - COALESCE (fac.gettrackingdate ('MLDAFM', x.melding_key), fac.gettrackingdate ('MLDAFR', x.melding_key))),
-1, 'Buiten norm',
'Binnen norm'))
binnen_norm,
DECODE (
m.mld_meldbron_nr,
NULL,
DECODE (
UPPER (x.uitvoering_sla_optijd),
'NEE', COALESCE ((x.doorlooptijd_werkdgn - x.sla_werkdgn) * 9, x.doorlooptijd_werkuren - x.sla_werkuren),
0),
DECODE ( -- Gemigreerde melding uit Planon!
SIGN (x.melding_einddatum_std - COALESCE (fac.gettrackingdate ('MLDAFM', x.melding_key), fac.gettrackingdate ('MLDAFR', x.melding_key))),
-1, mld.getactualuitvoer (
x.melding_einddatum_std,
COALESCE (fac.gettrackingdate ('MLDAFM', x.melding_key), fac.gettrackingdate ('MLDAFR', x.melding_key)),
m.mld_stdmelding_key,
NULL,
NULL,
NULL,
'U').tijdsduur,
0))
buiten_norm_uren,
DECODE (
m.mld_meldbron_nr,
NULL,
COALESCE (x.doorlooptijd_werkdgn, x.doorlooptijd_werkuren / 9),
mld.getactualuitvoer ( -- Gemigreerde melding uit Planon!
x.melding_datum,
COALESCE (fac.gettrackingdate ('MLDAFM', x.melding_key), fac.gettrackingdate ('MLDAFR', x.melding_key)),
m.mld_stdmelding_key,
NULL,
NULL,
NULL,
'D').tijdsduur)
afhandelingstijd,
TRIM(SUBSTR (mc_ud.fac_usrdata_omschr, INSTR (mc_ud.fac_usrdata_omschr, '-') + 1))
klant,
pfm.prs_perslid_naam_full fm,
DECODE (ab.prs_afdeling_key3, 97, 'Ja', 'Nee') facilitair_oog, -- 97=o653=DGVBR/FMHaaglanden;TODO:Klantverzoek=NVT???
x.melding_district locatieteam,
x.melding_locatie pand,
x.meldingnummer nummer,
x.soortmelding gebruikerstype, -- Vakgroeptype
x.melding_status status,
NULL omschrijving,
NULL ruimtenr,
NULL plaatsaanduiding,
x.prioriteittxt prioriteit,
x.melder aanvrager,
k2a.pad kosten_voor,
--NULL kosten_incl,
NULL aanvraag_voor,
NULL toelichting,
TO_CHAR (m.mld_stdmelding_key) standaardorder_code,
x.subproductgroep standaardorder_oms,
DECODE (x.sla_werkuren, NULL, DECODE (x.sla_werkdgn, NULL, NULL, TO_CHAR (x.sla_werkdgn) || 'D'), TO_CHAR (x.sla_werkuren) || 'U') sla,
--NULL nsk_of_overig,
REGEXP_REPLACE (REGEXP_SUBSTR (x.productgroep,
'\(([^}]+)\)',
1,
1,
NULL,
1), '[^0-9.]', '')
productdienstnr,
x.productgroep productdienstnaam,
x.actieve_behandelgroep behandelteam,
--DECODE (b.prs_bedrijf_key, NULL, 'Intern', 'Extern') uitvoerder_intext,
pfb.prs_perslid_naam_full uitvoerder_intern,
--b.prs_bedrijf_naam uitvoerder_extern,
x.melding_datum datum_gemeld, -- MLDNEW?
TO_CHAR (x.melding_datum, 'hh24:mi') datum_gemeld_tijd, -- MLDNEW?
TO_CHAR (x.melding_datum, 'month') datum_gemeld_maand, -- MLDNEW?
NULL datum_startdatum, -- Planbare meldingen?
NULL datum_startdatum_tijd, -- Planbare meldingen?
x.melding_einddatum datum_gewenst_gereed,
TO_CHAR (x.melding_einddatum, 'hh24:mi') datum_gewenst_gereed_tijd,
x.melding_afgemeld datum_gereed, -- KV?
TO_CHAR (x.melding_afgemeld, 'hh24:mi') datum_gereed_tijd, -- KV?
NULL datum_admgereed,
NULL datum_admgereed_tijd,
NULL datum_admgereed_maand,
x.melding_accepted datum_in_behandeling, -- / Res. def. / Offerte
TO_CHAR (x.melding_accepted, 'hh24:mi') datum_in_behandeling_tijd, -- / Res. def. / Offerte tijd
TO_CHAR (x.melding_accepted, 'month') datum_in_behandeling_maand, -- / Res. def. / Offerte maand
NULL datum_opdracht_gereed,
NULL datum_opdracht_gereed_tijd,
NULL datum_technisch_gereed,
NULL datum_technisch_gereed_tijd
FROM mld_v_udr_melding x,
mld_melding m,
(SELECT * FROM prs_v_aanwezigkenmerklink WHERE prs_kenmerk_key = 1008) mc, -- Ministeriecode
fac_v_aanwezigusrdata mc_ud,
prs_perslid p,
prs_v_afdeling_boom ab,
fmhn_v_rap_idm_afdboom k2a, -- Kostenplaats2Afdeling
alg_locatie l,
(SELECT * FROM alg_v_aanwezigonrgoedkenmerk WHERE alg_kenmerk_key = 1060) fm, -- Facilitair Manager
prs_v_perslid_fullnames_all pfm,
prs_v_perslid_fullnames_all pfb
WHERE --x.melding_afgemeld > TRUNC (ADD_MONTHS (SYSDATE, -12), 'yyyy') -- Of m.melding_datum???
COALESCE (fac.gettrackingdate ('MLDAFM', x.melding_key), fac.gettrackingdate ('MLDAFR', x.melding_key)) > TRUNC (ADD_MONTHS (SYSDATE, -12), 'yyyy') -- Of m.melding_datum???
--AND x.sla_nvt = 0 -- Alleen meldingen waarvoor SLA bewaken aangevinkt!
AND INSTR (UPPER (x.subproductgroep), 'KLACHT') > 0
--AND x.prioriteit IN (3, 4) -- Alle prioriteiten, want bronrapport tbv. niet urgente en urgente meldingen!
AND x.melding_key = m.mld_melding_key
AND m.prs_perslid_key_voor = mc.prs_link_key(+)
AND fac.safe_to_number (mc.prs_kenmerklink_waarde) = mc_ud.fac_usrdata_key(+)
AND m.prs_perslid_key_voor = p.prs_perslid_key
AND p.prs_afdeling_key = ab.prs_afdeling_key
AND m.prs_kostenplaats_key = k2a.prs_kostenplaats_key
AND m.mld_alg_locatie_key = l.alg_locatie_key(+)
AND l.alg_district_key = fm.alg_onrgoed_key(+)
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(+);
-- NoShow catering en reserveringen
CREATE OR REPLACE VIEW fmhn_v_rap_res_noshow
AS
SELECT x.res_rsv_artikel_levering fact_datum,
l.alg_locatie_omschrijving gebouw,
pfc.prs_perslid_naam_full aanvrager, -- Was melder
k2a.pad kosten_voor,
TO_CHAR (x.res_reservering_key) || '/' || TO_CHAR (x.res_rsv_ruimte_volgnr) nummer,
x.productdienstnr,
x.productdienstnaam,
'???' omschrijving,
SUM (ROUND (kosten_excl * btw, 2)) kosten_incl,
pfh.prs_perslid_naam_full aanvraag_voor,
x.status,
TO_CHAR (x.res_rsv_artikel_levering, 'yyyy') jaar,
TO_CHAR (x.res_rsv_artikel_levering, 'month') maand,
'???' artikel, -- TODO:602=Studiovoorzieningen en 040=Rest???
'2230.01 Vergaderservice???' dienst,
TRIM (SUBSTR (a2d.debiteur, 1, INSTR (a2d.debiteur, '/') - 1)) departement,
TRIM (SUBSTR (a2d.debiteur, INSTR (a2d.debiteur, '/') + 1)) debiteur,
'60???' kostendrager,
'600-60???' kostenplaats
FROM (SELECT rrr.res_rsv_ruimte_key,
--rr.res_discipline_key, -- 525=Studiovoorzieningen
rrr.res_reservering_key,
rrr.res_rsv_ruimte_volgnr,
aog.alg_locatie_key,
rrr.res_rsv_ruimte_contact_key,
rrr.res_rsv_ruimte_host_key,
rra.res_rsv_artikel_levering,
--ra.res_artikel_omschrijving,
--ra.res_artikel_eenheid,
--ra.res_artikel_prijs,
--ra.res_artikel_btw,
--rra.res_rsv_artikel_aantal,
--rra.res_rsv_artikel_prijs,
res.getartikelprijs (rra.res_rsv_artikel_key) kosten_excl,
--(100 + COALESCE (rra.res_rsv_artikel_btw, 0)) / 100 btw,
DECODE (planonnr.res_rsv_ruimte_key,
NULL,
(100 + COALESCE (rra.res_rsv_artikel_btw, 0)) / 100,
(100 + COALESCE (ra.res_artikel_btw, 0)) / 100)
btw,
DECODE (rrr.res_activiteit_key, 11, '2230.01', '1430.02')
productdienstnr,
DECODE (rrr.res_activiteit_key, 11, 'Roomservice', 'Reservering vergaderzalen') -- TODO:???
productdienstnaam,
rrr.prs_kostenplaats_key,
s.res_status_bo_omschrijving status
FROM res_v_aanwezigrsv_ruimte rrr,
(SELECT * FROM res_v_aanwezigkenmerkwaarde WHERE res_kenmerk_key IN (21, 22, 23, 24)) planonnr, -- Referentienummer
res_ruimte_opstelling rro,
res_ruimte rr,
( SELECT res_ruimte_key, MAX (alg_ruimte_key) alg_ruimte_key
FROM res_alg_ruimte
WHERE res_alg_ruimte_verwijder IS NULL
GROUP BY res_ruimte_key) rar1,
( SELECT res_ruimte_key, MAX (alg_ruimte_key) alg_ruimte_key
FROM res_alg_ruimte
WHERE res_alg_ruimte_verwijder IS NOT NULL
GROUP BY res_ruimte_key) rar2,
alg_v_allonroerendgoed aog,
res_v_aanwezigrsv_artikel rra,
res_artikel ra,
res_status_bo s
WHERE (rrr.res_rsv_ruimte_verwijder IS NULL
OR (rrr.res_rsv_ruimte_verwijder IS NOT NULL AND rrr.res_status_fo_key = 4))
AND rrr.res_rsv_ruimte_tot > TRUNC (ADD_MONTHS (SYSDATE, -12), 'yyyy') -- Of rrr.res_rsv_ruimte_van???
AND rrr.res_rsv_ruimte_dirtlevel = 0
AND COALESCE (rrr.res_rsv_ruimte_bezoekers_shown, rrr.res_rsv_ruimte_noshow) IS NOT NULL -- NoShow
AND rrr.res_rsv_ruimte_key = planonnr.res_rsv_ruimte_key(+)
AND rrr.res_ruimte_opstel_key = rro.res_ruimte_opstel_key(+)
AND rro.res_ruimte_key = rr.res_ruimte_key(+)
AND rr.res_ruimte_key = rar1.res_ruimte_key(+)
AND rr.res_ruimte_key = rar2.res_ruimte_key(+)
AND COALESCE (rar1.alg_ruimte_key, rar2.alg_ruimte_key, rrr.alg_ruimte_key) = aog.alg_ruimte_key
AND rrr.res_rsv_ruimte_key = rra.res_rsv_ruimte_key
AND rra.res_rsv_artikel_dirtlevel = 0
--AND COALESCE (rra.res_rsv_artikel_prijs, ra.res_artikel_prijs) <> 0 -- TODO:Reserveringen zonder kosten negeren???
AND rra.res_artikel_key = ra.res_artikel_key
AND rra.res_status_bo_key = s.res_status_bo_key) x,
alg_locatie l,
fmhn_v_rap_idm_afdboom k2a, -- Kostenplaats2Afdeling
fmhn_v_rap_afd2debnr a2d,
prs_v_perslid_fullnames_all pfc,
prs_v_perslid_fullnames_all pfh
WHERE x.alg_locatie_key = l.alg_locatie_key
AND x.prs_kostenplaats_key = k2a.prs_kostenplaats_key
AND k2a.prs_afdeling_key = a2d.prs_afdeling_key
AND x.res_rsv_ruimte_contact_key = pfc.prs_perslid_key(+)
AND x.res_rsv_ruimte_host_key = pfh.prs_perslid_key(+)
GROUP BY x.res_rsv_artikel_levering,
l.alg_locatie_omschrijving,
pfc.prs_perslid_naam_full,
k2a.pad,
TO_CHAR (x.res_reservering_key) || '/' || TO_CHAR (x.res_rsv_ruimte_volgnr),
x.productdienstnr,
x.productdienstnaam,
'???',
pfh.prs_perslid_naam_full,
x.status,
TO_CHAR (x.res_rsv_artikel_levering, 'yyyy'),
TO_CHAR (x.res_rsv_artikel_levering, 'month'),
'???',
'2230.01 Vergaderservice???',
TRIM (SUBSTR (a2d.debiteur, 1, INSTR (a2d.debiteur, '/') - 1)),
TRIM (SUBSTR (a2d.debiteur, INSTR (a2d.debiteur, '/') + 1)),
'60???',
'600-60???';
/*
-- Afhandeling klachten.
CREATE OR REPLACE VIEW fmhn_v_udr_afh_klachten
AS
SELECT m.meldingnummer,
m.melding_start_key,
m.melding_regio,
m.melding_district,
m.melding_locatiecode,
m.melding_locatie,
m.melding_locatieplaats,
m.melding_gebouwcode,
m.melding_gebouw,
m.melding_verdieping,
m.melding_ruimtenr,
m.melding_ruimte,
m.kostensoortgroep,
m.kostensoort,
m.kostenplaats,
m.kostenplaats_oms,
m.melder,
m.afdeling,
m.afdeling_omschrijving afdeling_oms,
m.invoerder,
m.meldbron,
m.soortmelding vakgroeptype,
m.productgroep vakgroep,
m.subproductgroep soortmelding,
m.behandelgroep,
m.behandelaar,
m.actieve_behandelgroep,
m.actieve_behandelaar,
m.melding_status,
m.sla_nvt,
m.sla_accptdgn,
m.sla_accpturen,
m.sla_werkdgn,
m.sla_werkuren,
m.plan_uitvoertijd_sla,
m.melding_datum,
m.melding_einddatum,
m.melding_einddatum_std,
m.melding_acceptdatum,
m.melding_afgemeld,
m.melding_accepted,
m.doorlooptijd_werkdgn,
m.doorlooptijd_werkuren,
m.onderwerp,
m.vomschrijving omschrijving,
m.melding_opmerking,
m.prioriteit,
m.rating,
m.rating_opmerking rating_opm,
m.actiecode,
m.accept_sla_dagen,
m.accept_sla_uren,
m.uitvoering_sla_dagen,
m.uitvoering_sla_uren,
m.afspraak_sla_dagen,
m.afspraak_sla_uren,
DECODE (UPPER (m.accept_sla_optijd), 'JA', 1, 0) accept_sla_optijd,
1 - DECODE (UPPER (m.accept_sla_optijd), 'JA', 1, 0) accept_sla_telaat,
DECODE (UPPER (m.uitvoering_sla_optijd), 'JA', 1, 0) uitvoering_sla_optijd,
1 - DECODE (UPPER (m.uitvoering_sla_optijd), 'JA', 1, 0) uitvoering_sla_telaat,
DECODE (UPPER (m.afspraak_sla_optijd), 'JA', 1, 0) afspraak_sla_optijd,
1 - DECODE (UPPER (m.afspraak_sla_optijd), 'JA', 1, 0) afspraak_sla_telaat,
m.selfservice,
TO_CHAR (m.melding_afgemeld, 'yyyy-mm') maand
SELECT *
FROM mld_v_udr_melding m
WHERE m.melding_afgemeld > TRUNC (ADD_MONTHS (SYSDATE, -12), 'yyyy') -- Of m.melding_datum
--AND m.sla_nvt = 0
AND INSTR (UPPER (subproductgroep), 'KLACHT') > 0
;
AND INSTR (UPPER (subproductgroep), 'KLACHT') > 0;
-- Facilitair oog.
CREATE OR REPLACE VIEW fmhn_v_udr_facilitair_oog
AS
SELECT m.meldingnummer,
m.melding_start_key,
m.melding_regio,
m.melding_district,
m.melding_locatiecode,
m.melding_locatie,
m.melding_locatieplaats,
m.melding_gebouwcode,
m.melding_gebouw,
m.melding_verdieping,
m.melding_ruimtenr,
m.melding_ruimte,
m.kostensoortgroep,
m.kostensoort,
m.kostenplaats,
m.kostenplaats_oms,
m.melder,
m.afdeling,
m.afdeling_omschrijving afdeling_oms,
m.invoerder,
m.meldbron,
m.soortmelding vakgroeptype,
m.productgroep vakgroep,
m.subproductgroep soortmelding,
m.behandelgroep,
m.behandelaar,
m.actieve_behandelgroep,
m.actieve_behandelaar,
m.melding_status,
m.sla_nvt,
m.sla_accptdgn,
m.sla_accpturen,
m.sla_werkdgn,
m.sla_werkuren,
m.plan_uitvoertijd_sla,
m.melding_datum,
m.melding_einddatum,
m.melding_einddatum_std,
m.melding_acceptdatum,
m.melding_afgemeld,
m.melding_accepted,
m.doorlooptijd_werkdgn,
m.doorlooptijd_werkuren,
m.onderwerp,
m.vomschrijving omschrijving,
m.melding_opmerking,
m.prioriteit,
m.rating,
m.rating_opmerking rating_opm,
m.actiecode,
m.accept_sla_dagen,
m.accept_sla_uren,
m.uitvoering_sla_dagen,
m.uitvoering_sla_uren,
m.afspraak_sla_dagen,
m.afspraak_sla_uren,
DECODE (UPPER (m.accept_sla_optijd), 'JA', 1, 0) accept_sla_optijd,
1 - DECODE (UPPER (m.accept_sla_optijd), 'JA', 1, 0) accept_sla_telaat,
DECODE (UPPER (m.uitvoering_sla_optijd), 'JA', 1, 0) uitvoering_sla_optijd,
1 - DECODE (UPPER (m.uitvoering_sla_optijd), 'JA', 1, 0) uitvoering_sla_telaat,
DECODE (UPPER (m.afspraak_sla_optijd), 'JA', 1, 0) afspraak_sla_optijd,
1 - DECODE (UPPER (m.afspraak_sla_optijd), 'JA', 1, 0) afspraak_sla_telaat,
m.selfservice,
TO_CHAR (m.melding_afgemeld, 'yyyy-mm') maand,
DECODE (ab.prs_afdeling_key5, -1, 1, 0) facilitair_oog -- TODO:Key van FMH in BZK-afdelingsboom
SELECT *
FROM mld_v_udr_melding m, mld_melding m, prs_perslid p, prs_v_afdeling_boom ab
WHERE m.melding_afgemeld > TRUNC (ADD_MONTHS (SYSDATE, -12), 'yyyy') -- Of m.melding_datum
--AND m.sla_nvt = 0
@@ -9751,114 +9971,22 @@ SELECT m.meldingnummer,
--AND prioriteit IN (1, 2)
AND SUBSTR (m.meldingnummer, REGEXP_INSTR (m.meldingnummer, '\d')) = TO_CHAR (m.mld_melding_key)
AND fac.gettrackinguserkey ('MLDNEW', m.mld_melding_key) = p.prs_perslid_key
AND p.prs_afdeling_key = ab.prs_afdeling_key
;
AND p.prs_afdeling_key = ab.prs_afdeling_key;
-- Afhandeling urgente meldingen.
CREATE OR REPLACE VIEW fmhn_v_udr_afh_mld_prio
AS
SELECT m.meldingnummer,
m.melding_start_key,
m.melding_regio,
m.melding_district,
m.melding_locatiecode,
m.melding_locatie,
m.melding_locatieplaats,
m.melding_gebouwcode,
m.melding_gebouw,
m.melding_verdieping,
m.melding_ruimtenr,
m.melding_ruimte,
m.kostensoortgroep,
m.kostensoort,
m.kostenplaats,
m.kostenplaats_oms,
m.melder,
m.afdeling,
m.afdeling_omschrijving afdeling_oms,
m.invoerder,
m.meldbron,
m.soortmelding vakgroeptype,
m.productgroep vakgroep,
m.subproductgroep soortmelding,
m.behandelgroep,
m.behandelaar,
m.actieve_behandelgroep,
m.actieve_behandelaar,
m.melding_status,
m.sla_nvt,
m.sla_accptdgn,
m.sla_accpturen,
m.sla_werkdgn,
m.sla_werkuren,
m.plan_uitvoertijd_sla,
m.melding_datum,
m.melding_einddatum,
m.melding_einddatum_std,
m.melding_acceptdatum,
m.melding_afgemeld,
m.melding_accepted,
m.doorlooptijd_werkdgn,
m.doorlooptijd_werkuren,
m.onderwerp,
m.vomschrijving omschrijving,
m.melding_opmerking,
m.prioriteit,
m.rating,
m.rating_opmerking rating_opm,
m.actiecode,
m.accept_sla_dagen,
m.accept_sla_uren,
m.uitvoering_sla_dagen,
m.uitvoering_sla_uren,
m.afspraak_sla_dagen,
m.afspraak_sla_uren,
DECODE (UPPER (m.accept_sla_optijd), 'JA', 1, 0) accept_sla_optijd,
1 - DECODE (UPPER (m.accept_sla_optijd), 'JA', 1, 0) accept_sla_telaat,
DECODE (UPPER (m.uitvoering_sla_optijd), 'JA', 1, 0) uitvoering_sla_optijd,
1 - DECODE (UPPER (m.uitvoering_sla_optijd), 'JA', 1, 0) uitvoering_sla_telaat,
DECODE (UPPER (m.afspraak_sla_optijd), 'JA', 1, 0) afspraak_sla_optijd,
1 - DECODE (UPPER (m.afspraak_sla_optijd), 'JA', 1, 0) afspraak_sla_telaat,
m.selfservice,
TO_CHAR (m.melding_afgemeld, 'yyyy-mm') maand
SELECT *
FROM mld_v_udr_melding m
WHERE m.melding_afgemeld > TRUNC (ADD_MONTHS (SYSDATE, -12), 'yyyy') -- Of m.melding_datum
AND m.sla_nvt = 0
AND INSTR (UPPER (subproductgroep), 'KLACHT') = 0
AND prioriteit IN (1, 2)
;
AND prioriteit IN (1, 2);
-- NoShow catering en reserveringen
CREATE OR REPLACE VIEW fmhn_v_udr_res_noshow
AS
SELECT DISTINCT
b.prs_bedrijf_naam,
p.prs_afdeling_key,
SUBSTR (a.prs_afdeling_externid, 3) afdnr,
a.prs_afdeling_naam afdcode,
a.prs_afdeling_omschrijving afdoms,
d.alg_district_omschrijving district,
l.alg_locatie_code locatiecode,
l.alg_locatie_omschrijving locatie,
aog.alg_gebouw_code gebouwcode,
aog.alg_gebouw_naam gebouw,
rrr.res_rsv_ruimte_key,
rrr.res_reservering_key || '/' || rrr.res_rsv_ruimte_volgnr resid,
rrr.res_rsv_ruimte_van datum,
rrr.res_rsv_ruimte_van,
rrr.res_rsv_ruimte_tot,
act.res_activiteit_omschrijving activiteit,
rrr.res_rsv_ruimte_omschrijving omschrijving,
--rra.res_rsv_artikel_aantal aantal,
--ra.res_artikel_omschrijving artikel,
--res.getartikelprijs (rra.res_rsv_artikel_key) prijs,
rrr.res_rsv_ruimte_bezoekers aantal_pers,
rrr.res_rsv_ruimte_bezoekers_shown aantal_show,
rrr.res_rsv_ruimte_noshow noshow,
rrr.res_status_fo_key fo_status,
rrr.res_status_bo_key bo_status,
rrr.res_rsv_ruimte_verwijder,
TO_CHAR (rrr.res_rsv_ruimte_van, 'yyyy-mm') maand
SELECT *
FROM res_rsv_ruimte rrr,
res_v_aanwezigrsv_artikel rra,
res_artikel ra,
@@ -9893,9 +10021,8 @@ AS
AND rro.res_ruimte_key = rar2.res_ruimte_key(+)
AND COALESCE (rar1.alg_ruimte_key, rar2.alg_ruimte_key, rrr.alg_ruimte_key) = aog.alg_ruimte_key
AND aog.alg_locatie_key = l.alg_locatie_key
AND l.alg_district_key = d.alg_district_key
;
AND l.alg_district_key = d.alg_district_key;
*/
-- Openstaande meldingen vandaag en komende 5 werkdagen
CREATE OR REPLACE VIEW fmhn_v_udr_mld_open_d
AS
@@ -12165,7 +12292,7 @@ AS
x.mld_melding_kto_verstuurd,
'melding' node,
x.ins_srtdiscipline_key,
DECODE (x.ins_srtdiscipline_key,
DECODE (x.ins_srtdiscipline_key, -- Let op: mapping ook in stylesheet
24, 'Aanvraag',
29, 'Storing',
30, 'Storing',