CMD        PROMPT('Copie fichier DB vers STMF')
             PARM       KWD(FICHIER) TYPE(Q1) MIN(1)
 Q1:          QUAL       TYPE(*NAME) MIN(1)
              QUAL       TYPE(*NAME) DFT(*LIBL) SPCVAL((*LIBL) +
                           (*CURLIB)) MIN(0) PROMPT('Bibliothèque')
             PARM       KWD(STMF) TYPE(*CHAR) LEN(256) MIN(1) +
                          PROMPT('Fichier IFS')