Разбираемся с ошибками доступа к базе данных Firebird в проектах на Delphi и Pascal

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

Иногда при работе с базой данных Firebird в проектах на Delphi и Pascal пользователи сталкиваются с ошибками, которые могут быть вызваны различными причинами. Одной из таких ошибок является сообщение об ошибке выполнения: "Unsuccessful execution caused by a system error that precludes successful execution of subsequent statements". Давайте разберемся, что может быть причиной этой проблемы и как ее можно отладить.

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

При работе с Firebird 2.5.1 на операционной системе Windows 7 пользователи могут столкнуться с ошибками доступа к базе данных, которые выглядят следующим образом:

Unsuccessful execution caused by a system error that precludes successful execution of subsequent statements
GDS Code: 335544726 - SQL Code: -902 - Error Code: 406

Эти коды ошибок могут указывать на различные проблемы, в том числе на сетевые ошибки, как указано в комментариях: isc_net_read_err -> "error reading data from the connection". Важно также проверить лог файлы Firebird на наличие соответствующих сообщений и проверить базу данных на предмет повреждений с помощью утилиты gfix. Необходимо также учитывать, что ошибка с кодом 10054 может указывать на сброс соединения удаленным узлом, даже если соединение осуществляется с локальным хостом.

Подтвержденный ответ

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

Альтернативный ответ и решение проблемы

После перехода на использование компонентов UIB (вместо IBX) также были зафиксированы подобные ошибки. Они возникали из-за выбора определенного типа транзакции (Option) в TUIBTransaction, в частности, из-за параметра tpNowait. Особенно часто такие ошибки стали появляться после перехода с традиционных HDD на более быстрые SSD.

Решением проблемы стало изменение параметра транзакции на "default", то есть использование [tpConcurrency, tpWait, tpWrite], а также установка параметра TR.LockTimeOut в значение 5 секунд перед началом каждой транзакции. Это позволяет избежать бесконечного ожидания, если доступ к ресурсу не может быть выполнен в установленный срок.

Обратите внимание, что в текущей (на 2016 год) версии UIB код не поддерживает параметр LockTimeOut. Для начала работы с этим параметром необходимо исправить соответствующий код. Пример исправления можно найти здесь.

Пример кода на Object Pascal (Delphi)

procedure TForm1.Button1Click(Sender: TObject);
var
  TR: TUIBTransaction;
begin
  TR := TUIBTransaction.Create(nil);
  try
    TR.TransactionOption := [tpConcurrency, tpWait, tpWrite];
    TR.LockTimeOut := 5000; // Установка таймаута в 5 секунд
    TR.StartTransaction;
    // Ваш код для работы с транзакцией
    TR.Commit;
  except
    on E: Exception do
    begin
      // Обработка исключений, связанных с таймаутом
      if E.Message.Contains('timeout') then
      begin
        // Повторить транзакцию с увеличенным таймаутом или уведомить пользователя
      end;
    end;
  finally
    TR.Free;
  end;
end;

Заключение

При работе с Firebird в проектах на Delphi и Pascal важно тщательно отлаживать взаимодействие с базой данных, особенно если используется многопоточное выполнение. Внимательное изучение логов, проверка базы данных на предмет повреждений и корректная настройка параметров транзакций помогут избежать большинства ошибок доступа к данным.

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

В статье обсуждаются проблемы и их возможные решения, связанные с ошибками доступа к базе данных Firebird в проектах на Delphi и Pascal, включая примеры кода и рекомендации по настройке параметров транзакций дл

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

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

:: Главная :: Interbase ::