Andi4553
asked on
Interbase 6.0 executeing SQL
How can i execute SQL-Scripts from Delphi ?
i would like to generate a Table from within my application, but the Table has some Triggers.
for example :
CREATE TABLE "PA"
(
"ID" INTEGER NOT NULL,
"PID" INTEGER,
"TIMESTAMPS" INTEGER,
"BS" SMALLINT,
PRIMARY KEY ("ID")
);
SET TERM ^ ;
/* Triggers only will work for SQL triggers */
CREATE TRIGGER "PA_INSERT" FOR "PA"
ACTIVE BEFORE INSERT POSITION 0
AS
BEGIN
NEW.TIMESTAMPS = GEN_ID(UID, 1);
END
^
CREATE TRIGGER "PA_UPDATE" FOR "PA"
ACTIVE BEFORE UPDATE POSITION 0
AS
BEGIN
NEW.TIMESTAMPS = GEN_ID(UID, 1);
END
^
COMMIT WORK ^
SET TERM ;^
i would like to generate a Table from within my application, but the Table has some Triggers.
for example :
CREATE TABLE "PA"
(
"ID" INTEGER NOT NULL,
"PID" INTEGER,
"TIMESTAMPS" INTEGER,
"BS" SMALLINT,
PRIMARY KEY ("ID")
);
SET TERM ^ ;
/* Triggers only will work for SQL triggers */
CREATE TRIGGER "PA_INSERT" FOR "PA"
ACTIVE BEFORE INSERT POSITION 0
AS
BEGIN
NEW.TIMESTAMPS = GEN_ID(UID, 1);
END
^
CREATE TRIGGER "PA_UPDATE" FOR "PA"
ACTIVE BEFORE UPDATE POSITION 0
AS
BEGIN
NEW.TIMESTAMPS = GEN_ID(UID, 1);
END
^
COMMIT WORK ^
SET TERM ;^
ASKER CERTIFIED SOLUTION
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.