
|
CMD PROMPT('liste de fichier')
PARM KWD(FICHIER) TYPE(ETIQ) MIN(1) +
PROMPT('fichier a lister')
 
ETIQ: QUAL TYPE(*NAME) RSTD(*NO) MIN(1)
QUAL TYPE(*CHAR) LEN(10) RSTD(*NO) DFT(*LIBL) +
MIN(0) PROMPT('bibliotheque')
PARM KWD(MEMBRE) TYPE(*CHAR) LEN(10) +
DFT(*PREMIER) SPCVAL((*PREMIER *FIRST)) +
MAX(3) PROMPT('membre a lister')
PARM KWD(FORMAT) TYPE(*CHAR) LEN(10) RSTD(*YES) +
DFT(*CARACT) SPCVAL((*CARACT *CHAR) (*HEXA +
*HEX)) PROMPT('format impres(*char *hexa)')
|