Clist EJCK does not work if EDCPRINT data set is not cataloged

Products

• JCLCheck Workload Automation

Issue/Introduction

Added the following codes to clist EJCK:

FREE FI(EDCPRINT EDCHKDD) ATTR(EDCPR)                              
ATTR EDCPR BLKSIZE (13300) RECFM(F B) LRECL(133)                   
ERROR -                                                             
DO                                                                 
  IF &LASTCC = 12 THEN -                                           
   DO                                                              
    ALLOC FI(EDCPRINT) DA('&SYSUID..EDCHEK.SYSPRINT') NEW CATALOG +
    USING(EDCPR)                                                   
    RETURN                                                         
   END                                                             
  RETURN                                                           
END                                                                
ALLOC FI(EDCPRINT) DA('&SYSUID..EDCHEK.SYSPRINT') SHR REUSE        
ERROR OFF    

These codes are found in JCLCheck library CAZ2CLS0(CAZ1SEDC).   When the EDCPRINT data set is not cataloged, the EJCK clist does not work.

 

Environment

Release : 12.0

Component : CA JCLCheck Workload Automation

Resolution

Add option NOFLUSH to the CONTROL statement of EJCK.  This allows for EDCPRINT data set to get created and allocated if it does not exist.