BeginLongTran (CM)
procedure BeginTranLongTran(iBatchSize:Integer; iParam:Variant);
Démarre une transaction longue.
| iBatchSize | Taille de lot. |
| iParam | Paramètre indiquant une classe métier.
Ce paramètre peut ê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