FireBird's native dynamic SQL und Variablen

[Robert_G]

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

1. finde ich die Lösung sehr hässlich
2. werde ich dyn. SQL mit Variablen sicher sehr schnell wirklich brauchen.

Nachtrag: das war mal überschneidend geantwortet...