Essai menu avec barre d'application (MENUUIMB)

BoTTom |
:PNLGRP   SCHIDX=QHSS1.
:COPYR.
texte du copyright.
 
:VAR NAME=ZMENU.
:MBAR NAME=MBARLNK.
:MBARC HELP='MENUBAR/TRAVAUX'
       .Travaux
:PDFLD.
:PDFLDC   OPTION=1
          HELP='MENUBAR/TRAVAIL'
          ACTION='CMD WRKJOB'
          .Gérer le travail en cours
:PDFLDC   OPTION=2
          HELP='MENUBAR/SOUMIS'
          ACTION='CMD WRKSBMJOB'
          .Travaux soumis par util
:PDFLDC   OPTION=3
          HELP='MENUBAR/HISTORIQUE'
          ACTION='CMD DSPJOBLOG'
          .Hist du travail en cours
:PDFLDC   OPTION=4
          HELP='F21aide'
          ACTION=CMDLINE
          .Ligne de commande
:PDACCEL.F21
:PDFLDC   OPTION=5
          HELP='MENUBAR/JOBQ'
          ACTION='CMD CHGJOB ??JOBQ()'
          .Changer la jobq du travail
:PDFLDC   OPTION=6
          HELP=F3aide
          ACTION=EXIT
          VARUPD=no
          .Sortir
:PDACCEL.F3
:PDFLDC   OPTION=7
          HELP='MENUBAR/SECJOB'
          ACTION='CMD TFRSECJOB'
          .Session alternée
:PDFLDC   OPTION=90
          HELP=option90
          ACTION='CMD ?SIGNOFF'
          .Fin de session


|
:EPDFLD.
:EMBARC.
:MBARC HELP='MENUBAR/IMPRESSION'
       .Impressions
:PDFLD.
:PDFLDC   OPTION=1
          HELP='MENUBAR/SPOOL'
          ACTION='CMD WRKSPLF'
          .Gérer les états de l'util
:PDFLDC   OPTION=2
          HELP='MENUBAR/IMPRIMANTE'
          ACTION='CMD WRKWTR'
          .Gérer les imprimantes
:PDFLDC   OPTION=3
          HELP='MENUBAR/OUTQ'
          ACTION='CMD CHGJOB ??OUTQ()'
          .Changer l'outq du travail
:PDFLDC   OPTION=4
          HELP='MENUBAR/SPOOLS'
          ACTION='CMD ?DLTSPLF *SELECT'
          .Supprimer tous les états util
:EPDFLD.
:EMBARC.
:MBARC HELP='MENUBAR/MESSAGE'
      .Messages
:PDFLD.
:PDFLDC   OPTION=1
          HELP='MENUBAR/ECRAN'
          ACTION='CMD WRKMSG *WRKSTN'
          .Gérer messages écran
:PDFLDC   OPTION=2
          HELP='MENUBAR/UTILISATEUR'
          ACTION='CMD WRKMSG *USRPRF'
          .Gérer messages utilisateur
:PDFLDC   OPTION=3
          HELP='MENUBAR/QSYSOPR'
          ACTION='CMD WRKMSG QSYSOPR'
          .Gérer messages opérateur
:PDFLDC   OPTION=4
          HELP='MENUBAR/ENVOI'
          ACTION='CMD CALL QEZSNDMG'
          .Envoyer un message
:PDFLDC   OPTION=5
          HELP='MENUBAR/HISTORIQUE'


|
          ACTION='CMD DSPJOBLOG'
          .Hist. du travail en cours
:EPDFLD.
:EMBARC.
:MBARC HELP='MENUBAR/OUTIL'
          .Outils
:PDFLD.
:PDFLDC   OPTION=1
          HELP='MENUBAR/INFOS'
          ACTION='MENU INFO'
          .Infos complémentaires
:PDFLDC   OPTION=2
          HELP='MENUBAR/HEURE'
          ACTION='CMD TIME'
          .Heure
:PDFLDC   OPTION=3
          HELP='MENUBAR/INDEX'
          ACTION='HELPIDX'
          .Index système
