![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Не обновляются данные [D6, IB6.x]
Yasmin © (2007-06-26 12:15:00)Доброго времени суток!
После тщательного изучения FAQ и прочих статей, видимо что-то осталось упущенным, если не могу побороть свою проблему, поэтому обращаюсь за Вашей помошью.
Все компоненты, кроме dataSource, взяты с вкладки InterBase.
Имеется форма Ankets, в которой делается редактирование данных, из таблицы БД T_Ankets. На этой форме находится хранимая процедура - proc_upd, транзакция - Transp_upd, уровень изоляции транзакции = Read Commited. В свойствах процедуры указываю транзакцию Trans_upd и базу данных, которая лежит на другой форме, то есть у меня получается DataBase = Main_.db
Имеется другая форма Ankets_all, в гриде(G_ankets) которой отображены все данные из таблицы БД T_Ankets (которые редактируются в форме Ankets), но транзакцию в этой таблице T_Ankets не указываю.
После редактирования данных в форме Ankets, отредакатированные данные не отражаются в форме Ankets_all.
Код делаю такой :
Ankets.proc_upd.StoredProcName := 'UPD_ANKETS';
{Ankets.Trans_upd.StartTransaction;} ----> если строку раскоментирую, пишет ошибку : Транзакция активна!
Ankets.proc_upd.UnPrepare;
{заношу в параметры значения}
.....
Ankets.proc_upd.ParamByName('fio').Value :=ankets.fio.Text;
Ankets.proc_upd.ParamByName('name').Value :=ankets.name.Text;
{и тд.}
try
Ankets.proc_upd.Prepare;
Ankets.proc_upd.ExecProc;
Ankets.Trans_upd.Commit;
Ankets_all.t_Ankets.Refresh;
Ankets_all.G_ankets.Refresh;
except
Ankets.Trans_upd.Rollback;
end;
end;
Плиз, помогите, почему данны не хотят обновляться, где моя ошибка ???
Yasmin (2007-06-26 13:14:00) [1]делаю
Ankets_all.t_Ankets.close;
Ankets_all.t_Ankets.open;
данные ни в какую обновляться в гриде не хотят :((
Johnmen (2007-06-26 13:03:00) [2]Один раз стартовать тр-ию и далее только CommitRetaining и RollbackRetaining.
Ну и рефреш(перезапрос) конечно....
Yasmin (2007-06-26 13:02:00) [3]делаю Ankets_all.t_Ankets.close;
Ankets_all.t_Ankets.open;
вместо Ankets_all.t_Ankets.Refresh .
Данные не хотят обновляться, все изменения видны при перезаходе в программу :(
Desdechado (2007-06-26 12:53:00) [4]1. Обычно удобно использовать одну читающую и одну пишущую транзакцию.
2. Close-Open может помочь.
Yasmin (2007-06-26 12:30:00) [5]хочу, внести уточнение. Данные обновляются, но обновлений сразу не видно. Они становятся видными, при перезаходе в программу.