CMD        PROMPT('Exécution ordre SQL')
             PARM       KWD(ORDRE) TYPE(*CHAR) LEN(1024) MIN(1) +
                          FILE(*UNSPFD) EXPR(*YES) CHOICE('UPDATE, +
                          DELETE, CREATE, DROP..') CHOICEPGM(*NONE) +
                          PROMPT('Ordre SQL (APPUYEZ SUR AIDE)')
             PARM       KWD(LEN) TYPE(*DEC) LEN(15 5) CONSTANT(1024)