CSUN#64584 Meldingen vanuit Engie via Processemail, html-tekens omgezet

svn path=/Customer/trunk/; revision=48818
This commit is contained in:
Sander Schepers
2020-11-13 12:16:34 +00:00
parent 3e3d2a8d6f
commit d34bdae972

View File

@@ -1273,6 +1273,36 @@ BEGIN
v_locatie_code := csun_get_html_valuepair (v_body, 'Object', 'Postcode');
v_locatie_code := SUBSTR(v_locatie_code, 9, INSTR(v_locatie_code, ' ',1,2)-9);
END IF;
-- bij Engie gaan we de html body nog even opschonen
IF sender = 23221
THEN
-- pas de omschrijving van de melding aan. Verwijder onnodige html ballast.
v_body := REPLACE(v_body, ' ', ' '); -- spatie
v_body := REPLACE(v_body, '!', '!');
v_body := REPLACE(v_body, '"', CHR(34)); -- double quote
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(39)); -- single quote
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, ',', ','); -- komma
v_body := REPLACE(v_body, '-', '-'); -- min teken
v_body := REPLACE(v_body, '.', '.'); -- punt
v_body := REPLACE(v_body, '/', '/');
v_body := REPLACE(v_body, ':', ':'); -- dubbele punt
v_body := REPLACE(v_body, '&#x3b;', ';'); -- punt komma
v_body := REPLACE(v_body, '&#x3c;', '<');
v_body := REPLACE(v_body, '&#x3d;', '=');
v_body := REPLACE(v_body, '&#x3e;', '>');
v_body := REPLACE(v_body, '&#x3f;', '?');
v_body := REPLACE(v_body, '&#x40;', '@');
v_body := REPLACE(v_body, ' ' || CHR (10) || CHR (13), CHR (10) || CHR (13)); -- soms komt er ineens een een spatie achter de tag.
END IF;
-- Humanitas / KPMG Meijburg heeft de locatiecode ergens in het onderwerp staan
IF v_client = 301 OR v_client = 602