getting a rc 16

jcl below:
PKSC9.TSS.JCL(MDLSEC1)
//REPORT   EXEC PGM=ICETOOL                                           
//RACFDATA DD DISP=SHR,DSN=IFXZDL.RACF.UNLOAD                         
//TEMP0001 DD DISP=(NEW,DELETE,DELETE),SPACE=(0,(200,100))            
//TOOLMSG  DD SYSOUT=*                                                
//PRINT    DD SYSOUT=*                                                
//DFSMSG   DD SYSOUT=*                                                
//SYSPRINT DD SYSOUT=*                                                
//SYSMSG   DD SYSOUT=*                                                
//SYSOUT   DD SYSOUT=*                                                
//SYSIN    DD *                                                       
/*                                                                    
//*------------------------------------------------------------------ 
//TOOLIN   DD *                                                       
 COPY    FROM(RACFDATA) TO(TEMP0001) USING(RACF)                      
 DISPLAY FROM(TEMP0001) LIST(PRINT) -                                 
         PAGE -                                                       
         TITLE('IS THIS A GROUP DATA SET') -                          
         DATE(MDY/) -                                                 
         TIME(24:)  -                                                 
         BLANK      -                                                 
         ON(10,43,CH)   HEADER('DATA SET NAME') -                     
         ON(78,8,CH)  HEADER('NAME')     -                            
         ON(133,8,CH)  HEADER('UACC LVL') -                           
         ON(192,48,CH)  HEADER('INSTALL DATA')                        
/*                                                                    
//*------------------------------------------------------------------ 
//RACFCNTL DD *                                                       
 SORT FIELDS=(10,8,CH,A)                                              
 INCLUDE COND=(5,4,CH,EQ,C'0400',AND,62,3,CH,EQ,C'YES')               
OPTION VLSHRT                                                         
/*                                                                    

I just can't see the error off hand.  

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Reply via email to