diff --git a/BEZ/BEZ_TRI.SRC b/BEZ/BEZ_TRI.SRC index 299ab555..e9e7b33f 100644 --- a/BEZ/BEZ_TRI.SRC +++ b/BEZ/BEZ_TRI.SRC @@ -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;