Export (rtl)
De Wiki1000
(Différences entre les versions)
| (4 révisions intermédiaires par 2 utilisateurs sont masquées) | |||
| Ligne 12 : | Ligne 12 : | ||
|- | |- | ||
|oMessage | |oMessage | ||
| − | |Chaîne de caractère informative. | + | |Chaîne de caractère informative sur le résultat. |
|} | |} | ||
| Ligne 19 : | Ligne 19 : | ||
Deux couples de valeurs ont une signification particulière et sont obligatoires : | Deux couples de valeurs ont une signification particulière et sont obligatoires : | ||
| − | FileName | + | *FileName |
| − | Indique le nom du format d'exportation à utiliser. | + | :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) | Le type du format d'exportation doit être un descripteur "drp" (nom.drp) ou un descripteur "exp" (nom.exp) | ||
| − | ExportFileName | + | *ExportFileName |
| − | Indique le nom du fichier à générer. | + | :Indique le nom du fichier à générer. |
| + | {{tip|à partir de V7.10, ExportFileName peut être un nom de boîte à message.}} | ||
| + | |||
| + | *ExportEncoding | ||
| + | :Indique l'encodage du fichier à générer. | ||
| + | |||
| + | *QueueName | ||
| + | :Indique le nom de la queue dans laquelle poster le résultat de l'export. | ||
| + | |||
| + | *ContainerName | ||
| + | :Indique le nom du conteneur dans leqeuel le fichier est écrit | ||
Exemple | Exemple | ||
<source lang='delphi'> | <source lang='delphi'> | ||
| + | procedure doArchivageEcriture(const iFileName:string); | ||
| + | var | ||
| + | params : TStringList; | ||
| + | msg : String; | ||
begin | 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; | end; | ||
</source> | </source> | ||
Voir aussi: | Voir aussi: | ||
| + | *[[Import (rtl)|Fonction import]] | ||
{{Footer|Développement DSM}} | {{Footer|Développement DSM}} | ||
[[category:RTL Framework]] | [[category:RTL Framework]] | ||
| − | |||
Version actuelle en date du 23 novembre 2020 à 09:05
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.
- ExportEncoding
- Indique l'encodage du fichier à générer.
- QueueName
- Indique le nom de la queue dans laquelle poster le résultat de l'export.
- ContainerName
- Indique le nom du conteneur dans leqeuel le fichier est écrit
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:
| Whos here now: Members 0 Guests 0 Bots & Crawlers 1 |