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

Вниз

Не обновляются данные   Найти похожие ветки 

 
Yasmin   (2007-06-26 12:15) [0]

Доброго времени суток!
После тщательного изучения 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 12:30) [1]

хочу, внести уточнение. Данные обновляются, но обновлений сразу не видно. Они становятся видными, при перезаходе в программу.


 
Desdechado ©   (2007-06-26 12:53) [2]

1. Обычно удобно использовать одну читающую и одну пишущую транзакцию.
2. Close-Open может помочь.


 
Yasmin   (2007-06-26 13:02) [3]

делаю   Ankets_all.t_Ankets.close;
          Ankets_all.t_Ankets.open;

вместо Ankets_all.t_Ankets.Refresh .

Данные не хотят обновляться, все изменения видны при перезаходе в программу :(


 
Johnmen ©   (2007-06-26 13:03) [4]

Один раз стартовать тр-ию и далее только CommitRetaining и RollbackRetaining.
Ну и рефреш(перезапрос) конечно....


 
Yasmin   (2007-06-26 13:14) [5]

делаю  
         Ankets_all.t_Ankets.close;
         Ankets_all.t_Ankets.open;

данные ни в какую обновляться в гриде не хотят :((



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

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

Наверх




Память: 0.48 MB
Время: 0.021 c
2-1192086758
Quart
2007-10-11 11:12
2007.11.04
Подключение к БД


4-1177771250
webpauk
2007-04-28 18:40
2007.11.04
добавление пункта в контекстное мен. проводника


2-1192027076
smaller
2007-10-10 18:37
2007.11.04
Как непрерывно выводить звук, с плавно меняющейся частотой?


15-1191413628
Ламот
2007-10-03 16:13
2007.11.04
Как вернуть меню в Excel ?


2-1192108994
Николай
2007-10-11 17:23
2007.11.04
как определить сколько оперативной памяти осталось