:PDFLDC   OPTION=4
          HELP='MENUBAR/HELP2'
          ACTION='HELPHELP'
          .Comment utiliser l'aide
:EPDFLD.
:EMBARC.
:EMBAR.
:KEYL NAME=listecles
      HELP=cleaides.
:KEYI KEY=F1
      HELP=F1aide
      ACTION=HELP.
:KEYI KEY=F3
      HELP=F3aide
      ACTION=EXIT
      VARUPD=no.F3=Exit
:KEYI KEY=F10
      HELP=F10aide
      ACTION=ACTIONS.F10=Action
:KEYI KEY=F12
      HELP=F12aide
      ACTION=CANCEL
      VARUPD=no.F12=Annuler
:KEYI KEY=F21
      HELP=F21aide


|
      ACTION=CMDLINE
      VARUPD=no.F21=Ligne de commande
:KEYI KEY=ENTER
      HELP=ENTERaide
      ACTION=ENTER.
:KEYI KEY=HELP
      HELP=HELPaide
      ACTION=HELP.
:KEYI KEY=PAGEDOWN
      HELP=PDWaide
      ACTION=PAGEDOWN.
:KEYI KEY=PAGEUP
      HELP=PUPaide
      ACTION=PAGEUP.
:EKEYL.
:PANEL NAME=GENERAL
       HELP='GENERAL/aide'
       KEYL=listecles
       MBAR=MBARLNK
       TOPSEP=SPACE
       PANELID=ZMENU
       ENTER='MSG CPD9817 QCPFMSG'.
EXEMPLE DE MENU UIM (AF400).
 
:MENU DEPTH='*'
      SCROLL=YES
      BOTSEP=RULE.
:TOPINST.Choisir une option :
 
.* ------------------------------------------------------------------ *
.*                                                                    *
.* Action éffectué par chaque  OPTION                                 *
.*                                                                    *
.* -------------------------------------------------------------------*
:MENUGRP.AF400.
.* ------------------------------------------------------------------ *
.* Option 1                   $OPT1                                   *
.* -------------------------------------------------------------------*
:MENUI    OPTION=1
          ACTION='CMD SLTAF4'
          HELP='menu/option1'.
Sélection AF400
.* ------------------------------------------------------------------ *
.* Option 2                   $OPT2                                   *


|
.* -------------------------------------------------------------------*
:MENUI    OPTION=2
          ACTION='CMD WRKAF4MBR'
          HELP='menu/option2'.
Gérer cours AF400
.* ------------------------------------------------------------------ *
.* Option 3                   $OPT3                                   *
.* -------------------------------------------------------------------*
:MENUI    OPTION=3
          ACTION='CMD STRAF4'
          HELP='menu/option3'.
Démarrer AF400 (toutes les commandes)
.* ------------------------------------------------------------------ *
.* Option 4                   $OPT4                                   *
.* -------------------------------------------------------------------*
:MENUI    OPTION=4
          ACTION='CMD AF4ADM/WRKAF4'
          HELP='menu/option4'.
Gérer AF400 (paramètrage)
:EMENUGRP.
:MENUGRP.Outils.
.* ------------------------------------------------------------------ *
.* Option 5                   $OPT5                                   *
.* -------------------------------------------------------------------*
:MENUI    OPTION=5
          ACTION='CMD AF4TOOL/APIFMT'
          HELP='menu/option5'.
Liste des formats API.
.* ------------------------------------------------------------------ *
.* Option 6                   $OPT6                                   *
.* -------------------------------------------------------------------*
:MENUI    OPTION=6
          ACTION='CMD AF4TOOL/CHXCMD AF4TOOL/*ALL'
          HELP='menu/option6'.
Liste des outils AF400
.* ------------------------------------------------------------------ *
.* Option 7                   $OPT7                                   *
.* -------------------------------------------------------------------*
:MENUI    OPTION=7
          ACTION='CMD ? DSPHLP'
          HELP='menu/option7'.
Affichage panneau d'aide
.* ------------------------------------------------------------------ *
.* Option 10                  $OPT10                                  *


