CommitLongTranEx (CM)

De Wiki1000
(Différences entre les versions)
(Nouvelle page : <source lang='delphi'>procedure CommitlongTranEx(iOptions:TCommitOptions);</source> Cette procédure valide une transaction longue. {|class="wikitable" |- |iOption |Option de valid...)
 
 
Ligne 19 : Ligne 19 :
 
     begin
 
     begin
 
       doProcessItem(idx);
 
       doProcessItem(idx);
       ClassManager.BatchLongTran;
+
       ClassManager.BatchLongTranEx(coNoCumul);
 
     end;
 
     end;
     ClassManager.CommitLongTran;
+
     ClassManager.CommitLongTranEx(coNoCummul);
 
   except
 
   except
 
     ClassManager.RollBackLongTran;
 
     ClassManager.RollBackLongTran;

Version actuelle en date du 19 juillet 2009 à 16:19

procedure CommitlongTranEx(iOptions:TCommitOptions);

Cette procédure valide une transaction longue.

iOption Option de validation

Voir CommitEx

Exemple

var idx:Integer;
begin
  ClassManager.BeginLonTran(100,'MaClass');
  try
    for idx:=0 to VeryBigInt do
     begin
       doProcessItem(idx);
       ClassManager.BatchLongTranEx(coNoCumul);
     end;
    ClassManager.CommitLongTranEx(coNoCummul);
  except
    ClassManager.RollBackLongTran;
    raise;
  end; 
end;

Voir aussi

Gestion des transactions (CM)Développement DSM

Outils personnels