NMMS#24399 -- Implementatie PPS Soesterberg

svn path=/Customer/trunk/; revision=23241
This commit is contained in:
Arthur Egberink
2014-11-04 16:16:22 +00:00
parent 8b379183fa
commit fcd072af56

View File

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