Создание уникальных значений ключа в Interbase.
При создании любой информационной системы с использованием SQL сервера возникает проблема генерации значения ключа в таблице. Целью данной статьи является рассмотрение вопросов, связанных с данным процессом.
Итак, представим, что у нас есть таблица TABLE1 :
create table TABLE1 ( ID INTEGER not null, NAME VARCHAR(50) not null, ADR VARCHAR(20) not null, constraint PK_TABLE1 primary key (ID) );
Нам необходимо обеспечить уникальность каждого кортежа в этой сущности TABLE1. Для этого существуют 3 способа:
1. Неправильный
В чем он заключается... Идея очень проста - при добавлении записей получаете максимальное значение ключа (select max(ID) from TABLE1), увеличиваете его на некоторую величину и используете в запросе (insert into table1 values(максимальное_значение_ключа+1,......) Недостатки этого способа достаточно очевидны - при многопользовательской работе возникают конфликты, когда несколько клиентов, пишущих в БД, получают одинаковые значения ключа.
2. Непереносимый
В чем он заключается... Использование этого метода основанно на механизме ГЕНЕРАТОРОВ в Interbase. Генератор - это особый механизм, гарантирующий, что при каждом обращении к нему будет генерироваться новый ключ.
Синтаксис - CREATE GENERATOR ;
Далее можно установить, с какой величины будет генерироваться ключ.
Синтаксис - SET GENERATOR TO ;
Далее создается хранимая процедура
CREATE PROCEDURE RETURNS (ID INTEGER) AS BEGIN ID = GEN_ID( , ); END !!
После этого в Delphi кидаем на форму объект TStoredProc, прописываем в свойствах Alias и выбираем имя процедуры. При необходимости сгенерировать значение ключа пишем что-то типа:
....... sp_InNaklTextId.ExecProc; PRIM_KEY:=sp_InNaklTextId.Params[0].AsInteger;
И далее Prim_key используем в запросе на добавление записи.
3. Переносимый
Идея состоит в некотором видоизменении 2 способа. Все также объявляем генератор, но вот хранимой процедуры больше нет, зато есть триггер. Выглядит это примерно так:
create generator TABLE1_GEN; set generator TABLE1_GEN to 0; commit; set term !! ; create trigger TRG_TABLE1_INSERT for TABLE1 before insert as begin new.ID= GEN_ID(TABLE1_GEN,1); end!! set term ; !! commit;
Далее при добавлении записи запрос указывает в виде:
insert into TABLE1(name,adr)
values('xxx','xxx');
В общем появляется некоторое неудобство при написании запросов, так как первое поле ключевое, и надо указать, что в него запись не производиться.
Главное же преимущество такого подхода в том, что увеличивается переносимость приложения между различными SQL серверами. Идея создания автогенератора ключа не нова - это и AutoIncrement поле в Paradox, и тип поля Identity в Ms SQL Server / Sybase, и вроде бы тоже некий тип поля в Oracle (к сожалению не знаю точно). Но эти механизмы не стандартизованны и каждый реализует их по своему. Описанный же выше подход обеспечивает переносимость, и, например, одно из написанных мною приложений, если не брать в расчет хранимые процедуры, одинаково работает и на IB и на MS SQL.
Оставить комментарий
Комментарии
