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

SVRZ#32152 SVRZ - ##OPDRKEY## in puo_subjectprefixmld zonder prefix

Browse Source 
svn path=/Database/trunk/; revision=40541
This commit is contained in:
Erik Groener
2019-01-15 11:36:35 +00:00
parent 92eaafb041
commit f94a871b8b
2 changed files with 8 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
BES/BES_PAC.SRC
View File

@@ -2098,10 +2098,11 @@ AS
-- We support substitution of placeholders in the messages
-- ##KEY## = bes_bestelopdr_id
-- ##KEYN## = voorloop+bes_bestelopdr_id
IF instr2 (s, '$') > 0
IF (instr2 (s, '#') > 0 AND instr2 (s, '$') > 0)
THEN
f := SUBSTR( s, INSTR2( s, '$$')+2);
s := SUBSTR( s, 1, INSTR2( s, '$$')-1);
f := SUBSTR( f, 1, INSTR2( f, '##')-1);
s := REPLACE( s, '$$'||f, '');
IF f is not null
THEN
BEGIN
@@ -2146,7 +2147,7 @@ AS
s1 := lopdrid;
END IF;
--
s := REPLACE (s, '##KEYN##', s1||':'||to_number(d)||':'||to_number(d2));
s := REPLACE (s, '##KEYN##', s1);
END IF;
END IF;

7
MLD/MLD_PAC.SRC
View File

@@ -2499,7 +2499,7 @@ BEGIN
s := ps;
-- We support substitution of placeholders in the messages
-- ##OPDRKEYN## = voorloop+key+/+volgnr
-- ##OPDRKEYN## = voorloop+key+/+volgnr: kan $$x bevatten; x is hierin het aantal posities voor voorloop+key
-- ##OPDRKEY## = ins_srtdiscipline_prefix+key+/+volgnr (zie: RWSN#18845!)
-- ##DISC## = ins_discipline_omschrijving
-- ##STDMLD## = mld_stdmelding_omschrijving
@@ -2507,10 +2507,11 @@ BEGIN
-- ##SPOED## = 'SPOED' indien spoed, anders ''
-- ##PLAATS## = plaatsaanduidig van plaats service
-- ##OPDRTYPE## = opdrachttype
IF instr2 (s, '$') > 0
IF (instr2 (s, '#') > 0 AND instr2 (s, '$') > 0)
THEN
f := SUBSTR( s, INSTR2( s, '$$')+2);
s := SUBSTR( s, 1, INSTR2( s, '$$')-1);
f := SUBSTR( f, 1, INSTR2( f, '##')-1);
s := REPLACE( s, '$$'||f, '');
IF f is not null
THEN
BEGIN