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

WEHK#60019 nieuwe pseudo userkeys tbv ongevalmeldingen notijob.

Browse Source 
svn path=/Customer/trunk/; revision=44794
This commit is contained in:
Ruud Lipper
2019-11-06 09:53:08 +00:00
parent b6693571b8
commit d012a7088e
1 changed files with 59 additions and 60 deletions
Download Patch File Download Diff File Expand all files Collapse all files

119
WEHK/WEHK.sql
View File

@@ -1294,7 +1294,7 @@ BEGIN
errormsg := 'Geen geldige reply';
v_error := 0;
v_errormsg := '';
-- Check of dit een reply is op CUST07 waar de sender coversheet@wehk.facilitor.nl is.
CASE
WHEN UPPER (pto) LIKE '%COVERSHEET@%'
@@ -1303,29 +1303,29 @@ BEGIN
v_body := regexp_substr (pbody, '[A-z]*');
errormsg := 'Geen geldige reply gevonden, dit moet JA of NEE zijn.';
v_melding_key := REGEXP_SUBSTR (psubject,
'[[:digit:]]{1,}',
1,
1,
'i');
errormsg := 'Error code 1.';
SELECT mld_stdmelding_key
SELECT mld_stdmelding_key
INTO v_stdmelding_key
FROM mld_melding
FROM mld_melding
WHERE mld_melding_key = v_melding_key;
errormsg := 'Error code 2.';
SELECT mld_kenmerk_key
INTO v_mld_kenmerk_key
FROM mld_kenmerk
WHERE mld_stdmelding_key = v_stdmelding_key
FROM mld_kenmerk
WHERE mld_stdmelding_key = v_stdmelding_key
AND mld_srtkenmerk_key IN (1831, 1832, 1833, 1834, 1835);
errormsg := 'Error code 3.';
CASE WHEN UPPER (v_body) LIKE '%JA%'
THEN
v_mld_kenmerkmelding_waarde := 41;
@@ -1333,10 +1333,10 @@ BEGIN
THEN
v_mld_kenmerkmelding_waarde := 42;
END CASE;
errormsg := 'Error code 4.';
INSERT INTO mld_kenmerkmelding
INSERT INTO mld_kenmerkmelding
(mld_melding_key,
mld_kenmerk_key,
mld_kenmerkmelding_waarde)
@@ -1345,9 +1345,9 @@ BEGIN
v_mld_kenmerkmelding_waarde)
RETURNING mld_melding_key
INTO v_melding_key;
errormsg := 'Error code 5.';
errormsg := 'Error code 5.';
UPDATE mld_melding
SET mld_melding_status = 5
WHERE mld_melding_key = v_melding_key;
@@ -2286,13 +2286,13 @@ prs_perslid_key,
prs_perslid_naam
)
AS
SELECT na.prs_perslid_key, na.prs_perslid_naam_friendly
from prs_v_perslid_fullnames na , prs_perslid p
where na.prs_perslid_key IN (Select PRS_LINK_KEY
from prs_kenmerklink
WHERE PRS_KENMERKLINK_WAARDE = '41'
AND prs_kenmerk_key = 1120)
AND na.prs_perslid_key = p.prs_perslid_key
SELECT na.prs_perslid_key, na.prs_perslid_naam_friendly
from prs_v_perslid_fullnames na , prs_perslid p
where na.prs_perslid_key IN (Select PRS_LINK_KEY
from prs_kenmerklink
WHERE PRS_KENMERKLINK_WAARDE = '41'
AND prs_kenmerk_key = 1120)
AND na.prs_perslid_key = p.prs_perslid_key
AND p.prs_perslid_verwijder is null;
@@ -3412,12 +3412,12 @@ AS
fac.gettrackingdate ('MLDNEW', m.mld_melding_key),
m.mld_melding_einddatum_std,
CASE
WHEN
(SYSDATE) -
(COALESCE
(FAC.datumtijdplusuitvoertijd(m.mld_melding_einddatum_std, m.mld_melding_t_respijt.tijdsduur, m.mld_melding_t_respijt.eenheid),
m.mld_melding_einddatum_std))
< 0
WHEN
(SYSDATE) -
(COALESCE
(FAC.datumtijdplusuitvoertijd(m.mld_melding_einddatum_std, m.mld_melding_t_respijt.tijdsduur, m.mld_melding_t_respijt.eenheid),
m.mld_melding_einddatum_std))
< 0
THEN 'Binnen'
ELSE 'Buiten'
END binnen_buiten_SLA
@@ -3557,40 +3557,40 @@ AS
AND t.fac_tracking_datum BETWEEN ADD_MONTHS (TRUNC (SYSDATE, 'mm'), -11) AND SYSDATE;
-- WEHK#53429: Notificatiejob nieuwe ongevalsmeldingen:
CREATE OR REPLACE VIEW WEHK_V_RAP_NEWMLDONGEVAL
CREATE OR REPLACE VIEW wehk_v_rap_newmldongeval
(
LOCATIE,
LOCATIECODE,
LOCATIEOMSCHRIJVING,
HRMEDEWERKER,
MELDING_KEY,
TRACKDATUM,
DATUM,
TIJD,
INVOERDER,
AANVRAGER,
BEHANDELAAR,
STDMELDINGOMSCHRIJVING,
MELDINGONDERWERP,
MELDINGOMSCHRIJVING
locatie,
locatiecode,
locatieomschrijving,
hrmedewerker,
melding_key,
trackdatum,
datum,
tijd,
invoerder,
aanvrager,
behandelaar,
stdmeldingomschrijving,
meldingonderwerp,
meldingomschrijving
)
AS
SELECT l.alg_locatie_omschrijving,
l.alg_locatie_code,
l.alg_locatie_omschrijving,
DECODE (l.alg_locatie_code,
'ZW', 59601,
'WE', 59602,
'HE', 59603,
'MA', 59604)
AS HRMEDEWERKER,
'ZW', 67661,
'HE', 67621,
'MA', 67641,
2693)
hrmedewerker,
m.mld_melding_key,
t.fac_tracking_datum AS TrackingDatum,
TRUNC (t.fac_tracking_datum) AS Datum,
SUBSTR (t.fac_tracking_datum, 12, 8) AS Tijd,
t.prs_perslid_key AS Invoerder,
m.prs_perslid_key_voor AS Aanvrager,
m.mld_melding_behandelaar_key AS Behandelaar,
t.fac_tracking_datum trackingdatum,
TRUNC (t.fac_tracking_datum) datum,
SUBSTR (t.fac_tracking_datum, 12, 8) tijd,
t.prs_perslid_key invoerder,
m.prs_perslid_key_voor aanvrager,
m.mld_melding_behandelaar_key behandelaar,
sm.mld_stdmelding_omschrijving,
m.mld_melding_onderwerp,
m.mld_melding_omschrijving
@@ -3620,7 +3620,6 @@ AS
AND TO_CHAR (t.fac_tracking_datum, 'HH24') =
TO_CHAR (SYSDATE - 1 / 24, 'HH24')
AND TO_CHAR (SYSDATE - 1 / 24, 'HH24') = 23);
-- Rapportage t.b.v. facturatieschema
CREATE OR REPLACE VIEW WEHK_V_RAP_FACTUURSCHEMA
@@ -3718,7 +3717,7 @@ AS
NULL,
NULL
FROM WEHK_V_RAP_NEWMLDONGEVAL mldv;
CREATE OR REPLACE VIEW WEHK_V_NOTI_OPVOERENCONTRACT
(
CODE,
@@ -3731,7 +3730,7 @@ CREATE OR REPLACE VIEW WEHK_V_NOTI_OPVOERENCONTRACT
XMOBILE
)
AS
-- Bij nieuwe "opvoeren contract" meldingen moet er een mail gaan naar
-- Bij nieuwe "opvoeren contract" meldingen moet er een mail gaan naar
-- de verzamelbox van de contractafdeling, voor nu even mijn eigen ter test.
-- Flag = 1 instellen bij de notificatiejob! (i.v.m. xemail)
SELECT 'CUST06',
@@ -3763,8 +3762,8 @@ AS
FROM fac_notificatie_job
WHERE fac_notificatie_job_view =
'WEHK_V_NOTI_OPVOERENCONTRACT');
-- Melding naar de in de coversheet melding geselecteerde goedkeurder.
-- Flag 8 instellen voor XSENDER!
CREATE OR REPLACE VIEW WEHK_V_NOTI_GOEDKEURDER