|
.* -------------------------------------------------------------------*
:MENUI    OPTION=10
          ACTION='CMD AUTREANIM menuuim AF4SRCT/DIVERS'
          HELP='menu/option10'.
Source d'un menu sans barre d'action
.* ------------------------------------------------------------------ *
.* Option 11                  $OPT11                                  *
.* -------------------------------------------------------------------*
:MENUI    OPTION=11
          ACTION='CMD AUTREANIM menuuimb AF4SRCT/DIVERS'
          HELP='menu/option11'.
Source de ce menu
:EMENUGRP.
:MENUGRP.Système.
.* ------------------------------------------------------------------ *
.* Option 80                  $OPT80                                  *
.* -------------------------------------------------------------------*
:MENUI HELP=option80
       OPTION=80
       ACTION='CMD ?DSCJOB'.
Pause temporaire.
.* ------------------------------------------------------------------ *
.* Option 90                  $OPT90                                  *
.* -------------------------------------------------------------------*
:MENUI HELP=option90
       OPTION=90
       ACTION='CMD ?SIGNOFF'.
Fin de session
 
:EMENUGRP.
:EMENU.
 
:OPTLINE.Numéro d'option
:EPANEL.
:HELP NAME='cleaides'.Touche de fonction - aide
:XH3.Touches de fonctions.
:H3.Liste des touches de fonction du MENU.
:DL compact.
:DTHD.Touche
:DDHD.Fonction
:DT.F1
:DD.Aide
:DT.F3
:DD.Exit


|
:DT.F10
:DD.Action
:DT.F12
:DD.Annuler
:DT.F21
:DD.Ligne de commande
:DT.ENTER
:DD.Validation
:DT.HELP
:DD.Aide
:DT.ROLLUP
:DD.page suivante
:DT.ROLLDOWN
:DD.page précédente
:EDL.
:EHELP.
 
:HELP NAME='F1aide'.Touche F1 - aide
:XH3.F1 aide en ligne
:P.
Cette touche vous permet d'obtenir de l'aide identique à HELP
:EHELP.
:HELP NAME='F3aide'.Touche F3 - aide
:PARML.
:PT.:PV.F3=Exit:EPV.
:PD.Cette touche vous permet de quitter le menu et de retourner
à l'écran précédent.
:EPARML.
:EHELP.
 
:HELP NAME='F10aide'.Touche F10 - aide
:PARML.
:PT.:PV.F10=Action:EPV.
:PD.Cette touche vous permet d'accéder au option de la barre d'action
en haut de l'écran vous pouvez vous déplacer par (-->) et (<--)
:EPARML.
:EHELP.
 
:HELP NAME='F12aide'.Touche F12 - aide
:PARML.
:PT.:PV.F12=Annuler:EPV.
:PD.Cette touche vous permet d'annuler la demande effectuée et de
remettre l'écran à son état initial.
:EPARML.


|
:EHELP.
 
:HELP NAME='F21aide'.Touche F21 - aide
:PARML.
:PT.:PV.F21=Ligne de commande:EPV.
:PD.Cette touche vous donne accès a une fenêtre à partir de laquelle
vous pouvez lancer des commande OS/400.
:EPARML.
:EHELP.
 
:HELP NAME='ENTERaide'.Touche ENTER - aide
:PARML.
:PT.:PV.ENTER:EPV.
:PD.Cette touche effectue l'option du menu qui a été sélectionner.
Si aucune option n'a été sélectionné le COPYRIGHT se réaffiche.
:EPARML.
:EHELP.
 
:HELP NAME='HELPaide'.Touche AIDE - aide
:PARML.
:PT.:PV.HELP:EPV.
:PD.Cette touche vous permet d'accéder aux aides associées au MENU.
Ceci s'effectue en fonction de l'endroit ou se situe votre curseur.
:EPARML.
:EHELP.
 
:HELP NAME='PDWaide'.ROLLDOWN - aide
:XH3.ROLLDOWN
:P.
Page précédente
:EHELP.
:HELP NAME='PUPaide'.ROLLUP - aide
:XH3.ROLLUP
:P.
Page suivante
:EHELP.
 
