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

BVB1#81005 -- Meldingen KPI

Browse Source 
svn path=/Customer/trunk/; revision=62903
This commit is contained in:
Arthur Egberink
2023-12-08 10:30:52 +00:00
parent f5c1fc3fc3
commit f92c91469d
1 changed files with 69 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

71
BVB1/bvb1.sql
View File

@@ -35,11 +35,13 @@ AS
CURSOR c IS
SELECT mld_melding_key
FROM mld_melding m, mld_stdmelding std
FROM mld_melding m, mld_stdmelding std, mld_discipline d
WHERE m.mld_stdmelding_key = std.mld_stdmelding_key
AND std.mld_ins_discipline_key = d.ins_discipline_key
AND d.ins_srtdiscipline_key IN (2,3) -- Storingen en interne actielijst
AND BITAND(std.mld_stdmelding_planbaar,4) = 4
AND m.mld_melding_status = 4
AND mld_melding_actiedatum IS NULL;
AND mld_melding_actiedatum IS NULL AND 1=0;
v_tijdsduur NUMBER;
v_eenheid VARCHAR2(1);
@@ -367,6 +369,71 @@ AS
AND m.mld_melding_status NOT IN (1) -- Afgewezen
AND datums.datum BETWEEN mld_melding_datum AND COALESCE(MLD.getmeldingstatusdate(m.mld_melding_key, 5), SYSDATE +1));
-- KPI views voor meldingen
CREATE OR REPLACE VIEW bvb1_v_rap_meldingen_per_maand
AS
WITH
mld_melding_freezes
AS
(SELECT mld_melding_key,
mld_melding_datum,
COALESCE (mld.getmeldingstatusdate (m.mld_melding_key, 5), SYSDATE + 600) mld_melding_afgemeld,
mld_melding_einddatum_std,
ins_srtdiscipline_omschrijving
FROM mld_melding m,
mld_stdmelding std,
mld_discipline d,
ins_srtdiscipline sd
WHERE m.mld_stdmelding_key = std.mld_stdmelding_key
AND std.mld_ins_discipline_key = d.ins_discipline_key
AND d.ins_srtdiscipline_key = sd.ins_srtdiscipline_key),
maanden
AS
( SELECT LEVEL lvl
FROM DUAL
CONNECT BY LEVEL <= 12),
startdatum AS (SELECT ADD_MONTHS (TRUNC (SYSDATE, 'MM'), -12) datum FROM DUAL)
SELECT ADD_MONTHS (sd.datum, maanden.lvl - 1) maand,
'aangemaakt' status,
ins_srtdiscipline_omschrijving soortdisc,
m.mld_melding_key
FROM mld_melding_freezes m, maanden, startdatum sd
WHERE mld_melding_datum BETWEEN ADD_MONTHS (sd.datum, maanden.lvl - 1) AND ADD_MONTHS (sd.datum, maanden.lvl)
UNION ALL
SELECT ADD_MONTHS (sd.datum, maanden.lvl - 1) maand,
'afgemeld op tijd',
ins_srtdiscipline_omschrijving soortdisc,
m.mld_melding_key
FROM mld_melding_freezes m, maanden, startdatum sd
WHERE m.mld_melding_afgemeld BETWEEN ADD_MONTHS (sd.datum, maanden.lvl - 1)
AND ADD_MONTHS (sd.datum, maanden.lvl)
AND mld_melding_afgemeld < mld_melding_einddatum_std
UNION ALL
SELECT ADD_MONTHS (sd.datum, maanden.lvl - 1) maand,
'afgemeld te laat',
ins_srtdiscipline_omschrijving soortdisc,
m.mld_melding_key
FROM mld_melding_freezes m, maanden, startdatum sd
WHERE m.mld_melding_afgemeld BETWEEN ADD_MONTHS (sd.datum, maanden.lvl - 1)
AND ADD_MONTHS (sd.datum, maanden.lvl)
AND mld_melding_afgemeld > mld_melding_einddatum_std
UNION ALL
SELECT ADD_MONTHS (sd.datum, maanden.lvl - 1) maand,
'afgemeld',
ins_srtdiscipline_omschrijving soortdisc,
m.mld_melding_key
FROM mld_melding_freezes m, maanden, startdatum sd
WHERE m.mld_melding_afgemeld BETWEEN ADD_MONTHS (sd.datum, maanden.lvl - 1) AND ADD_MONTHS (sd.datum, maanden.lvl)
UNION ALL
SELECT ADD_MONTHS (sd.datum, maanden.lvl - 1) maand,
'open',
ins_srtdiscipline_omschrijving soortdisc,
m.mld_melding_key
FROM mld_melding_freezes m, maanden, startdatum sd
WHERE m.mld_melding_datum < ADD_MONTHS (sd.datum, maanden.lvl - 1)
AND m.mld_melding_afgemeld > ADD_MONTHS (sd.datum, maanden.lvl)
AND mld_melding_afgemeld > mld_melding_einddatum_std;
-- View om QR-codes bij objecten te tonen.
CREATE OR REPLACE VIEW bvb1_v_rap_qr_deel
AS