Автоинкрементальные поля и Interbase 3Delphi , Базы данных , InterbaseАвтоинкрементальные поля и Interbase 3Автор: Mike Downey Я пытаюсь добавить запись в таблицу InterBase, содержащую триггеры и blob-поля, тем не менее, всякий раз при выполнении метода "post" после установки ("append") значений, я получаю ошибку: 'Record/Key deleted.' (запись/ключ удален). Вот реальный пример того, как я обошел эту проблему: Определение хранимой процедуры: Create Procedure NewEmployeeKey Returns ( EmployeeKey Integer ) as begin EmployeeKey = Gen_Id( gnEmployeeKey, 1 ) ; endОпределение триггера: Create Trigger SetEmployeeKey for tbEmployee Active Before Insert Position 0 as begin if ( New.EmployeeKey is Null ) then begin Execute Procedure NewEmployeeKey Returning_Values New.EmployeeKey ; end end Код Delphi для использования в обработчике события OnNewRecord, или AfterInsert, или BeforePost:
Это все, что вам необходимо. Хранимая процедура возвращает следующее сгенерированное значение. Триггер это гарантирует, даже если бы данные не были доступны из вашей Delphi-программы, первичный ключ все еще назначает значение. В Delphi-коде, я полагаю, вы могли бы проверять наличие пустого поля первичного ключа вместо .State in [dsInsert], хотя это то же работает. Автоинкрементальные поля и Interbase 3: автор Mike Downey описывает решение проблемы ошибки "Record/Key deleted" при работе с триггерами и blob-полями в таблице InterBase, используя хранимую процедуру и код на Delphi. Комментарии и вопросыПолучайте свежие новости и обновления по Object Pascal, Delphi и Lazarus прямо в свой смартфон. Подпишитесь на наш Telegram-канал delphi_kansoftware и будьте в курсе последних тенденций в разработке под Linux, Windows, Android и iOS Материалы статей собраны из открытых источников, владелец сайта не претендует на авторство. Там где авторство установить не удалось, материал подаётся без имени автора. В случае если Вы считаете, что Ваши права нарушены, пожалуйста, свяжитесь с владельцем сайта.
|
|||||
©KANSoftWare (разработка программного обеспечения, создание программ, создание интерактивных сайтов), 2007 |