CSUN#41760 -- Rare tekens in ABN-AMRO berichten.
svn path=/Customer/trunk/; revision=36048
This commit is contained in:
@@ -908,6 +908,12 @@ BEGIN
|
||||
v_body := REPLACE(v_body, '.', '.'); -- punt
|
||||
v_body := REPLACE(v_body, '/', '/');
|
||||
v_body := REPLACE(v_body, ':', ':'); -- dubbele punt
|
||||
v_body := REPLACE(v_body, ';', ';'); -- punt komma
|
||||
v_body := REPLACE(v_body, '<', '<');
|
||||
v_body := REPLACE(v_body, '=', '=');
|
||||
v_body := REPLACE(v_body, '>', '>');
|
||||
v_body := REPLACE(v_body, '?', '?');
|
||||
v_body := REPLACE(v_body, '@', '@');
|
||||
v_body := REPLACE(v_body, ' ' || CHR (10) || CHR (13), CHR (10) || CHR (13)); -- soms komt er ineens een een spatie achter de tag.
|
||||
-- gaat het om een normale werkbon, dan is v_pos > 0; anders gaat het om een klacht.
|
||||
v_pos := INSTR (v_body, '--> Werkbon');
|
||||
|
||||
Reference in New Issue
Block a user