ALERT: Some images may not load properly within the Knowledge Base Article. If you see a broken image, please right-click and select 'Open image in a new tab'. We apologize for this inconvenience.

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

book

Article ID: 213833

calendar_today

Updated On:

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.