CMD        PROMPT('Devenir SuperUtilisateur')
             PARM       KWD(USER) TYPE(*NAME) DFT(QSECOFR) +
                          PROMPT('Profil Utilisateur')