EXEC

Description

Cette action est appelée après la saisie des paramètres.

Modèle

Etat

Utilisation

Elle permet de forcer la valeur de certains paramètres.

Les paramètres sont stockés dans la variable PARAMETRE aux indices 1à NBPAR. Chaque valeur est une chaîne de la forme " paramètre=valeur " sans aucun autre séparateur. Les paramètres del’état sont répartis en 4 classes :

   Ceux qui commencent par un double underscore. Ce sont les paramètres à destinationd’X3, ils ne sont pas transmis à l’état (ou tout au moins pas tel quel)

   Ceux qui commencent par un simple underscore. Ce sont des paramètres à destination deCrystal Reports, ils ne sont pas transmis à l’état. Les valeurs de ces paramètressont obligatoirement préfixés par chr$(1).

   Ceux qui commencent par X3. Ce sont des paramètres de contexte transmis à l’étatet initialisés automatiquement par le superviseur.

   Ceux qui sont décrits dans le dictionnaire des états. Lorsque le dictionnaire comporteun paramètre se terminant par " deb " ou " str "un autre paramètre de même racine se terminant par " fin " ou" end " est automatiquement ajouté.

Le nom du serveur d’impression n’est pas un paramètre. Il est défini dansla variable locale SERVEUR(char(30)).

Liste des paramètres :

__REPORT                        Nom de l’étatcrystal reports

__DESTINATION                0=pré-visualisation, 1=imprimante, 2=messagerie, 3=fichier

__TYPDBA                          Type de base de données (menu local 23)

__DBDATABASE                Nom de la base de données

__DBUSER                        Utilisateur BDD

__DBPASSWORD            Mot de passe

__APPLICATION                Dossier ;machine ;service (de là où on lance l’impression)

__APPRPT                         Dossier ;machine ;service (de là où se trouve l’état)

__REQUETE                      No de requête

__WSTATION                      Nomréseau du poste depuis lequel a été soumis l'impression

__CDUSER                        Utilisateur de loggin

__RPTLAN                          Langue de l'état

_PreVisuOptions                Options de pré-visualisation (non opérationnel)

_PrinterName                      Nom de l’imprimante

_Orientation                         0=portrait, 1=paysage

_PrinterDriver(*)                 Nom du driver imprimante

_PrinterPort(*)                    Port imprimante

_PrinterDescription (*)       Caractéristiques de l’imprimante

_PrinterServer(*)               Nom du serveur d'impression

_PrinterCopies                   Nombre de copies

_PrinterStartPage               Premièrepage

_PrinterStopPage               Dernièrepage

_ExportFile                         Nom du fichier d’export

_FormatExport                    Format du fichier d’export (menu local 91)

_FormatDelString               Délimiteur de chaîne si format "Valeur séparée par un caractère"

_FormatDelRecord             Séparateur de champ siformat "Valeur séparée par un caractère"

(*)                 Ces paramètres sont dépendants de l’imprimante et ne peuvent être décrits. Ilssont normalement récupérés par l’instruction selimp (faire un essai sur uneimprimante donnée et noter les valeurs de ces paramètres).

X3DOS                                Dossier ;machine ;service

X3CLI                                  Raison sociale client

X3EDT                                 Copyright éditeur

X3ETA                                 Code de l’état

X3TIT                                  Nom de l’état

X3USR                                 Codeutilisateur

X3OPE                                Nom utilisateur

X3SIT1                                Listes des sitesautorisés

X3SIT2                                Listesdes sitesinterdits

X3PRF                                Profilfonction

X3FCT                                Fonctionassociée à l’état

X3SIT                                  Liste dessites interdits

X3LAN                                 Langue

X3FCY                                Site ( pour GEODE uniquement )

X3DEP                                Dépositaire ( pour GEODE uniquement )

Exemple

On veut forcer le paramètre traitauto à la valeur 1.

For I = 1 To NBPAR
     If left$(PARAMETRE(I),10)="traitauto="
        PARAMETRE(I) = "traitauto="+num$(1)
     Endif
Next I