Форум: "Базы";
Текущий архив: 2002.03.04;
Скачать: [xml.tar.bz2];
ВнизМаксимальное значение кода в базе данных Найти похожие ветки
← →
Deniz (2002-02-07 07:33) [2]Select max(id) from Test
но лучше использовать generator
Create generator test_gen;
set term ^;
CREATE TRIGGER biTEST FOR TEST
ACTIVE BEFORE INSERT POSITION 0
as
begin
if (new.id is null) then new.id = Gen_ID(test_gen, 1);
end;
^
create procedure GetNextID
returns (ID integer) as
begin
ID = Gen_ID(test_gen, 1);
end;
^
set term ;^
В программе :
function NextID:integer;
begin
{ IBSP : TIBStoredProc }
IBSP.StoredProcName:="GetNextID";
IBSP.Prepare;
IBSP.ExecProc;
Result:=IBSP.Params[0].AsInteger;
end;
И вызывай с любого места для получения уникального ID.
Страницы: 1 вся ветка
Форум: "Базы";
Текущий архив: 2002.03.04;
Скачать: [xml.tar.bz2];
Память: 0.43 MB
Время: 0.005 c