> Tech > Utilisation

Utilisation

Tech - Par iTPro - Publié le 24 juin 2010
email

L'utilisation de cet utilitaire est relativement simple. En effet, il suffit d'appeler la fenêtre de consultation à  partir d'un programme RPG ou CL interactif. L'utilitaire nécessite les quatre paramètres suivants :

· Input Char(10) : fichier à  consulter
· Input Char(10) : bibliothèque du fichier
· Input Char(10) :

champ pour lequel une valeur sera renvoyée

· Output Char(128) : valeur en retour du champ sélectionné





La figure 1 présente le code du programme RPG/ILE qui invoque l’utilitaire de
la fenêtre de consultation. On peut obtenir l’ensemble du code de cet utilitaire
sur notre site Web (www.mysystemsjournal.com). La figure 2 présente l’écran de
la fenêtre de consultation résultante, qui contient le fichier client maître de
l’entreprise (MFCMP100). Etant donné que le fichier MFCMP100 possède une clé d’index
basée sur le champ CNAME, les données sont triées en fonction des noms de client.
Pour sélectionner un nom de client, il faut inscrire 1 sous la colonne Opt située
à  côté du nom du client puis taper Entrée. Par exemple en sélectionnant le nom
de client Dot Com, la valeur 454285 est enregistrée dans le champ Irtnval. Cette
valeur est ensuite renvoyée au programme appelant. Il faut noter également que
le troisième paramètre, CUSNO, indique qu’on souhaite récupérer la valeur de retour
du numéro de client.





L’utilitaire de la fenêtre de consultation utilise un sous-fichier. La place de
la fenêtre dépend de l’emplacement du curseur lorsque l’utilitaire est appelé.
La figure 3 montre que WINDOW1 est le premier format écrit vers le programme d’affichage.
Ce format utilise le mot-clé WINDOW pour définir les paramètres de la fenêtre.
Le paramètre *DFT indique que la position courante du curseur doit être utilisée
pour spécifier la position du coin supérieur gauche de la fenêtre. Les autres
paramètres indiquent que la fenêtre compte 12 lignes de long et 50 caractères
de large, et *NOMSGLIN est la ligne du message par défaut.



J’espère que cet utilitaire de consultation sera apprécié et qu’il contribura
à  vous rendre plus productif. Une chose est sûre, cela a été le cas pour moi.



Long Nguyen est consultant indépendant. Il travaille chez
ASICS Tiger Corporation en qualité de développeur à  la fois RPG et Lotus Notes.

Téléchargez gratuitement cette ressource

Guide Azure Virtual Desktop

Guide Azure Virtual Desktop

Comment optimiser les coûts, gagner en agilité, en sécurité et en conformité avec Azure Virtual Desktop ? Découvrez, dans ce Guide Infographique, les bénéfices clés pour les utilisateurs et les avantages de la mise en œuvre pour les équipes IT.

Tech - Par iTPro - Publié le 24 juin 2010