CMD        PROMPT('Affichage membre fichier BD')
             PARM       KWD(FICHIER) TYPE(Q1) MIN(1) PROMPT('Fichier +
                          BD')
             PARM       KWD(MEMBRE) TYPE(*NAME) DFT(*FIRST) +
                          SPCVAL((*FIRST)) CHOICE('Membre du +
                          fichier') PROMPT('Nom du membre')
             PARM       KWD(CLE) TYPE(*NAME) LEN(10) +
                          DFT(*NONE) SPCVAL(*NONE *FILE) +
                          PROMPT('Notion de clé')
             PARM       KWD(SELECT) TYPE(*CHAR) LEN(512) DFT(*ALL) +
                          PROMPT('Séléction via OPNQRYF')
 Q1:         QUAL       TYPE(*NAME) MIN(1) CHOICE('Fichier')
             QUAL       TYPE(*NAME) DFT(*LIBL) SPCVAL((*LIBL)) +
                          PROMPT('Bibliotheque')