« BatchLongTran (CM) » : différence entre les versions
(Nouvelle page : <source lang='delphi'>procedure BatchLongTran;</source> Cette procédure valide et transmet les objets en transaction au serveur SQL si le nombre d'objet est supérieur ou égale à...) |
Aucun résumé des modifications |
||
| Ligne 17 : | Ligne 17 : | ||
begin | begin | ||
doProcessItem(idx); | doProcessItem(idx); | ||
ClassManager.BatchLongTran; | if idx mod 100=0 then ClassManager.BatchLongTran; | ||
end; | end; | ||
ClassManager.CommitLongTran; | ClassManager.CommitLongTran; | ||
| Ligne 27 : | Ligne 27 : | ||
</source> | </source> | ||
Voir aussi | Voir aussi : | ||
* [[BeginLongTran (CM)|BeginLongTran]] | |||
{{Footer|Gestion des transactions (CM)}} | {{Footer|Gestion des transactions (CM)}} | ||
[[category:ClassManager]] | [[category:ClassManager]] | ||
[[category:CMT]] | [[category:CMT]] | ||
Version du 8 janvier 2010 à 12:41
<source lang='delphi'>procedure BatchLongTran;</source>
Cette procédure valide et transmet les objets en transaction au serveur SQL si le nombre d'objet est supérieur ou égale à BatchSize de la transaction.
| Pas de paramètre |
Exemple <source lang='delphi'> var idx:Integer; begin
ClassManager.BeginLonTran(100,'MaClass');
try
for idx:=0 to VeryBigInt do
begin
doProcessItem(idx);
if idx mod 100=0 then ClassManager.BatchLongTran;
end;
ClassManager.CommitLongTran;
except
ClassManager.RollBackLongTran;
raise;
end;
end; </source>
Voir aussi :
{{#if:Gestion des transactions (CM)|
{{#if:Gestion des transactions (CM)|— Gestion des transactions (CM) |}} — Développement DSM —
|
{{#if:|— [[{{{1}}}]] |}} — Développement DSM —
}}