Ошибки создания триггера в SQL Server: переход с DevArt на нативный ODBC и LocalDB в Delphi

Delphi , Базы данных , SQL

При работе с базами данных SQL Server в среде Delphi часто возникают вопросы, связанные с выполнением динамического SQL, особенно при использовании триггеров. В данной статье мы рассмотрим проблему, с которой столкнулся разработчик при переходе с использования драйвера DevArt для SQL Server на нативный ODBC драйвер и работу с базой данных LocalDB.

Описание проблемы

Разработчик столкнулся с проблемой создания триггера в SQL Server, используя нативный клиент драйвер и ODBC. Изначально для проекта на Delphi XE2 использовался драйвер DevArt для работы с SqlExpress, но возникла необходимость перейти на использование ODBC и SQL Native Client с базой данных LocalDB.

Триггер для вставки содержит динамический SQL, который хранится в ресурсах проекта и содержит плейсхолдеры для имени базы данных и таблицы. При выполнении кода на Delphi эти плейсхолдеры заменяются на актуальные значения. Однако, после перехода на новый драйвер, скрипты создания триггера перестали работать.

При использовании TSQLQuery.ExecSQL для выполнения SQL команд, возникает ошибка:

CREATE TRIGGER [dbo].[#TableName#_INSERT_TRIGGER] ON [#DatabaseName#].[dbo].[#TableName#] FOR INSERT

которая приводит к сообщению об ошибке:

'[Microsoft][SQL Server Native Client 11.0][SQL Server]Cannot create trigger on 'EvaluationCompany_COPYDB.dbo.COPY_PRODUCTS' as the target is not in the current database.'

Попытка использовать команду USE для переключения на нужную базу данных и последующего создания триггера приводит к ошибке:

'[Microsoft][SQL Server Native Client 11.0][SQL Server]The object 'dbo.COPY_PRODUCTS' does not exist or is invalid for this operation.'

Это может быть связано с тем, что текущая база данных для создания триггера не соответствует той, на которую был выполнен переход.

Подходы к решению

Разработчик пытался выполнить несколько действий для решения проблемы:

1. Использование USE и последующего создания триггера в одном запросе.
2. Обертка создания триггера в EXEC [...] .[sys].[sp_ExecuteSQL] N' ' для выполнения через ExecSQL.

Однако, оба подхода не привели к успеху, выдавая различные ошибки.

Подтвержденное решение

В качестве решения проблемы, разработчик привел пример кода, который успешно создает базу данных, таблицу и триггер, используя компоненты TADOConnection и TADOCommand. Важно отметить, что в этом примере используется явное переключение на нужную базу данных перед созданием таблицы и триггера.

uses
  Data.Win.AdoDB;

procedure TForm1.Button1Click(Sender: TObject);
var
  aConnection : tAdoConnection;

  // ... другие процедуры ...

begin
  InitializeAdoConnection;

  ExecuteCommand('use EvaluationCompany_COPYDB');

  ExecuteCommand('create table dbo.COPY_PRODUCTS '
                 + '( PRODUCT_ID int identity(1,1),'
                 + '  PRODUCT_NAME varchar(50) )' );

  ExecuteCommand('create trigger dbo.COPY_PRODUCTS_INSERT_TRIGGER '
                 + 'on dbo.COPY_PRODUCTS '
                 + 'for insert '
                 + 'as '
                 + 'begin '
                 + '  update COPY_PRODUCTS '
                 + '    set PRODUCT_NAME = PRODUCT_NAME + ''!'' '
                 + '    where PRODUCT_ID in '
                 + '    ( select PRODUCT_ID from INSERTED )'
                 + 'end ' );

  // ... другие команды ...
end;

Заключение

При переходе с использования драйвера DevArt на нативный ODBC драйвер и работу с LocalDB в Delphi, важно убедиться в корректности выполнения команд переключения базы данных и в правильности форматирования SQL запросов. Использование компонентов TADOConnection и TADOCommand может быть более предпочтительным в таких случаях, чем TSQLQuery и TSQLConnection. Приведенный пример кода демонстрирует правильный подход к решению задачи.

Создано по материалам из источника по ссылке.

При переходе с использования драйвера DevArt на нативный ODBC драйвер и работу с LocalDB в среде Delphi возникла проблема с созданием триггера в SQL Server из-за некорректного выполнения динамического SQL.

Комментарии и вопросы

Получайте свежие новости и обновления по Object Pascal, Delphi и Lazarus прямо в свой смартфон. Подпишитесь на наш Telegram-канал delphi_kansoftware и будьте в курсе последних тенденций в разработке под Linux, Windows, Android и iOS

:: Главная :: SQL ::