Export (rtl)
De Wiki1000
(Différences entre les versions)
Ligne 12 : | Ligne 12 : | ||
|- | |- | ||
|oMessage | |oMessage | ||
− | |Chaîne de caractère informative. | + | |Chaîne de caractère informative sur le résultat. |
|} | |} | ||
Version du 4 novembre 2017 à 08:57
Function Export(const iParameters:String; var oMessage:Variant):Integer;
Cette fonction exécute une exportation en utilisant les informations contenues dans le paramètre iParameters.
Result | La fonction retourne 0 si l'exécution a été réalisée et -1 sinon. |
iParameters | Paramètres de l'exportation. |
oMessage | Chaîne de caractère informative sur le résultat. |
Le paramètre iParameters doit contenir les paramètres de l'exportation sous la forme de couple "nom=valeur" , une liste de chaîne peut être utilisée pour construire ce paramètre.
Deux couples de valeurs ont une signification particulière et sont obligatoires :
- FileName
- Indique le nom du format d'exportation à utiliser.
Le type du format d'exportation doit être un descripteur "drp" (nom.drp) ou un descripteur "exp" (nom.exp)
- ExportFileName
- Indique le nom du fichier à générer.
- QueueName
- Indique le nom de la queue dans laquelle poster le résultat de l'export.
Exemple
procedure doArchivageEcriture(const iFileName:string); var params : TStringList; msg : String; begin params := TStringList.Create; //------------------------------ // EXPORT ECRITURES //------------------------------ params.Clear; params.Add('FileName=archivage_ecritures.exp'); params.Add('ExportFileName='+ iFileName); params.Add('DATE_INF='+DateToStr(Exercice.dateDebut)); params.Add('DATE_SUP='+DateToStr(Exercice.dateFin)); params.Add('Approche='+_TP('Nationale')); EXPORT(params.Text,msg); .... end;
Voir aussi: