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

api change

Browse Source 
svn path=/Database/trunk/; revision=9430
This commit is contained in:
Peter Feij
2007-01-23 10:05:04 +00:00
parent 0bc61f6286
commit 34745e674e
1 changed files with 8 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files

15
BEZ/BEZ_TRI.SRC
View File

@@ -1,7 +1,7 @@
#ifdef BEZ // 03-11-2000 PF
/* $Revision: 15 $
* $Modtime: 12-01-07 17:18 $
/* $Revision: 16 $
* $Modtime: 15-01-07 15:21 $
*/
#include "comsql.h"
@@ -119,12 +119,12 @@ BEGIN
-- We support substitution of placeholders in the messages
-- ##KEY## = ins_srtdiscipline_prefix+key+/+volgnr
-- ##NAAM## = volledige naam van de afmelder
IF INSTR (soms, '#') > 0
IF INSTR2(soms, '#') > 0
THEN
soms :=
REPLACE (REPLACE (REPLACE (soms, '##NAAM##', lbezoek), '##KEY##', TO_CHAR (:NEW.bez_afspraak_key)),
REPLACE (REPLACE (REPLACE (soms, '##NAAM##', lbezoek), '##KEY##', NUMBER_TO_CHAR (:NEW.bez_afspraak_key)),
'##DATUM##',
TO_CHAR (:NEW.bez_afspraak_datum, 'DD-MM-YY HH:MI')
DATE_TO_CHAR (:NEW.bez_afspraak_datum, 'DD-MM-YY HH:MI')
);
END IF;
fac.clrnotifications(scode, :NEW.bez_afspraak_key);
@@ -135,6 +135,7 @@ BEGIN
soms,
NULL,
NULL,
NULL,
NULL
);
EXCEPTION
@@ -210,7 +211,7 @@ BEGIN
-- We support substitution of placeholders in the messages
-- ##KEY## = ins_srtdiscipline_prefix+key+/+volgnr
-- ##NAAM## = volledige naam van de afmelder
IF INSTR2 (soms, '#') > 0
IF INSTR2(soms, '#') > 0
THEN
lbezoek := :NEW.bez_afspraak_naam;
soms :=
@@ -223,7 +224,7 @@ BEGIN
);
END IF;
fac.putnotificationsrt (lsender, lreceiver, scode, :NEW.bez_afspraak_key, soms, NULL, NULL, NULL);
fac.putnotificationsrt (lsender, lreceiver, scode, :NEW.bez_afspraak_key, soms, NULL, NULL, NULL, NULL);
END IF;
END;
END;