« SealRange (TSealOpeLogRegClass) » : différence entre les versions
(Page créée avec « <source lang='delphi'>class function SealRange(iFirstSequenceNumber:Integer; iLastSequenceNumber:Integer; var aReason:string):Integer;</source> Cette méthode scelle les ... ») |
Aucun résumé des modifications |
||
| (3 versions intermédiaires par le même utilisateur non affichées) | |||
| Ligne 1 : | Ligne 1 : | ||
<source lang='delphi'>class function SealRange(iFirstSequenceNumber:Integer; iLastSequenceNumber:Integer; var aReason:string):Integer;</source> | <source lang='delphi'>class function SealRange(iFirstSequenceNumber:Integer; iLastSequenceNumber:Integer; var aReason:string):Integer;</source> | ||
{|class="wikitable" | {|class="wikitable" | ||
| Ligne 20 : | Ligne 18 : | ||
|Information sur l'erreur | |Information sur l'erreur | ||
|} | |} | ||
Cette méthode scelle les objets dont le numéro de séquence est compris entre iFirstSequenceNumber (inclu) et iLastSequenceNumber (exclu) et crée un enregistrement de journal. | |||
* Crée un enregistrement de journal | |||
* Gère une transaction longue si aucune transaction longue n'est ouverte. | |||
Le premier numéro de séquence (iFirstSequenceNumber) doit être le prochain numéro de séquence du dernier enregistrement du journal. | |||
Exemple : | |||
<source lang="delphi"> | |||
function SealInstancesByRange(iFirstSequence:Integer; iLastSequence:Integer; var aReason:string):Integer; | |||
var aSequenceNumber:Integer; AStr:string; | |||
begin | |||
ClassManager.BeginLongTran(0,'ClassSealed'); | |||
try | |||
Result := ClassSealOpeLog.SealRange(iFirstSequence,iLastSequence,AStr); | |||
aReason := AStr; | |||
if Result=0 then | |||
begin | |||
ClassManager.RollBackLongTran; | |||
Exit; | |||
end; | |||
ClassManager.CommitLongTran; | |||
except | |||
Result := 0; | |||
ClassManager.RollBackLongTran; | |||
end; | |||
end; | |||
</source> | |||
Voir aussi | Voir aussi | ||
*[[ | *[[Classe_scellée_(stereotype)|Classe scellée]] | ||
{{Footer|Classe_journal de scellement_(stereotype)}} | {{Footer|Classe_journal de scellement_(stereotype)}} | ||
[[Category:Stéréotype classe journal de scellement]] | [[Category:Stéréotype classe journal de scellement]] | ||
Dernière version du 13 avril 2017 à 08:10
<source lang='delphi'>class function SealRange(iFirstSequenceNumber:Integer; iLastSequenceNumber:Integer; var aReason:string):Integer;</source>
| Paramètre | Usage |
|---|---|
| Result | Nombre d'objet scellé, 0 indique une erreur |
| iFirstSequenceNumber | Premier numéro de séquence. |
| iLastSequenceNumber | Dernier numéro de séquence. |
| aReason | Information sur l'erreur |
Cette méthode scelle les objets dont le numéro de séquence est compris entre iFirstSequenceNumber (inclu) et iLastSequenceNumber (exclu) et crée un enregistrement de journal.
- Crée un enregistrement de journal
- Gère une transaction longue si aucune transaction longue n'est ouverte.
Le premier numéro de séquence (iFirstSequenceNumber) doit être le prochain numéro de séquence du dernier enregistrement du journal.
Exemple :
<source lang="delphi"> function SealInstancesByRange(iFirstSequence:Integer; iLastSequence:Integer; var aReason:string):Integer; var aSequenceNumber:Integer; AStr:string; begin
ClassManager.BeginLongTran(0,'ClassSealed');
try
Result := ClassSealOpeLog.SealRange(iFirstSequence,iLastSequence,AStr);
aReason := AStr;
if Result=0 then
begin
ClassManager.RollBackLongTran;
Exit;
end;
ClassManager.CommitLongTran;
except
Result := 0;
ClassManager.RollBackLongTran;
end;
end; </source>
Voir aussi
{{#if:Classe_journal de scellement_(stereotype)|
{{#if:Classe_journal de scellement_(stereotype)|— Classe_journal de scellement_(stereotype) |}} — Développement DSM —
|
{{#if:|— [[{{{1}}}]] |}} — Développement DSM —
}}