Как возвратить значение сгенерированного ID на клиента

← →
Наташа (2001-12-27 10:25) [5]

Всё работает, но получается, что приращение nakl_id идёт с шагом 2, а не 1, что естественно - сначала в ХП я добавляю значение генератора, а после вставки записи в таблицу генератор отрабатывает ещё один раз.
IBStoredProc1.StoredProcName:="GetNextIDNAKL";
IBStoredProc1.Prepare;
IBStoredProc1.ExecProc;
NomNakl:=IBStoredProc1.ParamByName("ID").AsInteger;

with IBQuery2 do
begin
active:=false;
SQL.clear;
SQL.Add("insert into nakl(nakl_id,textnakl,postav_id,sklad_id,firm_id)");
SQL.Add(" values(:ID,...)");
Prepare;
ParamByName("ID").asInteger:=NomNakl;
ExecSQL;
end;
Как бы всё таки сделать так, чтобы накладные шли по порядку, т.е. получать значение ID после вставки записи?

Как возвратить значение сгенерированного ID на клиента Найти похожие ветки