Sicher, dass das mit dem Doppelpunkt richtig ist?
Versuche es mal so:
Delphi-Quellcode:
* datamodule1.Query1_Todo.SQL.Clear;
* statement :='ALTER PROCEDURE RESET_GEN_IDX RETURNS (MAXVALUE Integer,CURVALUE Integer,NEXTVALUE Integer)'+* * *
* * * * * * * ' AS begin Select max(maidx), gen_id(gen_idx,0)'+*
// ab hier
* * * * * * * '* from mitarbeiter into `maxvalue`, `curvalue`; nextvalue = gen_Id(gen_idx, -(:curvalue-maxvalue)); '+
* * * * * * * ' end';
* datamodule1.Query1_Todo.SQL.Add(statement);
* datamodule1.Query1_Todo.ExecSQL;
Ansonsten mal alle Funktionen überprüfen....
Chris