Blog ENI : Toute la veille numérique !
Dernière chance (fin le 29/02) : -25€ dès 75€ sur les livres en ligne, vidéos... code FUSEE25. J'en profite !
Accès illimité 24h/24 à tous nos livres & vidéos ! 
Découvrez la Bibliothèque Numérique ENI. Cliquez ici
  1. Livres et vidéos
  2. RPG et CL
  3. Les menus AS/400
Extrait - RPG et CL Maîtrisez la programmation sur AS/400
Extraits du livre
RPG et CL Maîtrisez la programmation sur AS/400
1 avis
Revenir à la page d'achat du livre

Les menus AS/400

Introduction

Les menus sont un moyen simple d’organiser les appels à différents programmes en les groupant sur un seul écran.

Cette partie est moins ardue. Les menus AS/400 sont d’une simplicité étonnante, de plus on ne peut quasiment que les réaliser au moyen de SDA qui est particulièrement bien adapté et soudainement très simple d’utilisation (après les sous-fichiers, tout paraît très simple).

Le menu du programmeur

Nous allons étudier en détail notre menu. Chacun ajoutera ou supprimera ce que bon lui semble et, sauf si quelqu’un ajoute la commande fatidique PWRDWNSYS, tout se passera bien.

Dans le fichier QMNUSRC, il faut créer un membre de type MNUDDS, touche [F6] et saisie des bons paramètres.

Cet écran représente ce qui existera une fois les trois menus créés.

11ep01.png

Choisir l’option 17 (SDA) pour commencer la création du menu. Il s’agit en fait de saisir sur l’écran suivant tout ce qui devra être affiché et d’associer les commandes ou les programmes à appeler.

Cet écran sert essentiellement à réaliser la mise en page. Dans les premiers temps l’usage de la touche [F1] est hautement recommandée.

Quand on quitte l’éditeur, par défaut, la compilation est lancée et le programme remplacé.

Pour obtenir un peu plus de choix, il faut taper la commande suivante, puis [F4]. Cela permet entre autres de modifier la ligne de commande, notée par défaut option de commande :

CRTMNU MENU(TBIBPGM/PGMUDV) TYPE(*DSPF) 

Voici à quoi ressemble SDA lors de la conception des menus AS/400. Il faut remarquer l’option de commande ridicule qui par défaut ne permet pas de saisir grand-chose.

11ep02.png

À la sortie de SDA et si l’on a choisi les options par défaut, on aura...

Le menu utilisateur et le menu système

Il n’y a rien de particulier à signaler, les sources parlent d’eux-mêmes, il y a simplement l’utilisation d’une commande particulière lorsqu’on veut lancer l’édition de la liste du personnel qui permet d’afficher directement un écran de sélection. Il faut passer un paramètre au programme, pour que l’utilisateur puisse choisir quel matricule il veut éditer.

0001.00              CMD        PROMPT('Edition liste du personnel')
0002.00
0003.00              PARM       KWD(MATR) TYPE(*CHAR) LEN(10) +
0004.00                           RANGE('0000000001' '9999999999') MIN(0) +
0005.00                           ALWUNPRT(*NO) ALWVAR(*NO) +
0006.00                           CHOICE('Matricule ou totale') +
0007.00                           PROMPT('Edition liste du personnel' 1)
***************  Fin des données  ************************************* 

Exercice

Chacun s’entraînera à créer des menus, des commandes et voir les variations possibles.

Il a été évoqué la possibilité d’ajouter une aide aux commandes, c’est le moment ou jamais de voir si c’est possible (c’est possible) et comment faire.

Indice, dans le QPNLGRP penser à faire la référence correcte aux paramètres.

Pas de difficultés majeures à ce niveau. Disons que c’est le chapitre qui permet d’agencer et de présenter sous la forme la plus conviviale possible, du moins en terme AS/400, le fruit du travail bien accompli.