Найдено 25 результатов

СанЕк
26 окт 2005, 11:53
Форум: Вопросы создания клиентских и серверных приложений
Тема: Корректная работа с транзикциями
Ответы: 13
Просмотры: 9953

:D Ну этож пример, с алгоритмикой проблем у меня нет :D, просто сложно все на пальцах обяснять. пока вроде все работает, и работает хорошо, а это главное.
СанЕк
26 окт 2005, 11:35
Форум: Вопросы создания клиентских и серверных приложений
Тема: Корректная работа с транзикциями
Ответы: 13
Просмотры: 9953

Тут у меня еще такое мнение есть по поводу StartTransaction try ExecQuery except rollback end Commit; В этом случае при возникновении ошибки все ОК, но в программе выскочит сообщение и выполнение процедуры (если я не ошибаюсь), в которой была вызвана функция с этим кодом остановиться, например в обр...
СанЕк
25 окт 2005, 16:08
Форум: Вопросы создания клиентских и серверных приложений
Тема: Корректная работа с транзикциями
Ответы: 13
Просмотры: 9953

Совместными усилиями получаем функцию или процедуру, кому что больше нравиться, с почти 100% завершением рабочей транзикции :!: Function deleteTable(. . . .): boolean; Begin if AutoTransiction then Q.Transaction.StartTransaction; try result := true; // генерируем запрос Try q.ExecQuery;// выполняем ...
СанЕк
25 окт 2005, 13:03
Форум: Вопросы создания клиентских и серверных приложений
Тема: Корректная работа с транзикциями
Ответы: 13
Просмотры: 9953

Re: Корректная работа с транзикциями

Q.Transaction.StartTransaction; Используеться только потому что функция как бы универсальная и использует ту транзикцию которая присоединена к TIBSQL. if Q.Transaction.Active then Q.Transaction.Rollback; на тот случай если вдруг каким нить образом произошел выход из какой либо процедуры(обновления/...
СанЕк
25 окт 2005, 11:55
Форум: Вопросы создания клиентских и серверных приложений
Тема: Корректная работа с транзикциями
Ответы: 13
Просмотры: 9953

Корректная работа с транзикциями

Имееться функция удаления записей из таблици или иная другая Например Function deleteTable(Var Q: TIBSQL; Const tablename, whereline: String;AutoTransiction:boolean=true): boolean; Begin if AutoTransiction then begin // авто стартование транзикции if Q.Transaction.Active then Q.Transaction.Rollback;...