создаю обработчик 
  DM.AConnect.begintrans;
      {Ставим защитный блок try-except}
     try
         dm.L_schetInsProc.ExecProc;
использую ADO для доступа к mssql 2000
вот кусок кода
       {Если возникло исключение}
      except
       on EDBEngineError do
        {Откатываем транзакцию}
         DM.AConnect.RollbackTrans;
        {Сообщаем пользователю об ошибке}
         ShowMessage('Операция не удалась. Повторите попытку.');
        {Отменяем изменения внесенные пользователем}
        exit;
        end;
      end;
    {Если исключений не возникло при сохранении,
    то подтвердить транзакцию}
    DM.AConnect.CommitTrans;Пишет что [Pascal Error] UL_Schet.pas(286): E2003 Undeclared identifier: 'EDBEngineError'