cmde simple

BoTTom |
             CMD        PROMPT('listage de fichier')
             PARM       KWD(FICHIER) TYPE(*NAME) MIN(1) +
                          PROMPT('fichier a lister')
             PARM       KWD(MEMBRE) TYPE(*CHAR) LEN(10) DFT(*FIRST) +
                          SPCVAL((*PREMIER *FIRST)) PROMPT('membre +
                          a lister')
             PARM       KWD(FORMAT) TYPE(*CHAR) LEN(10) RSTD(*YES) +
                          DFT(*CARACT) VALUES(*CARACT *HEXA) +
                          SPCVAL((*CARACT *CHAR) (*HEXA *HEX)) +
                          PROMPT('format impres(*charact *hexa)')




©AF400