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=35996
This commit is contained in:
Arthur Egberink
2017-11-15 07:49:38 +00:00
parent 1589e8b858
commit c4738523ad
1 changed files with 44 additions and 22 deletions
Download Patch File Download Diff File Expand all files Collapse all files

66
PCHA/pcha.sql
View File

@@ -40,7 +40,7 @@ BEGIN
UPDATE alg_srtruimte
SET alg_srtruimte_code = SUBSTR (alg_srtruimte_omschrijving, 1, 7)
WHERE alg_srtruimte_code IS NULL;
-- pas de openingstijden van de ruimten aan waar een 24/7 regime geldt. Verder geldt voor
-- deze ruimten ook dat de sla in het weekend door telt.
UPDATE alg_ruimte
@@ -95,13 +95,13 @@ AS
v_discipline_key NUMBER;
v_srtdiscipline_key NUMBER;
BEGIN
-- Verwijder nbsp karakters.
UPDATE fac_imp_file
SET fac_imp_file_line = REPLACE (fac_imp_file_line, CHR (160), ' ')
WHERE fac_import_key = p_import_key;
-- Init
header_found := FALSE;
v_fielddelimitor := ';';
@@ -410,7 +410,7 @@ AS
AND ssr.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
AND sd.ins_srtdiscipline_omschrijving IN (SELECT DISTINCT vakgroeptype FROM pcha_imp_storing_regime)
AND sd.ins_srtdiscipline_omschrijving IN (SELECT DISTINCT vakgroeptype FROM pcha_imp_storing_regime)
AND ssr.alg_srtruimte_key = sr.alg_srtruimte_key;
CURSOR c_upd_std
@@ -843,7 +843,7 @@ BEGIN
END IF;
END IF;
END LOOP;
FOR rec IN c_del
LOOP
fac.imp_writelog (
@@ -856,12 +856,12 @@ BEGIN
|| '/'
|| rec.mld_stdmelding_omschrijving
|| ')',
NULL);
NULL);
DELETE mld_stdmsrtruimte WHERE mld_stdmsrtruimte_key = rec. mld_stdmsrtruimte_key;
END LOOP;
-- Als de hersteltijd per ruimtesoort geldt dan moeten we de vlag afhankelijk ook zetten bij de stdmelding.
UPDATE mld_stdmelding std
SET mld_stdmelding_afhankelijk =
@@ -870,7 +870,7 @@ BEGIN
WHERE sr.mld_stdmelding_key = std.mld_stdmelding_key);
-- Als er een uitsplitsing is naar ruimtesoort dan moeten we toch de default uitvoertijd bij de stdmelding
-- invullen. Anders wordt de verkeerde eenheid bij respijt getoond.
-- invullen. Anders wordt de verkeerde eenheid bij respijt getoond.
FOR rec IN c_upd_std
LOOP
UPDATE mld_stdmelding
@@ -924,7 +924,7 @@ AS
v_discipline_key NUMBER;
v_srtdiscipline_key NUMBER;
BEGIN
-- Init
header_found := FALSE;
@@ -955,7 +955,7 @@ BEGIN
fac.imp_getfield (v_newline, v_fielddelimitor, v_vakgroep);
fac.imp_getfield (v_newline, v_fielddelimitor, v_stdmelding);
fac.imp_getfield (v_newline, v_fielddelimitor, v_kenmerk);
fac.imp_getfield (v_newline, v_fielddelimitor, v_dummy);
fac.imp_getfield (v_newline, v_fielddelimitor, v_dummy);
fac.imp_getfield (v_newline, v_fielddelimitor, v_vakgroeptype);
-- Skip until a valid header is found
@@ -1248,7 +1248,7 @@ BEGIN
WHERE fac_import_key = p_import_key;
fac_import_mld (p_import_key);
UPDATE fac_imp_mld SET mld_stdmelding_groep = TRIM(mld_stdmelding_groep);
END;
/
@@ -1355,7 +1355,7 @@ AS
UNION ALL
SELECT 'GLA', 'Gladheidsbestrijding' FROM DUAL);
-- Rapportage om de releatie tussen het bericht uit het GBS en de standaardmelding
-- Rapportage om de releatie tussen het bericht uit het GBS en de standaardmelding
-- in Facilitor zichtbaar te maken.
CREATE OR REPLACE VIEW pcha_v_rap_gbs_storing_def
(
@@ -1554,10 +1554,10 @@ BEGIN
THEN
-- bepalen van de timestamp uit het emailbericht
v_date := fac.safe_to_date(v_datum || ' ' || v_tijdstip, 'dd-mm-yyyy hh24:mi.ss');
IF v_date IS NULL
THEN
v_date := SYSDATE;
v_date := SYSDATE;
END IF;
-- nu gaan we de hersteltijd bepalen
errormsg := '(0x147)';
@@ -1666,9 +1666,9 @@ BEGIN
-- nu de status op afgemeld zetten.
mld.setmeldingstatus (v_melding_key, 5, v_sender);
fac.backtrackaction('MLDAFM', v_melding_key , v_sender, v_date);
-- Vul het kenmerk Bedrijf (malus) met de waarde van Homij uit de eigen tabel
mld.upsertmeldingkenmerk (61, v_melding_key, 182);
ELSE
@@ -1725,7 +1725,7 @@ END;
/
--Klant specifieke view voor het tonen van het totaal korting per kwartaal per onderwerp
CREATE OR REPLACE VIEW PCHA_V_TOTAAL_KORTING_OND
(
@@ -1733,7 +1733,7 @@ CREATE OR REPLACE VIEW PCHA_V_TOTAAL_KORTING_OND
TOTAAL
)
AS
SELECT onderwerp, SUM(totaal)
SELECT onderwerp, SUM(totaal)
FROM (SELECT ins_discipline_omschrijving,
DECODE (
UPPER (ins_discipline_omschrijving),
@@ -1754,9 +1754,31 @@ FROM (SELECT ins_discipline_omschrijving,
AND totaal IS NOT NULL
AND totaal != 0
AND mld_melding_datum > ADD_MONTHS (SYSDATE, -3))
GROUP BY onderwerp;
GROUP BY onderwerp;
-- Dashboard rapport voor nieuwe meldingen.
CREATE OR REPLACE VIEW pcha_v_dashboard_new
AS
SELECT m.mld_melding_key,
pf.prs_perslid_naam_full,
mld_melding_datum,
std.mld_stdmelding_omschrijving,
d.ins_discipline_omschrijving
FROM mld_melding m,
prs_perslid p,
prs_v_perslid_fullnames pf,
prs_afdeling a,
mld_stdmelding std,
ins_tab_discipline d
WHERE m.prs_perslid_key = p.prs_perslid_key
AND p.prs_perslid_naam <> 'Gebouwbeheersysteem GBS'
AND p.prs_perslid_key = pf.prs_perslid_key
AND p.prs_afdeling_key = a.prs_afdeling_key
AND prs_afdeling_naam = 'GLD'
AND m.mld_stdmelding_key = std.mld_stdmelding_key
AND std.mld_ins_discipline_key = d.ins_discipline_key
AND d.ins_srtdiscipline_key = 102
AND mld_melding_status IN (2, 3);
------ payload end ------