CommitLongTran (CM)
procedure CommitlongTran;
Cette procédure valide une transaction longue.
| Pas de paramètre. |
Exemple
var idx:Integer;
begin
ClassManager.BeginLonTran(100,'MaClass');
try
for idx:=0 to VeryBigInt do
begin
doProcessItem(idx);
ClassManager.BatchLongTran;
end;
ClassManager.CommitLongTran;
except
ClassManager.RollBackLongTran;
raise;
end;
end;
Voir aussi