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

HOUT#56823 M2M-koppeling/Negeren mails via Eigen tabel

Browse Source 
svn path=/Customer/trunk/; revision=41686
This commit is contained in:
Maarten van der Heide
2019-03-20 09:44:11 +00:00
parent 5ccd909c5c
commit f3556b451c
1 changed files with 10 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

11
HOUT/hout.sql
View File

@@ -3540,7 +3540,16 @@ BEGIN
VALUES (psessionid, 'maillog', 'Geregistreerd onder melding ' || v_melding_key);
WHEN UPPER (pto) LIKE 'ICTHELPDESK@%' OR UPPER (pto) LIKE 'HELPDESKICT@%'
THEN
IF INSTR (UPPER (pfrom), '@HOUTHOFF.COM') > 0 OR INSTR (UPPER (pfrom), 'ELOG@HOUTHOFF.COM') > 0 -- Vanaf elk ander adres negeren!
-- Negeer mails vanaf adressen opgenomen in Eigen tabel met key = 801
-- en vanaf elk ander domein dan '@houthoff.com'!
SELECT COUNT (*)
INTO v_count
FROM fac_v_aanwezigusrdata
WHERE fac_usrtab_key = 801 -- M2M E-mail blok
AND INSTR (UPPER (TRIM (fac_usrdata_code)), UPPER (pfrom)) > 0
AND COALESCE (fac_usrdata_vervaldatum, SYSDATE + 1) > SYSDATE;
IF v_count = 0 AND INSTR (UPPER (pfrom), '@HOUTHOFF.COM') > 0
THEN
-- Bepaal de melder/noteur op basis van e-mail adres zoals in pfrom?
v_errormsg := 'Fout bepalen melder ' || COALESCE (pfrom, '???');