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

PCHD#33780 -- Inrichting het Gelders Huis

Browse Source 
svn path=/Customer/trunk/; revision=34686
This commit is contained in:
Arthur Egberink
2017-07-20 13:27:58 +00:00
parent 38722d36c7
commit 5eb85ab90f
1 changed files with 33 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files

40
PCHA/pcha.sql
View File

@@ -1344,9 +1344,9 @@ CREATE OR REPLACE VIEW pcha_v_rap_indexering
)
AS
SELECT omschrijving,
ROUND (pchx_mon.get_index_value (SYSDATE, module), 5) jaar,
ROUND (pchx_mon.get_index_value (ADD_MONTHS (SYSDATE, -12), module), 5) jaar_1,
ROUND (pchx_mon.get_index_value (ADD_MONTHS (SYSDATE, -24), module), 5) jaar_2
ROUND (pchx_mon.get_index_value (SYSDATE, module), 7) jaar,
ROUND (pchx_mon.get_index_value (ADD_MONTHS (SYSDATE, -12), module), 7) jaar_1,
ROUND (pchx_mon.get_index_value (ADD_MONTHS (SYSDATE, -24), module), 7) jaar_2
FROM (SELECT 'MON' module, 'Monitoring' omschrijving FROM DUAL
UNION ALL
SELECT 'SCH', 'Schoonmaak' FROM DUAL
@@ -1355,6 +1355,31 @@ AS
UNION ALL
SELECT 'GLA', 'Gladheidsbestrijding' FROM DUAL);
-- 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
(
gbs_melding,
vakgroeptype,
vakgroep,
melding
)
AS
SELECT fac_usrdata_code,
sd.ins_srtdiscipline_omschrijving,
d.ins_discipline_omschrijving,
mld_stdmelding_omschrijving
FROM fac_usrdata ud,
mld_stdmelding std,
mld_discipline d,
ins_srtdiscipline sd
WHERE ud.fac_usrdata_verwijder IS NULL
AND ud.fac_usrtab_key = 221
AND TRUNC (ud.fac_usrdata_prijs) = std.mld_stdmelding_key
AND std.mld_ins_discipline_key = d.ins_discipline_key
AND d.ins_srtdiscipline_key = sd.ins_srtdiscipline_key;
-- Koppeling met Gebouw beheer systeem (GBS). Storingen komen via de mail binnen volgens
-- vastgesteld formaat.
CREATE OR REPLACE PROCEDURE pcha_processemail (pfrom IN VARCHAR2,
@@ -1486,14 +1511,15 @@ BEGIN
v_error := 1;
v_errormsg :=
'Standaard melding kan niet gevonden worden: '
|| v_stdmelding_omschrijving;
|| v_value;
END;
WHEN 'INUIT'
THEN
v_inuit := UPPER (TRIM (v_value));
WHEN 'INSTALLATIEDEEL'
THEN
v_ruimte := UPPER(SUBSTR(TRIM (v_value), 1, INSTR(TRIM(v_value), ' ')-1));
-- plak er ' x' achter om er zeker van te zijn dat er een spatie in staat.
v_ruimte := UPPER(SUBSTR(TRIM (v_value), 1, INSTR(TRIM(v_value || ' x'), ' ')-1));
errormsg := '(0x1455)';
BEGIN
@@ -1646,10 +1672,10 @@ BEGIN
INSERT INTO fac_result (fac_result_sessionid, fac_result_naam, fac_result_waarde)
VALUES (psessionid,
'maillog',
'Melding niet uniek gevonden, aantal gevonden ' || v_count);
'Melding niet uniek gevonden, aantal gevonden ' || v_count || ' Details: ' || v_installatiecode || ';' || v_status || ';' || v_onderwerp);
v_error := 1;
v_errormsg := 'Melding niet uniek gevonden, aantal gevonden ' || v_count;
v_errormsg := 'Melding niet uniek gevonden, aantal gevonden ' || v_count || ' Details: ' || v_installatiecode || ';' || v_status || ';' || v_onderwerp;
END IF;
END IF;
END IF;