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

HSLE#66941 M2M-koppeling/Vullen CC voor alle stromen (indien ontvangen)

Browse Source 
svn path=/Customer/trunk/; revision=51454
This commit is contained in:
Maarten van der Heide
2021-05-12 16:22:10 +00:00
parent 52ac34a7f5
commit b390a3ed2a
1 changed files with 39 additions and 13 deletions
Download Patch File Download Diff File Expand all files Collapse all files

52
HSLE/hsle.sql
View File

@@ -1512,24 +1512,50 @@ BEGIN
-- Bepaal (aanwezige) kenmerk-key van kenmerksoort 'E-mail' (key=26) op vakgroeptype-niveau bij vakgroeptype-key=1
v_errormsg := 'Fout bepalen kenmerksoort=E-mail';
--SELECT MAX (mld_kenmerk_key)
-- INTO v_mailadres_kenmerk_key
-- FROM mld_kenmerk
-- WHERE mld_kenmerk_verwijder IS NULL
-- AND mld_srtkenmerk_key = 26
-- AND mld_kenmerk_niveau = 'T'
-- AND mld_stdmelding_key = 1;
SELECT MAX (mld_kenmerk_key)
INTO v_mailadres_kenmerk_key
FROM mld_kenmerk
WHERE mld_kenmerk_verwijder IS NULL
AND mld_srtkenmerk_key = 26
AND mld_kenmerk_niveau = 'T'
AND mld_stdmelding_key = 1;
FROM mld_kenmerk k, mld_stdmelding sm, ins_tab_discipline td
WHERE k.mld_kenmerk_verwijder IS NULL
AND k.mld_srtkenmerk_key = 26 -- E-mail
AND sm.mld_stdmelding_key = fac.safe_to_number (defaultstdmelding)
AND sm.mld_ins_discipline_key = td.ins_discipline_key
AND ( ( k.mld_stdmelding_key = sm.mld_stdmelding_key
AND k.mld_kenmerk_niveau = 'S')
OR ( k.mld_stdmelding_key = td.ins_discipline_key
AND k.mld_kenmerk_niveau = 'D')
OR ( k.mld_stdmelding_key = td.ins_srtdiscipline_key
AND k.mld_kenmerk_niveau = 'T'));
-- Bepaal (aanwezige) kenmerk-key van kenmerksoort 'Mail CC' (key=4101) op vakgroeptype-niveau bij vakgroeptype-key=1
v_errormsg := 'Fout bepalen kenmerksoort=Mail CC';
--SELECT MAX (mld_kenmerk_key)
-- INTO v_ccadres_kenmerk_key -- Als het goed is 7002!
-- FROM mld_kenmerk
-- WHERE mld_kenmerk_verwijder IS NULL
-- AND mld_srtkenmerk_key = 4101 -- Mail CC(/Carbon Copy)
-- AND mld_kenmerk_niveau = 'T'
-- AND mld_stdmelding_key = 1;
SELECT MAX (mld_kenmerk_key)
INTO v_ccadres_kenmerk_key -- Als het goed is 7002!
FROM mld_kenmerk
WHERE mld_kenmerk_verwijder IS NULL
AND mld_srtkenmerk_key = 4101 -- Mail CC(/Carbon Copy)
AND mld_kenmerk_niveau = 'T'
AND mld_stdmelding_key = 1;
INTO v_ccadres_kenmerk_key
FROM mld_kenmerk k, mld_stdmelding sm, ins_tab_discipline td
WHERE k.mld_kenmerk_verwijder IS NULL
AND k.mld_srtkenmerk_key = 4101 -- Mail CC(/Carbon Copy)
AND sm.mld_stdmelding_key = fac.safe_to_number (defaultstdmelding)
AND sm.mld_ins_discipline_key = td.ins_discipline_key
AND ( ( k.mld_stdmelding_key = sm.mld_stdmelding_key
AND k.mld_kenmerk_niveau = 'S')
OR ( k.mld_stdmelding_key = td.ins_discipline_key
AND k.mld_kenmerk_niveau = 'D')
OR ( k.mld_stdmelding_key = td.ins_srtdiscipline_key
AND k.mld_kenmerk_niveau = 'T'));
-- Bepaal kenmerk-key van kenmerksoort 'Meldbron' (key 2401) bij 'defaultstdmelding' die niet verwijderd is
v_errormsg := 'Fout bepalen kenmerksoort=Meldbron';
@@ -1537,8 +1563,8 @@ BEGIN
SELECT MAX (mld_kenmerk_key)
INTO v_meldbron_kenmerk_key
FROM mld_kenmerk k, mld_stdmelding sm, ins_tab_discipline td
WHERE k.mld_srtkenmerk_key = 2401
AND k.mld_kenmerk_verwijder IS NULL
WHERE k.mld_kenmerk_verwijder IS NULL
AND k.mld_srtkenmerk_key = 2401
AND sm.mld_stdmelding_key = fac.safe_to_number (defaultstdmelding)
AND sm.mld_ins_discipline_key = td.ins_discipline_key
AND ( ( k.mld_stdmelding_key = sm.mld_stdmelding_key