FICHIER

Description

Cette action est appelée avant l'affichage de la fenêtre de sélection du formatd'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'actionMESSAGERIE va permettre de créer le message puis l'action FICHIER de choisir le format dufichier contenant l'impression. En cas d'envoi d'un message, le nom du fichier joint n'estpas 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, enpositionnant OK = 0.

Le nom du fichier doit être renseigné soit dans l'écran principal de saisie desparamè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 sontrestituées dans le tableaux ci-dessous :

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

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