Probleme beim Command erstellen.

[mk]

Hallo,
so klappt es

CMD PROMPT('AUFLISTEN IFS DIRECTORY')                                 
                                                                      
             PARM       KWD(DIR) TYPE(*CHAR) LEN(256) MIN(1) MAX(1) + 
                          PROMPT('DIRECTORY NAME')                    
                                                                      
             PARM       KWD(OUTPUT) TYPE(*CHAR) LEN(8) RSTD(*YES) +   
                          DFT(*) SPCVAL((* *) (*PRINT) (*OUTFILE)) +  
                          PROMPT('AUSGABE')                           
                                                                      
             PARM       KWD(OUTFILE) TYPE(QUAL1) PMTCTL(CHECK) +      
                          PROMPT('AUSGABEDATEI')                      
 QUAL1:      QUAL       TYPE(*NAME) LEN(10) DFT(' ')                  
             QUAL       TYPE(*NAME) LEN(10) DFT(*LIBL) +              
                          SPCVAL((*LIBL)) PROMPT('BIBLIOTHEK')        
                                                                      
CHECK: PMTCTL CTL(OUTPUT) COND((*EQ '*OUTFILE')) 

Gruß
Michael