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

PCHD#41213 -- TV Schermen voor monitoring

Browse Source 
svn path=/Customer/trunk/; revision=35995
This commit is contained in:
Arthur Egberink
2017-11-15 07:48:00 +00:00
parent c58a08830f
commit 1589e8b858
1 changed files with 102 additions and 8 deletions
Download Patch File Download Diff File Expand all files Collapse all files

110
PCHX/pchx_mon.sql
View File

@@ -87,6 +87,7 @@ AS
)
AND m1.mld_melding_key <> m2.mld_melding_key
AND m2.mld_melding_indult <> 1
AND m1.mld_melding_indult <> 1
AND m2.mld_melding_status <> 1 -- Afgewezen
AND m1.mld_melding_datum BETWEEN m2.mld_melding_datum
AND COALESCE(fac.gettrackingdate ('MLDAFM', m2.mld_melding_key), SYSDATE)
@@ -569,7 +570,7 @@ AS
WHERE b.prs_bedrijf_key = g.prs_bedrijf_key)
prs_bedrijf_naam,
DECODE (antedateren + g.respijt.tijdsduur + mld_melding_indult + mld_melding_afgerond, 0, 0, 1),
PCHX.get_kenmerk('MLD', DECODE(PCHX.get_user, 'PCHA', 61, -1), m_start),
PCHX.get_kenmerk('MLD', DECODE(PCHX.get_user, 'PCHA', 61, 121), m_start),
ins_srtdiscipline_prefix
FROM (SELECT m.m_start,
m.aantal,
@@ -973,6 +974,7 @@ CREATE OR REPLACE VIEW pchx_v_monitoring_history
hide_f_stdmelding_key,
wegingsfactor,
overlappend,
kinderen,
klant_melding,
bedrijf,
melding_omschrijving,
@@ -1006,6 +1008,7 @@ AS
stdmelding_key,
wegingsfactor,
overlappend,
kinderen,
klant_melding,
prs_bedrijf_naam,
melding_omschrijving,
@@ -1238,7 +1241,7 @@ CREATE OR REPLACE PROCEDURE pchx_select_freeze_mon (
AS
CURSOR c1
IS
SELECT melding_key
SELECT melding_key, indult
FROM pchx_v_monitoring
WHERE status = 'Afgemeld'
AND gereed < TRUNC (SYSDATE, 'MONTH')
@@ -1271,7 +1274,8 @@ AS
CURSOR c3
IS
SELECT * FROM pchx_v_monitoring_tot;
SELECT * FROM pchx_v_monitoring_tot
WHERE groep <> 'Overschrijding';
CURSOR c_svd_opdracht
IS
@@ -1287,8 +1291,8 @@ AS
AND xml_node = 'artikel'
AND datum < TRUNC (SYSDATE, 'MONTH');
v_exportdate DATE;
v_lastexport DATE;
v_exportdate DATE;
v_lastexport DATE;
v_kortingen_totaal NUMBER(11,2);
v_svd_totaal NUMBER(11,2);
BEGIN
@@ -1406,8 +1410,8 @@ BEGIN
END;
END LOOP;
INSERT INTO pchx_monitoring (melding_key, export_datum)
SELECT mld_melding_key, SYSDATE
INSERT INTO pchx_monitoring (melding_key, indult, export_datum)
SELECT mld_melding_key, DECODE(mld_melding_indult, 1, 'Ja', 'Nee'), v_exportdate
FROM mld_melding m
WHERE m.mld_melding_status = 6 -- Historie
AND fac.gettrackingdate ('MLDAFM', m.mld_melding_key) <
@@ -1416,11 +1420,53 @@ BEGIN
FROM pchx_monitoring nm
WHERE nm.melding_key IS NOT NULL);
IF PCHX.get_user = 'PCHW'
THEN
-- Voeg de overschrijdingskorting toe.
INSERT INTO pchx_monitoring (begin,
gereed,
groep,
variabelekorting,
totaal,
totaal_index,
kinderen,
export_datum)
SELECT ADD_MONTHS(TRUNC (SYSDATE, 'MONTH'), -1) begin,
TRUNC (SYSDATE, 'MONTH') gereed,
'Overschrijding' groep,
250 variabelekorting,
250 * (COUNT ( * ) - 10) * DECODE (SIGN (COUNT ( * ) - 10), 1, 1, 0) totaal,
PCHX_MON.get_index_value(TRUNC(SYSDATE)-1, 'MON') * 250 * (COUNT ( * ) - 10) * DECODE (SIGN (COUNT ( * ) - 10), 1, 1, 0) totaal_index,
listagg (melding_key, ',') WITHIN GROUP (ORDER BY melding_key) AS kinderen, -- kinderen bij overschrijdingskorting
v_exportdate
FROM pchx_monitoring
WHERE totaal IS NOT NULL
AND totaal <> 0
AND COALESCE(groep, 'Quequleque') <> 'Overschrijding'
AND export_datum = v_exportdate
GROUP BY 'Overschrijding'
UNION ALL
SELECT ADD_MONTHS(TRUNC (SYSDATE, 'MONTH'), -1) begin,
TRUNC (SYSDATE, 'MONTH') gereed,
'Overschrijding' groep,
50 variabelekorting,
50 * (COUNT ( * ) - 20) * DECODE (SIGN (COUNT ( * ) - 20), 1, 1, 0) totaal,
PCHX_MON.get_index_value(TRUNC(SYSDATE)-1, 'MON') * 50 * (COUNT ( * ) - 20) * DECODE (SIGN (COUNT ( * ) - 20), 1, 1, 0) totaal_index,
listagg (melding_key, ',') WITHIN GROUP (ORDER BY melding_key) AS kinderen, -- kinderen bij overschrijdingskorting
v_exportdate
FROM pchx_monitoring
WHERE COALESCE(groep, 'Quequleque') <> 'Overschrijding'
AND indult = 'Nee'
AND export_datum = v_exportdate
GROUP BY 'Overschrijding';
END IF;
SELECT SUM(totaal)
INTO v_kortingen_totaal
FROM pchx_monitoring
WHERE export_datum = v_exportdate;
INSERT INTO fac_rapport (fac_rapport_node, fac_rapport_regel, fac_rapport_volgnr)
VALUES ('FREEZE', 'Kortingen totaal: ' || v_kortingen_totaal, 1);
@@ -1521,7 +1567,7 @@ BEGIN
WHERE export_datum = v_exportdate;
INSERT INTO fac_rapport (fac_rapport_node, fac_rapport_regel, fac_rapport_volgnr)
VALUES ('FREEZE', 'Kortingen totaal: ' || v_svd_totaal, 2);
VALUES ('FREEZE', 'SVD totaal: ' || v_svd_totaal, 2);
ELSE
INSERT INTO fac_rapport (fac_rapport_node, fac_rapport_regel, fac_rapport_volgnr)
VALUES ('FREEZE', 'SVDs zijn al bevroren deze maand op ' || TO_CHAR(v_lastexport, 'dd-mm-yyyy hh24:mi:ss'), 2);
@@ -1744,6 +1790,54 @@ AS
AND gg.fac_groep_key = 63
AND pchx.get_user = 'PCHW';
CREATE OR REPLACE VIEW pchx_v_dashboard_korting
(
melding,
omschrijving,
bedrijf_malus,
marge,
hide_f_marge,
totaal_index,
tht_tijdstip,
eenheid,
tht,
status,
basiskorting,
variabelekorting
)
AS
SELECT melding_key,
omschrijving,
bedrijf_malus,
(SELECT ROUND (
m.mld_melding_t_uitvoertijd.tijdsduur
- mld.getactualuitvoer (m.mld_melding_key).tijdsduur,
2)
|| ' '
|| m.mld_melding_t_uitvoertijd.eenheid
FROM mld_melding m
WHERE mo.melding_key = m.mld_melding_key)
marge_txt,
(SELECT ROUND (
m.mld_melding_t_uitvoertijd.tijdsduur
- mld.getactualuitvoer (m.mld_melding_key).tijdsduur,
2)
FROM mld_melding m
WHERE mo.melding_key = m.mld_melding_key)
marge,
ROUND (totaal_index)
totaal_index,
thtijdstip,
eenheid,
tht,
status,
basiskorting,
variabelekorting
FROM pchx_v_monitoring mo
WHERE gereed IS NULL AND indult <> 'Ja';
------ payload end ------
SET DEFINE OFF