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

BAUS#79594 Implementatie Bausch & Lomb, mail2melding

Browse Source 
svn path=/Customer/trunk/; revision=61844
This commit is contained in:
Suzan Wiegerinck
2023-09-19 15:29:46 +00:00
parent b4c7163341
commit 4ed29215e2
1 changed files with 7 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
BAUS/baus.sql
View File

@@ -52,6 +52,9 @@ BEGIN
-- 1) Eerst uit het onderwerp het meldingnummer proberen te onderscheppen, uitgangspunt dat in het onderwerp het meldingnummer '1234' kan worden opgevist, met ervoor en erna een spatie
-- 2) Het 1e nummer dat in het onderwerp staat wordt gezien als meldingnummer, eventuele andere nummers later in het onderwerp worden genegeerd.
subject_regexp := '[[:digit:]]{1,}';
v_pbody := pbody;
v_mldnum :=
REGEXP_SUBSTR (psubject,
subject_regexp,
@@ -73,6 +76,7 @@ BEGIN
BEGIN
INSERT INTO mld_melding_note (mld_melding_key,
mld_melding_note_omschrijving,
mld_melding_note_flag,
prs_perslid_key)
VALUES (
v_mldkey,
@@ -83,14 +87,15 @@ BEGIN
|| REPLACE (
SUBSTR (v_pbody,
1,
4000 - (LENGTH (psubject) + 2)),
4000 - (LENGTH (v_pbody) + 2)),
CHR (13)
|| CHR (10)
|| CHR (13)
|| CHR (10),
CHR (13) || CHR (10)),
CHR (13) || CHR (10)),
1,
4000), -- verwijder onnodige witregels
1,
3);
--- belletje bij de melding zetten