Ich habe es jetzt so gelöst.
Delphi-Quellcode:
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
Die Fragestellung bleibt aber weiterhin.
Denn
- finde ich die Lösung sehr hässlich
- werde ich dyn. SQL mit Variablen sicher sehr schnell wirklich brauchen.
Nachtrag:
das war mal überschneidend geantwortet...