Créer un objet ILE

BoTTom |
             CMD        PROMPT('Créer un objet ILE')
             PARM       KWD(OBJ) TYPE(Q1) MIN(1) PROMPT('Nom d''objet')
 Q1:         QUAL       TYPE(*NAME) MIN(1)
             QUAL       TYPE(*NAME) DFT(*LIBL) SPCVAL((*LIBL)) +
                          PROMPT('Bibliothèque')
             PARM       KWD(OBJTYPE) TYPE(*CHAR) LEN(7) RSTD(*YES) +
                          VALUES(*PGM *SRVPGM) MIN(1) PROMPT('Type +
                          d''objet')
             PARM       KWD(SRCFILE) TYPE(Q2) MIN(1) PROMPT('Fichier +
                          source')
 Q2:         QUAL       TYPE(*NAME) MIN(1)
             QUAL       TYPE(*NAME) DFT(*LIBL) SPCVAL((*LIBL)) +
                          PROMPT('Bibliothèque')
             PARM       KWD(SRCMBR) TYPE(*NAME) MIN(1) +
                          PROMPT('membre source')
             PARM       KWD(BNDDIR) TYPE(*NAME) MIN(1) +
                          PROMPT('Répertoire de liage')




©AF400