CMD        PROMPT('Vérification fichier stream')
 
             PARM       KWD(OBJECT) TYPE(*PNAME) LEN(256) MIN(1) +
                          EXPR(*YES) PROMPT('fichier stream')