From fcd072af56bcc25109e03c34f0daff5cd495487c Mon Sep 17 00:00:00 2001 From: Arthur Egberink Date: Tue, 4 Nov 2014 16:16:22 +0000 Subject: [PATCH] NMMS#24399 -- Implementatie PPS Soesterberg svn path=/Customer/trunk/; revision=23241 --- NMMS/nmms.sql | 222 ++++++++++++++++++++++++++++---------------------- 1 file changed, 123 insertions(+), 99 deletions(-) diff --git a/NMMS/nmms.sql b/NMMS/nmms.sql index afec87c07..e49eb3298 100644 --- a/NMMS/nmms.sql +++ b/NMMS/nmms.sql @@ -152,6 +152,7 @@ AS WHERE o.mld_uitvoerende_keys = kl.prs_link_key AND prs_kenmerk_key = 1000 -- MA/CP AND prs_kostenplaats_key <> 1 -- AAFM + AND prs_kenmerklink_waarde = 161 -- MA AND mld_statusopdr_key = 9; BEGIN FOR rec IN c @@ -304,6 +305,7 @@ CREATE OR REPLACE VIEW nmms_v_monitoring gereed, thtijdstip, verwerkt, + eenheid, tht, wht, regime, @@ -336,7 +338,7 @@ AS DECODE (COALESCE (mld_melding_indult, 0), 0, 'Nee', 'Ja'), DECODE (g.respijt.tijdsduur, 0, NULL, - TO_CHAR (ROUND (g.respijt.tijdsduur, 2)) || g.respijt.eenheid) + TO_CHAR (ROUND (g.respijt.tijdsduur, 2))) respijt, -- Of Uren/Dagen??? => Maakt niet uit prs_kostenplaats_nr, alg_locatie_code, @@ -356,14 +358,15 @@ AS WHERE fac_tracking_refkey = m_start --mld_melding_key AND fac_srtnotificatie_key = 36) verwerkt, + eenheid, DECODE (kortingtype, - 'Q', NULL, - TO_CHAR (ROUND (g.tht.tijdsduur, 2)) || g.tht.eenheid) - tht_txt, -- Of Uren/Dagen??? => Maakt niet uit + 'Q', TO_NUMBER(NULL), + ROUND (g.tht.tijdsduur, 2)) + tht, DECODE (kortingtype, - 'Q', NULL, - TO_CHAR (ROUND (g.actual.tijdsduur, 2)) || g.actual.eenheid) - wht, -- Of zonder U/D??? => Nu beter + 'Q', TO_NUMBER(NULL), + ROUND (g.actual.tijdsduur, 2)) + wht, DECODE (kortingtype, 'Q', TO_NUMBER (NULL), regime) regime, mld_stdmeldinggroep_naam groep, 'K' || LOWER (kortingtype) || DECODE (q_vervolg, 1, '/q') @@ -374,23 +377,16 @@ AS 'Q', mld_stdmelding_malus) basiskorting, DECODE (kortingtype, 'B', 50, 'S', 1000) variabelekorting, - --DECODE ( - -- telaat, - -- 1, - -- DECODE (kortingtype, - -- 'B', (actual - tht) * 24, - -- 'S', (actual - tht) * 24)) - -- uren, DECODE ( telaat, 1, DECODE ( kortingtype, 'B', - TO_CHAR (ROUND (g.uitloop.tijdsduur, 2)) || g.uitloop.eenheid, + ROUND (g.uitloop.tijdsduur, 2), 'S', - TO_CHAR (ROUND (g.uitloop.tijdsduur, 2)) || g.uitloop.eenheid)) - uren, -- NIET ALTIJD MEER UREN (en ook niet meer numeriek)??? + ROUND (g.uitloop.tijdsduur, 2))) + uren, -- uitloop in beschikbaarheid is altijd 50 euro per uur. --DECODE ( -- telaat, -- 1, @@ -473,6 +469,7 @@ AS std.mld_stdmelding_omschrijving, std.mld_stdmelding_malus, q.vervolg q_vervolg, + m.min_t_sla.eenheid eenheid, m.t_van, m.gereed, m.mld_melding_einddatum_std thtijdstip, -- min_melding_einddatum_std @@ -647,6 +644,7 @@ CREATE OR REPLACE VIEW nmms_v_rap_monitoring begin, gereed, thtijdstip, + eenheid, tht, wht, regime, @@ -688,6 +686,7 @@ AS to_char(begin, 'dd-mm-yyyy hh24:mi:ss') begin, to_char(gereed, 'dd-mm-yyyy hh24:mi:ss') gereed, to_char(thtijdstip, 'dd-mm-yyyy hh24:mi:ss') thtijdstip, + eenheid, tht, wht, regime, @@ -729,6 +728,7 @@ CREATE OR REPLACE VIEW nmms_v_rap_monitoring_og begin, gereed, thtijdstip, + eenheid, tht, wht, regime, @@ -763,6 +763,7 @@ AS begin, gereed, thtijdstip, + eenheid, tht, wht, regime, @@ -803,6 +804,7 @@ CREATE OR REPLACE VIEW nmms_v_monitoring_tot gereed, thtijdstip, verwerkt, + eenheid, tht, wht, regime, @@ -838,6 +840,7 @@ AS gereed, thtijdstip, verwerkt, + eenheid, tht, wht, regime, @@ -882,6 +885,7 @@ AS NULL, NULL, NULL, + NULL, 'Kh', NULL, NULL, @@ -924,6 +928,7 @@ AS NULL, NULL, NULL, + NULL, 'Kh', NULL, NULL, @@ -968,6 +973,7 @@ AS NULL, NULL, NULL, + NULL, 'Kh', NULL, NULL, @@ -1011,6 +1017,7 @@ AS NULL, NULL, NULL, + NULL, 'Kh', NULL, NULL, @@ -1053,6 +1060,7 @@ CREATE OR REPLACE VIEW nmms_v_rap_monitoring_tot begin, gereed, thtijdstip, + eenheid, tht, wht, regime, @@ -1092,6 +1100,7 @@ AS to_char(begin, 'dd-mm-yyyy hh24:mi:ss') begin, to_char(gereed, 'dd-mm-yyyy hh24:mi:ss') gereed, to_char(thtijdstip, 'dd-mm-yyyy hh24:mi:ss') thtijdstip, + eenheid, tht, wht, regime, @@ -1216,28 +1225,34 @@ AS FROM nmms_v_monitoring WHERE status = 'Afgemeld' AND gereed < TRUNC (SYSDATE, 'MONTH') - AND afw IS NULL -- geen afwijkingen die goedgekeurd moeten worden + AND afw IS NULL -- geen afwijkingen die goedgekeurd moeten worden AND afgerond IS NULL; -- expliciete goedkeuring staat niet aan CURSOR c2 IS - SELECT m_start, m.mld_melding_key, (SELECT mld_melding_status - FROM mld_melding ms - WHERE ms.mld_melding_key = m_start) - mld_melding_status + SELECT m_start, + m.mld_melding_key, + (SELECT mld_melding_status + FROM mld_melding ms + WHERE ms.mld_melding_key = m_start) + mld_melding_status FROM (SELECT nmms.get_first_melding (mld_melding_key, 1) m_start, fac.gettrackingdate ('MLDAFM', m.mld_melding_key) gereed, m.* FROM mld_melding m WHERE m.mld_melding_parentkey IS NULL - AND fac.gettrackingdate ('MLDAFM', m.mld_melding_key) < TRUNC (SYSDATE, 'MONTH') + AND fac.gettrackingdate ('MLDAFM', m.mld_melding_key) < + TRUNC (SYSDATE, 'MONTH') AND m.mld_melding_key NOT IN (SELECT melding_key FROM nmms_monitoring)) m, nmms_v_monitoring mo - WHERE m_start <> m.mld_melding_key - AND m_start = mo.melding_key - AND ( (status = 'Afgemeld' AND afw IS NULL) -- startmelding mag niet hangen op goedkeuring - OR (status = 'Historie' )); + WHERE m_start <> m.mld_melding_key AND m_start = mo.melding_key + AND ( (status = 'Afgemeld' AND afw IS NULL) -- startmelding mag niet hangen op goedkeuring + OR (status = 'Historie')); + + CURSOR c3 + IS + SELECT * FROM nmms_v_monitoring_tot; BEGIN -- Zet de meldingen die geen afwijking kennen en die niet op status afgerond staan naar status verwerkt FOR rec IN c1 @@ -1265,86 +1280,95 @@ BEGIN -- Voeg de entries uit het monitoringsoverzicht toe aan de freeze tabel. - INSERT INTO nmms_monitoring (melding_key, - afw, - q_vervolg, - indult, - respijt, - ruimte, - object, - thema, - omschrijving, - begin, - gereed, - thtijdstip, - verwerkt, - tht, - wht, - regime, - groep, - typekorting, - basiskorting, - variabelekorting, - uren, - kb, - prestatiekorting, - factor, - kp, - herhalingskorting, - aantal, - kh, - wegingsfactor, - dienst, - stdmelding_key, - totaal, - kinderen, - export_datum) - SELECT melding_key, - afw, - q_vervolg, - indult, - respijt, - ruimte, - object, - thema, - omschrijving, - begin, - gereed, - thtijdstip, - verwerkt, - tht, - wht, - regime, - groep, - typekorting, - basiskorting, - variabelekorting, - uren, - kb, - prestatiekorting, - factor, - kp, - herhalingskorting, - aantal, - kh, - wegingsfactor, - dienst, - stdmelding_key, - DECODE(respijt, 'Ja', 0, totaal), - kinderen, - SYSDATE - FROM nmms_v_monitoring_tot; + FOR rec IN c3 + LOOP + BEGIN + BEGIN + INSERT INTO nmms_monitoring (melding_key, + afw, + q_vervolg, + indult, + respijt, + ruimte, + object, + thema, + omschrijving, + begin, + gereed, + thtijdstip, + verwerkt, + eenheid, + tht, + wht, + regime, + groep, + typekorting, + basiskorting, + variabelekorting, + uren, + kb, + prestatiekorting, + factor, + kp, + herhalingskorting, + aantal, + kh, + wegingsfactor, + dienst, + stdmelding_key, + totaal, + kinderen, + export_datum) + VALUES (rec.melding_key, + rec.afw, + rec.q_vervolg, + rec.indult, + rec.respijt, + rec.ruimte, + rec.object, + rec.thema, + rec.omschrijving, + rec.begin, + rec.gereed, + rec.thtijdstip, + rec.verwerkt, + rec.eenheid, + rec.tht, + rec.wht, + rec.regime, + rec.groep, + rec.typekorting, + rec.basiskorting, + rec.variabelekorting, + rec.uren, + rec.kb, + rec.prestatiekorting, + rec.factor, + rec.kp, + rec.herhalingskorting, + rec.aantal, + rec.kh, + rec.wegingsfactor, + rec.dienst, + rec.stdmelding_key, + DECODE (rec.respijt, 'Ja', 0, rec.totaal), + rec.kinderen, + SYSDATE); + END; + END; + END LOOP; INSERT INTO nmms_monitoring (melding_key, export_datum) SELECT mld_melding_key, SYSDATE FROM mld_melding m - WHERE m.mld_melding_status = 6 -- Historie - AND fac.gettrackingdate ('MLDAFM', m.mld_melding_key) < TRUNC (SYSDATE, 'MONTH') + WHERE m.mld_melding_status = 6 -- Historie + AND fac.gettrackingdate ('MLDAFM', m.mld_melding_key) < + TRUNC (SYSDATE, 'MONTH') AND m.mld_melding_key NOT IN (SELECT nm.melding_key FROM nmms_monitoring nm WHERE nm.melding_key IS NOT NULL); - COMMIT; + COMMIT; END nmms_export_freeze_monitoring; /