Registriert seit: 12. Aug 2003
Ort: Soest
4.027 Beiträge
Delphi 10.1 Berlin Enterprise
|
Re: FireBird's native dynamic SQL und Variablen
14. Feb 2005, 11:30
Moin Robert,
SQL-Code:
SET TERM ^ ;
CREATE PROCEDURE GETID (TableName VARCHAR(55)) RETURNS (NewID BIGINT)
AS
BEGIN
EXECUTE STATEMENT 'SELECT GEN_ID(GEN_'||:TableName||'_ID,1) FROM RDB$DATABASE' INTO :NewID;
SUSPEND;
END
^
SET TERM ; ^
MfG
Stevie
|