Вниз
Скачать: CL | DM;

Максимальное значение кода в базе данных   Найти похожие ветки 

 
Jhonny ©   (2002-02-07 07:07) [0]

Здраствуйте народ! Меня мучает один вопрос: как мне узнать максимальное значения кода в базе. Необходимо, чтобы при добавлении записи в базу код наращивался автоматически на единицу.
Я пробовал такой код: Table1.RecordCount + 1, но он считает количество записей в базе. Помогите пожалуйста!

Заранее очень благодарен, Игорь!


 
User_OKA ©   (2002-02-07 07:31) [1]

Если это IB5.x, то нет смысла самому наращивать код на единицу. Есть там генераторы спец. для таких целей. А если тебе нужно узнать значение генератора в программе, то запускай его в процедуре.
Но это уже совсем другая история!


 
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 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.006 c
1-9144
VDXMAN
2002-02-17 17:03
2002.03.04
HELP ME


7-9305
Dennis S
2001-11-06 10:45
2002.03.04
Как работать с модемом и СОМ портами, точнее как...


1-9195
IronHawk
2002-02-12 15:37
2002.03.04
ПРОСТО ! Быстрый, тупой, вопрос !


1-9189
Скалли
2002-02-08 13:27
2002.03.04
Переход по элементам формы по ENTER


1-9200
KS
2002-02-13 15:36
2002.03.04
Borland Delphi




   Наверх