ARAI#53093 -- Koppeling Gielissen klaar voor prod

svn path=/Customer/trunk/; revision=42372
This commit is contained in:
Robin Stoker
2019-05-02 14:22:31 +00:00
parent d9f129da16
commit 7fcfa3b4ad

View File

@@ -8792,26 +8792,26 @@ CREATE OR REPLACE PROCEDURE arai_processemail
)
AS
-- puserkey is alvast een nieuwe parameter die per release 2015.2 er gaat komen (FSN#33503), als gevuld, dan deze als aanvrager van melding gebruiken.
sender prs_perslid.prs_perslid_key%TYPE;
kostenplaats prs_afdeling.prs_kostenplaats_key%TYPE;
v_mldkey mld_melding.mld_melding_key%TYPE;
defaultstdmelding fac_setting.fac_setting_default%TYPE;
kkey mld_kenmerk.mld_kenmerk_key%TYPE;
errormsg fac_result.fac_result_waarde%TYPE;
v_mailadres_kenmerk_key mld_kenmerk.mld_kenmerk_key%TYPE;
v_flexprop_mail VARCHAR2(1000);
v_from VARCHAR2 (1000);
sender prs_perslid.prs_perslid_key%TYPE;
kostenplaats prs_afdeling.prs_kostenplaats_key%TYPE;
v_mldkey mld_melding.mld_melding_key%TYPE;
defaultstdmelding fac_setting.fac_setting_default%TYPE;
kkey mld_kenmerk.mld_kenmerk_key%TYPE;
errormsg fac_result.fac_result_waarde%TYPE;
v_mailadres_kenmerk_key mld_kenmerk.mld_kenmerk_key%TYPE;
v_flexprop_mail VARCHAR2(1000);
v_from VARCHAR2 (1000);
subject_regexp fac_setting.fac_setting_default%TYPE;
v_behandelaar_key mld_melding.mld_melding_behandelaar_key%TYPE;
v_mldnum VARCHAR2 (4000);
v_srtdisc VARCHAR2 (4000);
subject_regexp fac_setting.fac_setting_default%TYPE;
v_behandelaar_key mld_melding.mld_melding_behandelaar_key%TYPE;
v_mldnum VARCHAR2 (4000);
v_srtdisc VARCHAR2 (4000);
v_flag_on_fenote NUMBER (10);
v_flag_on_bonote NUMBER (10);
v_gebkey NUMBER (10);
v_gebcode VARCHAR2 (4000);
v_standnr NUMBER (10);
v_standnrpos NUMBER (10);
v_gebcode VARCHAR2 (4000);
v_standnr NUMBER (10);
v_standnrpos NUMBER (10);
BEGIN
@@ -9057,7 +9057,7 @@ BEGIN
NULL);
END IF; -- Bestaande melding en behandelaar is bekend.
ELSE
-- GEEN bestaande melding gevonden, we gaan een nieuwe mnelding toevoegen....
-- GEEN bestaande melding gevonden, we gaan een nieuwe melding toevoegen....
IF defaultstdmelding IS NOT NULL
THEN
@@ -9070,6 +9070,7 @@ BEGIN
mld_melding_datum,
mld_alg_locatie_key,
mld_alg_onroerendgoed_keys,
mld_melding_onderwerp,
mld_melding_omschrijving,
mld_melding_status,
mld_stdmelding_key,
@@ -9082,16 +9083,8 @@ BEGIN
SYSDATE,
1, -- zie ook HSLE#33348: RAI hier kiezen (alg_locatie_key = 1)
v_gebkey,
SUBSTR (
psubject || CHR (13) || CHR(10)
|| REPLACE (
SUBSTR (pbody,
1,
4000 - (LENGTH (psubject) + 2)),
CHR (13) || CHR (10) || CHR (13) || CHR (10),
CHR (13) || CHR (10)),
1,
4000), -- verwijder onnodige witregels
psubject,
pbody,
NULL,
defaultstdmelding,
sender,