Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.05.30;
Скачать: CL | DM;

Вниз

Не удаляется запись   Найти похожие ветки 

 
Kirill ©   (2004-05-02 01:59) [0]

Совсем запутался...
В TpFIBDataSet в DeleteSQL прописал
DELETE FROM tblbooks B WHERE B.IDB = :OLD_IDB, где IDB - PK.
Добавил 2 транзакции trRead и trWrite
read
nowait
rec_version
read_committed

write
nowait
rec_version
read_committed

AutoCommit выставил в True.
На нажатие кнопки делаю tblBooks.Delete
Из таблицы запись пропадает, но после отсоединения от БД и восстановления соединения запись как будто не трогали. Она на своем старом месте.
БД Firebird 1.5


 
Kirill ©   (2004-05-02 02:14) [1]

К этому хочу еще добавить, что изменения тоже не хотят сохранятся, но в данном случае изменения вообще не появляются.
UPDATE BOOKS B
SET
B.BNAME = :BNAME,
B.AUTHOR = :MAS_IDA,
B.POSIT = :POSIT
WHERE B.IDB = :OLD_IDB

, где IDA PK таблицы AUTHOR
   tblBooks.Edit;
   tblBooks.FieldByName("BNAME").AsString:=fbookname;
   tblBooks.FieldByName("POSIT").AsInteger:=fposit; //целое
   tblBooks.Post;


 
P.N.P. ©   (2004-05-02 02:28) [2]

Может следует сделать принудительный commit транзакциям?


 
Kirill ©   (2004-05-02 02:46) [3]


> Может следует сделать принудительный commit транзакциям?

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


 
Kirill ©   (2004-05-03 00:28) [4]

Спасибо большое. Сам разобрался. Вся трабла заключалась в том, что я юзаю для просмотра в select"е представление, а удалять пытаюсь из таблицы. У них одинаковые значения PK, но разные названия. Изменил на это
DELETE FROM tblbooks B WHERE B.IDB = :OLD_ID
и все заработало. Аналогично и в изменении.
У меня возник другой вопрос, но это уже в новом топике...



Страницы: 1 вся ветка

Текущий архив: 2004.05.30;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.027 c
7-1082626574
Alex_s
2004-04-22 13:36
2004.05.30
Работа с контроллером


1-1084857655
lehich
2004-05-18 09:20
2004.05.30
close


6-1080573425
kortun
2004-03-29 19:17
2004.05.30
TcpServer принципы работы?


7-1082702338
random
2004-04-23 10:38
2004.05.30
Как отключить Autorun


11-1074438248
Neznaika
2004-01-18 18:04
2004.05.30
MHLame для Delphi6