:HELP NAME='GENERAL/aide'.Aide génerale - aide
:XH3.Aide générale.
:P.
Ce menu vous permet propose un certain nombre de commandes ou d'outils
AF400.
:EHELP.
 


|
.* ------------------------------------------------------------------ *
.* Option 1                   $AID1                                   *
.* -------------------------------------------------------------------*
:HELP     NAME='menu/option1'.
Option 1 - Aide
:XH3.Option 1.
:P.
Sélection AF400
:EHELP.
.* ------------------------------------------------------------------ *
.* Option 2                   $AID2                                   *
.* -------------------------------------------------------------------*
:HELP     NAME='menu/option2'.
Option 2 - Aide
:XH3.Option 2.
:P.
Gérér les cours AF400
:EHELP.
.* ------------------------------------------------------------------ *
.* Option 3                   $AID3                                   *
.* -------------------------------------------------------------------*
:HELP     NAME='menu/option3'.
Option 3 - Aide
:XH3.Option 3.
:P.
Démarrer AF400.Donne acces à toutes les commandes du produit.
:EHELP.
.* ------------------------------------------------------------------ *
.* Option 4                   $AID4                                   *
.* -------------------------------------------------------------------*
:HELP     NAME='menu/option4'.
Option 4 - Aide
:XH3.Option 4.
:P.
Paramètrer AF400
:EHELP.
.* ------------------------------------------------------------------ *
.* Option 5                   $AID5                                   *
.* -------------------------------------------------------------------*
:HELP     NAME='menu/option5'.
Option 5 - Aide
:XH3.Option 5.
:P.
Liste formats des structures API


|
:EHELP.
.* ------------------------------------------------------------------ *
.* Option 6                   $AID6                                   *
.* -------------------------------------------------------------------*
:HELP     NAME='menu/option6'.
Option 6 - Aide
:XH3.Option 6.
:P.
Liste les outils AF400
:EHELP.
.* ------------------------------------------------------------------ *
.* Option 7                   $AID7                                   *
.* -------------------------------------------------------------------*
:HELP     NAME='menu/option7'.
Option 7 - Aide
:XH3.Option 7.
:P.
Visualiser un panneau d'aide
:EHELP.
.* ------------------------------------------------------------------ *
.* Option 10                  $AID10                                  *
.* -------------------------------------------------------------------*
:HELP     NAME='menu/option10'.
Option 10 - Aide
:XH3.Option 10.
:P.
Voir le source UIM d'un menu simple (MENUUIM)
:EHELP.
.* ------------------------------------------------------------------ *
.* Option 11                  $AID11                                  *
.* -------------------------------------------------------------------*
:HELP     NAME='menu/option11'.
Option 11 - Aide
:XH3.Option 11.
:P.
Voir le source UIM de ce menu (MENUUIMB)
:EHELP.
.* ------------------------------------------------------------------ *
.* Option 80                  $AID80                                  *
.* -------------------------------------------------------------------*
:HELP NAME='option80'.Option80 - aide
:XH3.Option 80
:P.
Cette option vous permet de libérer temporairement votre écran.


|
:EHELP.
.* ------------------------------------------------------------------ *
.* Option 90                  $AID90                                  *
.* -------------------------------------------------------------------*
:HELP NAME='option90'.Option90 - aide
:XH3.Option 90
:P.
Cette option vous permet de quitter le système et de revenir sur l'
écran d'ouverture.
:EHELP.
.* ------------------------------------------------------------------ *
.* Aides barre d'action                                               *
.* -------------------------------------------------------------------*
:HELP NAME='MENUBAR/TRAVAUX'.Travaux - aide
:XH3.Travaux
:P.
Cette barre d'option vous permet de gérer vos travaux.
:EHELP.
 
