CMD        PROMPT('Ajout une entrée à *VLDL')
             PARM       KWD(VLDL) TYPE(Q1) MIN(1) PROMPT('Liste de +
                          validation')
             PARM       KWD(ENTRY) TYPE(*CHAR) LEN(20) MIN(1) +
                          PROMPT('Entrée')
             PARM       KWD(VALUE) TYPE(*CHAR) LEN(20) MIN(1) +
                          PROMPT('Valeur')
             PARM       KWD(INFOS) TYPE(*CHAR) LEN(50) DFT(*BLANK) +
                          SPCVAL((*BLANK ' ')) PROMPT('Infos +
                          complémentaires')
 
 Q1:         QUAL       TYPE(*NAME) MIN(1)
             QUAL       TYPE(*NAME) DFT(*LIBL) SPCVAL((*LIBL) +
                          (*CURLIB)) PROMPT('Bibliothèque')