Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Базы данных и репортинг > Row cannot be located error

Автор: Vit 3.5.2006, 20:34

Delphi 6/ADO/MS SQL Server 2000

Есть запрос вида

Код


Select * From Table1 Where ID=2

Запрос открывается кодом типа:

Код


ADOQuery1.sql.text:='Select * From Table1 Where ID=2'
ADOQuery1.Open

Далее делается редактирование результатов запроса с использованием DB визуальных компонентов - DBGrid, DBEdit, DBMemo

Всё это делается без проблем. Проблемы начались когда на Table1 был поставлен триггер типа:

Код


Insert into Table2
Select ... From Inserted 
Inner join Deleted on Inserted.Field1<>Deleted.Field1

На Post стала появлятся ошибка:

Цитата

Row cannot be located for updating. Some values may have been changed since it was last read.

Обращает внимание, что в триггере не меняется Table1! Т.е. триггер теоретически не должен сбивать положение курсора. Debug VCL показал что ошибка идёт из глубин ADO, реально генерит строку код метода: TCustomADODataSet.InternalPost, конкретная строка:

if (Recordset.EditMode * (adEditInProgress + adEditAdd)) <> 0 then
Recordset.Update(EmptyParam, EmptyParam);

А Recordset.Update - это уже экспорт интерфейсов ADO.

Самое интересное то, что несмотря на ошибку Update данных всё-таки проходит (не уверен что отрабатывается триггер, но сам Update идёт).

Как обойти указанную проблему? Путь решения - отказаться от триггера и визуальных DB компоеннтов и формировать нужный SQL Update запрос я знаю, но в данном случае выгоды мало, а кода писать до фига...