:HELP NAME='MENUBAR/TRAVAIL'.Gérer votre travail - aide
:XH3.Gérer votre travail
:P.
Cette option permet de gérer les attributs du travail en cours
:EHELP.
:HELP NAME='MENUBAR/SOUMIS'.Gérer les travaux soumis - aide
:XH3.Gérer les travaux soumis
:P.
Cette option permet de gérer les travaux lancer en batch par votre
profil utilisateur
:EHELP.
:HELP NAME='MENUBAR/HISTORIQUE'.Historique du travail - aide
:XH3.Historique du travail
:P.
Cette option permet d'afficher l'historique du travail en cours, si
vous désirez sauvegarder cet historique sorter par l'option 90
et remplacer *NOLIST Par *LIST.
:EHELP.
:HELP NAME='MENUBAR/JOBQ'.Changer de jobq - aide
:XH3.Changer de jobq
:P.
Cette option permet de changer la jobq du travail en cours les travaux
que vous allez soumettre seront placés dans cette file.
:EHELP.
:HELP NAME='MENUBAR/SECJOB'.Changer de session - aide


|
:XH3.Changer de session
:P.
Cette option permet de changer session ou d'en ouvrir une deuxième,
attention une seule session sera active à la fois
:EHELP.
:HELP NAME='MENUBAR/IMPRESSION'.Impressions- aide
:XH3.Impressions
:P.
Cette barre d'option vous permet de gérer vos impressions
:EHELP.
:HELP NAME='MENUBAR/SPOOL'.Spool - aide
:XH3.Spools
:P.
Cette option vous permet de gérer vos états en attente
d'impressions, si vos états ne servent plus supprimez les.
:EHELP.
:HELP NAME='MENUBAR/IMPRIMANTE'.Imprimante - aide
:XH3.Imprimantes
:P.
Cette option vous permet de gérer l'état des imprimantes du systèmes
:EHELP.
:HELP NAME='MENUBAR/OUTQ'.Outq - aide
:XH3.Outq
:P.
Cette option vous permet de changer l'outq du travail en cours, les
impressions que vous effectuerer seront palcée dans cette file.
:EHELP.
:HELP NAME='MENUBAR/SPOOLS'.Suppression des spools - aide
:XH3.Suppression des Spools
:P.
Cette option vous permet d'éffacer tous les spools de votre profil
utilisateur
:EHELP.
:HELP NAME='MENUBAR/MESSAGE'.Messages - aide
:XH3.Messages
:P.
Cette barre d'options vous permet de gérer vos messages.
:EHELP.
:HELP NAME='MENUBAR/ECRAN'.Messages écran - aide
:XH3.Messages écran
:P.
Cette option vous permet de gérer vos messages écran.
:EHELP.
:HELP NAME='MENUBAR/UTILISATEUR'.Messages utilisateur - aide


|
:XH3.Messages utilisateur s
:P.
Cette option vous permet de gérer vos messages utilisateur.
:EHELP.
:HELP NAME='MENUBAR/QSYSOPR'.Messages opérateur - aide
:XH3.Messages opérateur
:P.
Cette option vous permet de gérer les messages opérateur.
:EHELP.
:HELP NAME='MENUBAR/ENVOI'.Envoi d'un message - aide
:XH3.Envoi d'un message
:P.
Cette option vous permet d'envoyer un message.
:EHELP.
:HELP NAME='MENUBAR/OUTIL'.Outils - aide
:XH3.Outils
:P.
Cette barre d'options vous permet d'accèder à des outils.
:EHELP.
:HELP NAME='MENUBAR/INFOS'.Infos - aide
:XH3.Informations complémentaires.
:P.
Cette option vous permet d'accèder au menu INFO.
:EHELP.
:HELP NAME='MENUBAR/HEURE'.Heure - aide
:XH3.Heure.
:P.
Cette option vous donne date et heure ligne 24.
:EHELP.
:HELP NAME='MENUBAR/INDEX'.Index - aide
:XH3.Index de recherche.
:P.
Cette option vous affiche l'index d'aide système (Infoseeker)
:EHELP.
:HELP NAME='MENUBAR/HELP2'.Aide - aide
:XH3.Aide de l'aide.
:P.
Cette option vous indique comment utiliser l'aide.
:EHELP.
:EPNLGRP.






Travaux


Impressions


Etc...




©AF400