Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.03.04;
Скачать: 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 вся ветка

Текущий архив: 2002.03.04;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.007 c
14-9283
BJValentine
2002-01-17 20:05
2002.03.04
Excel + Delphi=...


4-9333
mIg
2001-12-19 10:46
2002.03.04
Скажите, как отловить событие открытие файла на чтение...


1-9180
who
2002-02-14 10:05
2002.03.04
Передача параметров из exe в exe


1-9219
Стас
2002-02-15 08:21
2002.03.04
Про анимированный gif.


1-9109
GarT
2002-02-15 17:00
2002.03.04
Возникает ошибка при обращении к функции из DLL