При работе с двумя TQuery, связанными с одним TDatabase, проподаю

← →
smu © (2003-10-31 08:53) [0]

Доброго времени суток. При работе с двумя TQuery, связанными с одним TDatabase, проподают наборы данных. Т.е. один запрос вносит изменения, второй осуществляет выборку данных. Так вот, после внесения изменений данные из выборки пропадают. Как этого избежать, кроме как добавлением второго компонента TDatabase?

← →
Zacho © (2003-10-31 08:58) [1]

Ничего не должно пропадать. Приведи код.
P.S. Если возможно - откажись от использования BDE, используй, например, IBX.

← →
DenK_vrtz © (2003-10-31 09:01) [2]

Возможно, где-то свойству Connected компонента TDatabase присваивается false

← →
Sergey13 © (2003-10-31 09:05) [3]

2smu © (31.10.03 08:53)
>Т.е. один запрос вносит изменения
Это случаем не Delete? 8-)

← →
smu © (2003-10-31 09:22) [4]

qrModify.Close;
qrModify.SQL.Text:="INSERT INTO ARCHDOCS (CLID, NUM, DTYPE)
VALUES (:par0, :par1, :par2);
qrModify.ParamByName("par0").AsString:=fmCurrDay.qrPorTreb.FieldByName("CLID").AsString;
qrModify.ParamByName("par1").AsString:= fmCurrDay.qrPorTreb.FieldByName("NUM").AsString;
qrModify.ParamByName("par2").AsString:=fmCurrDay.qrPorTreb.FieldByName("DTYPE").AsString;
qrModify.ExecSQL;
fmMain.trsPorTreb.Commit;
//здесь qrPorTreb - выборка - тут все работает(выборку сделал до этого SELECT * FROM CURDOCS)
qrModify.Close;
qrModify.SQL.Text:="DELETE FROM CURDOCS WHERE RECID = :par1";
qrModify.ParamByName("par1").AsInteger:= fmCurrDay.qrPorTreb.FieldByName("NUM").AsInteger;
qrModify.ExecSQL;
fmMain.trsPorTreb.Commit;
fmCurrDay.qrPorTreb.Delete;
вот тута проблемы говорит поле не найдено

← →
DenK_vrtz © (2003-10-31 09:24) [5]

В общем предположения Sergey13 © где-то рядом :)

← →
Zacho © (2003-10-31 09:26) [6]

> smu © (31.10.03 09:22) [4]

Судя по fmMain.trsPorTreb.Commit; у тебя все-таки не БДЕ. Тогда зачем упоминал TQuery ?
А в компонентах типа IBX или FIBPlus после завершения транзакции все запросы, работающие в контексте завершенной транзакции, закрываются. Используй CommitRetaining. И учи матчасть.

← →
smu © (2003-10-31 09:36) [7]

да извиняюсь IBQuery
а в чем различия? Он случаем базу не закрывает?

DenK_vrtz > удаляю то после...

← →
Zacho © (2003-10-31 09:44) [8]

> smu © (31.10.03 09:36) [7]

Базу - не закрывает. Но, как я уже написал, после завершения транзакции все запросы, работающие в контексте завершенной транзакции, закрываются.
Т.е. после trsPorTreb.Commit qrPorTreb будет закрыта.

Ну а как же тогда запись удалить?
fmCurrDay.qrPorTreb.Delete; - уже не катит
по-новой делать запрос?

> smu © (31.10.03 09:53) [9]

Ну я же уже написал - вместо Commit используй CommitRetaining.
Или действительно, снова стартуй транзакцию и переоткрывай запрос.
И прочитай http://www.ibase.ru/devinfo/ibxtrans.htm

Спасиб. Усе таки придется читать, а как не хотелось :))

При работе с двумя TQuery, связанными с одним TDatabase, проподаю Найти похожие ветки