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

WEHK#57307 -- Processmail voorzien van meer errorcodes

Browse Source 
svn path=/Customer/trunk/; revision=43496
This commit is contained in:
Robin Stoker
2019-07-25 14:40:08 +00:00
parent 391c42ce24
commit b0c24d10a9
1 changed files with 12 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

16
WEHK/WEHK.sql
View File

@@ -1285,7 +1285,6 @@ AS
v_mld_kenmerk_key mld_kenmerk.mld_kenmerk_key%TYPE;
v_mld_kenmerkmelding_waarde mld_kenmerkmelding.mld_kenmerkmelding_waarde%TYPE;
errormsg fac_result.fac_result_waarde%TYPE;
subject_regexp fac_setting.fac_setting_default%TYPE;
v_count NUMBER;
v_error NUMBER;
v_errormsg VARCHAR2 (100);
@@ -1302,26 +1301,31 @@ BEGIN
THEN
errormsg := 'Geen coversheet email gevonden.';
v_body := regexp_substr (pbody, '[A-z]*' );
v_body := regexp_substr (pbody, '[A-z]*');
errormsg := 'Geen geldige reply gevonden, dit moet JA of NEE zijn.';
subject_regexp := '[[:digit:]]{1,}';
v_melding_key := REGEXP_SUBSTR (psubject,
subject_regexp,
'[[:digit:]]{1,}',
1,
1,
'i');
errormsg := 'Error code 1.';
SELECT mld_stdmelding_key
INTO v_stdmelding_key
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
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;
@@ -1330,6 +1334,8 @@ BEGIN
v_mld_kenmerkmelding_waarde := 42;
END CASE;
errormsg := 'Error code 4.';
INSERT INTO mld_kenmerkmelding
(mld_melding_key,
mld_kenmerk_key,
@@ -1340,6 +1346,8 @@ BEGIN
RETURNING mld_melding_key
INTO v_melding_key;
errormsg := 'Error code 5.';
UPDATE mld_melding
SET mld_melding_status = 5
WHERE mld_melding_key = v_melding_key;