FICHIER

Description

Cette action est appelée avant l'affichage de la fenêtre de sélection du format d'export, lorsqu'on désire exporter l'impression dans un fichier. Cette action est également appelée lorsqu'on envoie l'impression par messagerie; Dans ce cas, l'action MESSAGERIE va permettre de créer le message puis l'action FICHIER de choisir le format du fichier contenant l'impression. En cas d'envoi d'un message, le nom du fichier joint n'est pas modifiable : c'est le nom de l'état Crystal Report.

    [M]IMPRIME = 3    la destination choisie est : messagerie

    [M]IMPRIME = 4    la destination choisie est : fichier

Modèle

Etat

Utilisation

Elle permet d'éviter l'affichage de la fenêtre de sélection du format d'export, en positionnant OK = 0.

Le nom du fichier doit être renseigné soit dans l'écran principal de saisie des paramètres, soit dans le paramètre  _ExportFile.

Le format d'export doit être renseigné dans le paramètre  _FormatExport. Les formats disponibles sont référencés dans le menu local 91de X3. Les valeurs sont restituées dans le tableaux ci-dessous :

 Numéro de format Format
 1 Etat Crystal report
 2 Data interchange format
 3 Word pour windows
 4 Colonnes de valeurs
 5 Texte riche (rtf)
 6 Valeurs séparées par des virgules (CSV)
 7 Valeurs séparées par des TAB
 8 Valeurs séparées par un caractère
 9 Texte ASCII
 10 Texte ASCII paginé
 11 Texte ASCII séparé par des TAB
 12 Lotus 1-2-3 (WKS)
 13 Lotus 1-2-3 (WK1)
 14 Lotus 1-2-3 (WK3)
15 Excel 2.1
 16 Excel 3.0
 17 Excel 4.0
 18 Excel 5.0
 19 Excel 6.0
 20 ODBC
 21 HTML 3.2
 22 Internet explorer 2 HTML
 23 Netscape 2 HTML
 24 HTML 4
 25 Excel 7 (standard)
 26 Excel 7 (étendu)
 27 Excel 8 (standard)
 28 Excel 8 (étendu)
 29 PDF

Pour le format 8, il est possible de renseigner les 2 paramètres suivants :

_FormatDelString                Délimiteur de chaîne

_FormatDelRecord              Séparateur de champ

Exemple

Export direct de l'impression, dans le fichier TOTO qui est en format Word.

$FICHIER
OK=0
NBPAR+=1:PARAMETRE(NBPAR) = "_ExportFile="+chr$(1)+"C:\tmp\TOTO.xls"
NBPAR+=1:PARAMETRE(NBPAR) = "_FormatExport="+chr$(1)+"27"
Return

Export direct de l'impression, dans le fichier TOTO qui est en format 8.

$FICHIER
OK=0
NBPAR+=1:PARAMETRE(NBPAR) = "_ExportFile="+chr$(1)+"C:\tmp\TOTO.xls"
NBPAR+=1:PARAMETRE(NBPAR) = "_FormatExport="+chr$(1)+"8"
NBPAR+=1:PARAMETRE(NBPAR) = "_FormatDelString="+chr$(1)+'"'
NBPAR+=1:PARAMETRE(NBPAR) = "_FormatDelRecord="+chr$(1)+chr$(13)+chr$(10)
Return