Wie man sich doch stundenlang mit solchen Problemen beschäftigen kann...
Ich habe es hinbekommen. Es lag an den verwendeten Komponenten von crLabs (IBDAC).
Man muß beim Rückgabewert ein RET vor den Feldnamen setzen, statt ID also RET_ID.
Delphi-Quellcode:
with DBank.IBC_Anschrift
do
begin
Close;
SQL.Clear;
SQL.Add('
INSERT INTO anschrift (AUFTRAG, Name_1, Name_2)');
SQL.Add('
VALUES (''
87777''
, ''
Schulze''
, ''
Nummer 2''
)');
SQL.Add('
RETURNING ID');
ExecSQL;
NewID:= DBank.IBC_Anschrift.ParamByName('
RET_ID').Value;
ShowMessage(IntToStr(NewID);
end;
@DeddyH Das Open funktioniert aber nicht.
Trotzdem vielen Dank für die Anregungen.
