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

FSN#11433

Browse Source 
svn path=/Database/trunk/; revision=9367
This commit is contained in:
Peter Feij
2006-12-12 11:01:28 +00:00
parent 2a34de260f
commit 686588d357
2 changed files with 25 additions and 23 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
BES/BES_PAC.SRC
View File

@@ -1,7 +1,7 @@
#ifdef BES // 03-11-2000 PF
/* $Revision: 58 $
* $Modtime: 16-10-06 11:03 $
/* $Revision: 59 $
* $Modtime: 8-12-06 12:36 $
*/
[quotes]
@@ -312,6 +312,8 @@ AS
current_leverancier_key NUMBER (10);
aantalopdrachtregels NUMBER;
factura_key mld_adres.mld_adres_key%TYPE;
bedrijf_email prs_bedrijf.prs_bedrijf_email%TYPE;
bedrijf_telefoon2 prs_bedrijf.prs_bedrijf_telefoon2%TYPE;
CURSOR tebestellen
IS
@@ -358,8 +360,8 @@ BEGIN
factura_key := rec1.mld_adres_key_fac;
-- Van de leverancier:
SELECT mld_adres_key_fac
INTO factura_key
SELECT mld_adres_key_fac, prs_bedrijf_email, prs_bedrijf_telefoon2
INTO factura_key, bedrijf_email, bedrijf_telefoon2
FROM prs_bedrijf
WHERE prs_bedrijf_key = rec1.prs_bedrijf_key AND mld_adres_key_fac IS NOT NULL;
EXCEPTION

8
BEZ/BEZ_TRI.SRC
View File

@@ -1,7 +1,7 @@
#ifdef BEZ // 03-11-2000 PF
/* $Revision: 11 $
* $Modtime: 27-11-06 22:56 $
/* $Revision: 12 $
* $Modtime: 29-11-06 13:57 $
*/
#include "comsql.h"
@@ -133,7 +133,7 @@ BEGIN
);
END IF;
fac.putnotificationsrt (:NEW.prs_perslid_key, lreceiver, scode, :NEW.bez_afspraak_key, soms, NULL);
fac.putnotificationsrt (:NEW.prs_perslid_key, lreceiver, scode, :NEW.bez_afspraak_key, soms, NULL, NULL, NULL);
END IF;
END;
END;
@@ -219,7 +219,7 @@ BEGIN
-- Alternatief is om de BEZNEW niet te notificeren, want reservering of afspraak doen dat al.
-- We kunnen hier (diep in de trigger) niet kijken of er nog meer bezoekers zijn bij deze afspraak.
fac.clrnotifications(scode, :NEW.bez_afspraak_key);
fac.putnotificationsrt (lsender, lreceiver, scode, :NEW.bez_afspraak_key, soms, NULL);
fac.putnotificationsrt (lsender, lreceiver, scode, :NEW.bez_afspraak_key, soms, NULL, NULL, NULL);
END IF;
END;
END;