BeforeExecute (TQueryExecuteTask )

<source lang='delphi'>procedure BeforeExecute;</source>

Si cette méthode existe elle est appelé avant l'export.

Tip : Utilisez cette méthode si vous créez dynamiquement le descriptif d'export

Exemple :

<source lang="delphi"> //Procedure BeforeExecute; var doc:TxmlDocument; AStr,AReason:string; begin

 // Create and set the descriptor 
 doc := CreateDescriptor();
 AStr := doc.SaveToString;
 Descriptor.Document.LoadFromString(AStr);
 //
 // Set the descriptif's parameters from the processus's attributes
 Parameters.Values['ArgDateDebut'] := GetAbsoluteDate(dateDebut); 
 Parameters.Values['ArgDateFin'] := GetAbsoluteDate(dateFin); 
 Parameters.Values['ArgNonLettre'] := nonLettre; 
 Parameters.Values['ArgSimulation'] := simulation;
 Parameters.Values['ArgCodeCompteDebut'] := codeCompteDebut; 
 Parameters.Values['ArgCodeCompteFin'] := codeCompteFin;
 Parameters.Values['ArgCodeEtablissementDebut'] := codeEtablissementDebut; 
 Parameters.Values['ArgCodeEtablissementFin'] := codeEtablissementFin;
 Parameters.Values['ArgApprocheComptable'] := ApprocheComptable.code;

end; </source>

Voir aussi:

{{#if:TQueryExecuteTask_(class)|

{{#if:TQueryExecuteTask_(class)|— TQueryExecuteTask_(class) |}} — Développement DSM —

|

{{#if:|— [[{{{1}}}]] |}} — Développement DSM —

}}