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

MNNL#72460 M2M-HR/Mails uit AFAS niet ontvangen

Browse Source 
svn path=/Customer/trunk/; revision=56551
This commit is contained in:
Maarten van der Heide
2022-07-12 10:22:23 +00:00
parent 7f0236097c
commit 09cf6a1dc3
1 changed files with 6 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
MNNL/mnnl.sql
View File

@@ -3881,12 +3881,12 @@ BEGIN
v_errormsg := 'Fout bepalen HR-medewerker';
IF INSTR (pbody, '@MEDEWERKER:') > 0
THEN
--v_medewerker := TRIM (SUBSTR (pbody,
-- INSTR (pbody, '@MEDEWERKER:') + 12,
-- INSTR (SUBSTR (REPLACE (REPLACE (pbody, CHR (13), '#'), CHR (10), '#') || '#', INSTR (pbody, '@MEDEWERKER:') + 12), '#') - 1));
v_medewerker := SUBSTR (TRIM (SUBSTR (pbody, INSTR (pbody, '@MEDEWERKER:') + 12)),
1,
REGEXP_INSTR (TRIM (SUBSTR (pbody, INSTR (pbody, '@MEDEWERKER:') + 12)) || ' ', '\s') - 1);
-- Pak 100 tekens (anders dan whitespace) in pbody na 1e voorkomen van @MEDEWERKER: en plaats daarachter een '#'.
-- @MEDEWERKER komt in onderwerp en is max. 80 tekens, dus buffer is groot genoeg!
v_medewerker := TRIM (SUBSTR (pbody, INSTR (pbody, '@MEDEWERKER:') + 12, 100)) || '#';
-- Vervang newlines [CHR (13) en/of CHR (10)] door # en pak gedeelte tot 1e #.
-- In principe dus tot 1e newline en anders tot # geplaatst op eind van buffer.
v_medewerker := SUBSTR (v_medewerker, 1, INSTR (REPLACE (REPLACE (v_medewerker, CHR (13), '#'), CHR (10), '#'), '#') - 1);
ELSE
v_medewerker := '?';
END IF;