MNNL#56038 M2M-koppeling/Afmeldtekst (en andere velden niet altijd correct bepaald)
svn path=/Customer/trunk/; revision=40539
This commit is contained in:
@@ -3671,17 +3671,17 @@ BEGIN
|
||||
v_errormsg := 'Fout bepalen Nimbus-vakgroep';
|
||||
v_vakgroep := TRIM (SUBSTR (pbody,
|
||||
INSTR (pbody, '@VAKGROEP:') + 10,
|
||||
INSTR (SUBSTR (REPLACE (REPLACE (pbody, CHR(13), '#'), CHR(10), '#'), INSTR (pbody, '@VAKGROEP:') + 10), '#') - 1));
|
||||
INSTR (SUBSTR (REPLACE (REPLACE (pbody, CHR(13), '#'), CHR(10), '#') || '#', INSTR (pbody, '@VAKGROEP:') + 10), '#') - 1));
|
||||
|
||||
v_errormsg := 'Fout bepalen Nimbus-message';
|
||||
v_message := TRIM (SUBSTR (pbody,
|
||||
INSTR (pbody, '@MESSAGE:') + 9,
|
||||
INSTR (SUBSTR (REPLACE (REPLACE (pbody, CHR(13), '#'), CHR(10), '#'), INSTR (pbody, '@MESSAGE:') + 9), '#') - 1));
|
||||
INSTR (SUBSTR (REPLACE (REPLACE (pbody, CHR(13), '#'), CHR(10), '#') || '#', INSTR (pbody, '@MESSAGE:') + 9), '#') - 1));
|
||||
|
||||
v_errormsg := 'Fout bepalen Nimbus-CI';
|
||||
v_ci := TRIM (SUBSTR (pbody,
|
||||
INSTR (pbody, '@CI:') + 4,
|
||||
INSTR (SUBSTR (REPLACE (REPLACE (pbody, CHR(13), '#'), CHR(10), '#'), INSTR (pbody, '@CI:') + 4), '#') - 1));
|
||||
INSTR (SUBSTR (REPLACE (REPLACE (pbody, CHR(13), '#'), CHR(10), '#') || '#', INSTR (pbody, '@CI:') + 4), '#') - 1));
|
||||
|
||||
-- Bepaal persoon met key=12784 (Monitoring NimBUS)?
|
||||
v_errormsg := 'Fout bepalen Nimbus-melder';
|
||||
@@ -3786,27 +3786,27 @@ BEGIN
|
||||
v_errormsg := 'Fout bepalen HR-leidinggevende';
|
||||
v_leidinggevende := TRIM (SUBSTR (pbody,
|
||||
INSTR (pbody, '@LEIDINGGEVENDE:') + 16,
|
||||
INSTR (SUBSTR (REPLACE (REPLACE (pbody, CHR(13), '#'), CHR(10), '#'), INSTR (pbody, '@LEIDINGGEVENDE:') + 16), '#') - 1));
|
||||
INSTR (SUBSTR (REPLACE (REPLACE (pbody, CHR(13), '#'), CHR(10), '#') || '#', INSTR (pbody, '@LEIDINGGEVENDE:') + 16), '#') - 1));
|
||||
|
||||
v_errormsg := 'Fout bepalen HR-melding';
|
||||
v_melding := TRIM (SUBSTR (pbody,
|
||||
INSTR (pbody, '@MELDING:') + 9,
|
||||
INSTR (SUBSTR (REPLACE (REPLACE (pbody, CHR(13), '#'), CHR(10), '#'), INSTR (pbody, '@MELDING:') + 9), '#') - 1));
|
||||
INSTR (SUBSTR (REPLACE (REPLACE (pbody, CHR(13), '#'), CHR(10), '#') || '#', INSTR (pbody, '@MELDING:') + 9), '#') - 1));
|
||||
|
||||
v_errormsg := 'Fout bepalen HR-medewerker';
|
||||
v_medewerker := TRIM (SUBSTR (pbody,
|
||||
INSTR (pbody, '@MEDEWERKER:') + 12,
|
||||
INSTR (SUBSTR (REPLACE (REPLACE (pbody, CHR(13), '#'), CHR(10), '#'), INSTR (pbody, '@MEDEWERKER:') + 12), '#') - 1));
|
||||
INSTR (SUBSTR (REPLACE (REPLACE (pbody, CHR(13), '#'), CHR(10), '#') || '#', INSTR (pbody, '@MEDEWERKER:') + 12), '#') - 1));
|
||||
|
||||
v_errormsg := 'Fout bepalen HR-ingangsdatum';
|
||||
v_ingangsdatum := TRIM (SUBSTR (pbody,
|
||||
INSTR (pbody, '@INGANGSDATUM:') + 14,
|
||||
INSTR (SUBSTR (REPLACE (REPLACE (pbody, CHR(13), '#'), CHR(10), '#'), INSTR (pbody, '@INGANGSDATUM:') + 14), '#') - 1));
|
||||
INSTR (SUBSTR (REPLACE (REPLACE (pbody, CHR(13), '#'), CHR(10), '#') || '#', INSTR (pbody, '@INGANGSDATUM:') + 14), '#') - 1));
|
||||
|
||||
v_errormsg := 'Fout bepalen HR-vrijstellingsdatum';
|
||||
v_vrijstellingsdatum := TRIM (SUBSTR (pbody,
|
||||
INSTR (pbody, '@VRIJSTELLINGSDATUM:') + 20,
|
||||
INSTR (SUBSTR (REPLACE (REPLACE (pbody, CHR(13), '#'), CHR(10), '#'), INSTR (pbody, '@VRIJSTELLINGSDATUM:') + 20), '#') - 1));
|
||||
INSTR (SUBSTR (REPLACE (REPLACE (pbody, CHR(13), '#'), CHR(10), '#') || '#', INSTR (pbody, '@VRIJSTELLINGSDATUM:') + 20), '#') - 1));
|
||||
|
||||
-- Bepaal de melder op basis van loginnaam zoals in pbody achter
|
||||
-- @LEIDINGGEVENDE?
|
||||
@@ -3889,7 +3889,7 @@ BEGIN
|
||||
v_errormsg := 'Fout bepalen afmeldtekst';
|
||||
v_afmeldtekst := TRIM (SUBSTR (pbody,
|
||||
INSTR (UPPER (pbody), '@AFMELDTEKST:') + 13,
|
||||
INSTR (SUBSTR (REPLACE (REPLACE (pbody, CHR(13), '#'), CHR(10), '#'), INSTR (UPPER (pbody), '@AFMELDTEKST:') + 13), '#') - 1));
|
||||
INSTR (SUBSTR (REPLACE (REPLACE (pbody, CHR(13), '#'), CHR(10), '#') || '#', INSTR (UPPER (pbody), '@AFMELDTEKST:') + 13), '#') - 1));
|
||||
|
||||
|
||||
-- Bepaal de noteur op basis van e-mail adres zoals in pfrom?
|
||||
|
||||
Reference in New Issue
Block a user