In firebird, the syntax to create TRIGGERs and Stored Procedures is as below:<\/p>\n
—<\/p>\n
SET TERM !! ;
CREATE TRIGGER auto_update_1 FOR DBPATHS
after INSERT POSITION 0
AS
BEGIN
insert into commission values (100,100);
END !!
SET TERM ; !! <\/p>\n
—<\/p>\n
SET TERM !! ;
CREATE PROCEDURE CountTo10
RETURNS (Cnt INTEGER)
AS
BEGIN
Cnt = 1;
WHILE (Cnt < = 10) DO
Cnt = Cnt + 1;
END !! <\/p>\n
SET TERM ; !!<\/p>\n
—-
An example how to use stored procedure from delphi is as follows:
procedure TForm1.Button1Click(Sender: TObject);
var<\/p>\n
result : integer;
begin
if ibdatabase1.Connected = false then
begin<\/p>\n
ibdatabase1.Connected := true;<\/p>\n
end;<\/p>\n
with IBStoredProc1 do
execproc;<\/p>\n
IBStoredProc1.Transaction.Commit;<\/p>\n
result := IBStoredProc1.Params.ParamValues[‘Cnt’];<\/p>\n
showmessage(inttostr(result)); <\/p>\n
end;<\/p>\n
From: http:\/\/sitestree.com\/?p=4727
Categories:2
Tags:
Post Data:2008-07-08 16:53:04<\/p>\n
Shop Online: <a href='https:\/\/www.ShopForSoul.com\/' target='new' rel=\"noopener\">https:\/\/www.ShopForSoul.com\/<\/a>\n (Big Data, Cloud, Security, Machine Learning): Courses: <a href='http:\/\/Training.SitesTree.com' target='new' rel=\"noopener\"> http:\/\/Training.SitesTree.com<\/a> \n In Bengali: <a href='http:\/\/Bangla.SaLearningSchool.com' target='new' rel=\"noopener\">http:\/\/Bangla.SaLearningSchool.com<\/a>\n <a href='http:\/\/SitesTree.com' target='new' rel=\"noopener\">http:\/\/SitesTree.com<\/a>\n 8112223 Canada Inc.\/JustEtc: <a href='http:\/\/JustEtc.net' target='new' rel=\"noopener\">http:\/\/JustEtc.net (Software\/Web\/Mobile\/Big-Data\/Machine Learning) <\/a>\n Shop Online: <a href='https:\/\/www.ShopForSoul.com'> https:\/\/www.ShopForSoul.com\/<\/a>\n Medium: <a href='https:\/\/medium.com\/@SayedAhmedCanada' target='new' rel=\"noopener\"> https:\/\/medium.com\/@SayedAhmedCanada <\/a>\n<\/code><\/pre>\n","protected":false},"excerpt":{"rendered":"In firebird, the syntax to create TRIGGERs and Stored Procedures is as below: — SET TERM !! ; CREATE TRIGGER auto_update_1 FOR DBPATHS after INSERT POSITION 0 AS BEGIN insert into commission values (100,100); END !! SET TERM ; !! — SET TERM !! ;CREATE PROCEDURE CountTo10 RETURNS (Cnt INTEGER) AS BEGIN Cnt = 1; … <\/p>\n