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

WEND#67092 -- Levering M2M voor Productie

Browse Source 
svn path=/Customer/trunk/; revision=53477
This commit is contained in:
Jos Migo
2021-10-25 14:53:17 +00:00
parent 9df78745c6
commit 3da8b248e8
1 changed files with 4 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
WEND/wend.sql
View File

@@ -33,7 +33,7 @@ CREATE OR REPLACE PROCEDURE wend_processemail (
psessionid IN VARCHAR2,
pemailkey IN NUMBER)
AS
c_onbekend_key NUMBER (10) := 2441 ; -- PROD = ....; -- Melder onbekend
c_onbekend_key NUMBER (10) := 3281 ; -- Melder onbekend
v_errormsg VARCHAR2 (1000);
oracle_err_num NUMBER;
oracle_err_mes VARCHAR2 (200);
@@ -69,7 +69,7 @@ BEGIN
INSTR(pbody,CHR(10),REGEXP_INSTR(pbody,'Van:|From:|E-mail:',1,1),1)-REGEXP_INSTR(pbody,'Van:|From:|E-mail:',1,1)) ;
-- Als deze bestaat dan gaan we via die kant het from-adres-bebepalen
IF v_from_string IS NOT NULL AND INSTR(v_from_string,'@')>0
IF v_from_string IS NOT NULL AND INSTR(v_from_string,'@')>0
THEN
IF INSTR(v_from_string, '<',1,1)>0
@@ -163,7 +163,7 @@ END IF;
-- Geen werkplek of Melder onbekend - Dan melding op locatie_key 32 (Hoofdkantoor Wirdumerpoort (LE-OOSTER))
IF (v_count = 1 AND v_count_wp = 0) OR v_count = 0
THEN
v_locatie_key := 32; -- PROD-KEY ....
v_locatie_key := 32;
END IF;
-- Melder kan niet bepaald worden, dus inlezen onder 'Melder onbekend (M2M)'
@@ -228,7 +228,7 @@ END IF;
SELECT mld_ins_discipline_key, mld_stdmelding_key
INTO v_discipline_key, v_stdmelding_key
FROM mld_stdmelding
WHERE mld_stdmelding_key = 121; -- PROD-KEY ....
WHERE mld_stdmelding_key = 101;
-- Suggested extensions:
-- - Check for MLDUSE-write autorisations