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 de létat sont répartis en 4 classes :
Ceux qui commencent par un double underscore. Ce sont les paramètres à destination dX3, 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 de Crystal Reports, ils ne sont pas transmis à létat. Les valeurs de ces paramètres sont obligatoirement préfixés par chr$(1).
Ceux qui commencent par X3. Ce sont des paramètres de contexte transmis à létat et initialisés automatiquement par le superviseur.
Ceux qui sont décrits dans le dictionnaire des états. Lorsque le dictionnaire comporte un 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 dimpression nest pas un paramètre. Il est défini dans la variable locale SERVEUR (char(30)).
Liste des paramètres :
__REPORT Nom de létat crystal 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 limpression)
__APPRPT Dossier ;machine ;service (de là où se trouve létat)
__REQUETE No de requête
__WSTATION Nom ré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 limprimante
_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ère page
_PrinterStopPage Dernière page
_ExportFile Nom du fichier dexport
_FormatExport Format du fichier dexport (menu local 91)
_FormatDelString Délimiteur de chaîne si format "Valeur séparée par un caractère"
_FormatDelRecord Séparateur de champ si format "Valeur séparée par un caractère"
(*) Ces paramètres sont dépendants de limprimante et ne peuvent être décrits. Ils sont normalement récupérés par linstruction selimp (faire un essai sur une imprimante 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 Code utilisateur
X3OPE Nom utilisateur
X3SIT1 Listes des sites autorisés
X3SIT2 Listes des sites interdits
X3PRF Profil fonction
X3FCT Fonction associée à létat
X3SIT Liste des sites 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