Missing error message when a job has multiple references to a GDG data set with no Base

Products

• JCLCheck Workload Automation

Issue/Introduction

Sample JCL:

//STEP01  EXEC PGM=IEBGENER                                  
//SYSUT1   DD DISP=SHR,DSN=HLQ.LIB(DATA)                     
//SYSUT2   DD DSN=HLQ.TEST.GDG(+1),           << GDG base does not exist;  Error CAY6186E* is issued                        
//         SPACE=(TRK,(1,1),RLSE),                        
//         UNIT=SYSDA,DCB=(RECFM=F,DSORG=PS,LRECL=80),    
//         DISP=(NEW,CATLG)                               
//SYSPRINT DD SYSOUT=*                                       
//SYSIN    DD DUMMY                                          
//*                                                          
//STEP02  EXEC PGM=IEBGENER                                  
//SYSUT2   DD SYSOUT=*                                       
//SYSUT1   DD DSN=HLQ.TEST.GDG(0),DISP=SHR   <<  Errors CAY6186E and CAY6079E* are issued                 
//SYSPRINT DD SYSOUT=*                                       
//SYSIN    DD DUMMY                                          
//*                                                          
//STEP03  EXEC PGM=IEBGENER                                  
//SYSUT2   DD SYSOUT=*                                       
//SYSUT1   DD DSN=HLQ.TEST.GDG(0),DISP=SHR  << No error                   
//SYSPRINT DD SYSOUT=*                                       
//SYSIN    DD DUMMY                                          

 

* CAY6186E GDG INDEX NOT BUILT

* CAY6079E DATA SET "name" SPECIFIED AS OLD OR SHR, BUT CANNOT BE FOUND                                       

Environment

Release : 12.0

Component : CA JCLCheck workload Automation

Resolution

Use JCLCheck runtime option DSNERR.   This option allows error message to produce on each instant of dataset not found.  Without this option, only the first instance of a data set not found will be flagged.

With runtime option DSNERR:

//STEP01  EXEC PGM=IEBGENER                                  
//SYSUT1   DD DISP=SHR,DSN=HLQ.LIB(DATA)                     
//SYSUT2   DD DSN=HLQ.TEST.GDG(+1),           << GDG base does not exist;  Error CAY6186E is issued                       
//        SPACE=(TRK,(1,1),RLSE),                      
//        UNIT=SYSDA,DCB=(RECFM=F,DSORG=PS,LRECL=80),  
//        DISP=(NEW,CATLG)                              
//SYSPRINT DD SYSOUT=*                                       
//SYSIN    DD DUMMY                                          
//*                                                          
//STEP02  EXEC PGM=IEBGENER                                  
//SYSUT2   DD SYSOUT=*                                       
//SYSUT1   DD DSN=HLQ.TEST.GDG(0),DISP=SHR   <<  Errors CAY6186E and CAY6079E are issued                 
//SYSPRINT DD SYSOUT=*                                       
//SYSIN    DD DUMMY                                          
//*                                                          
//STEP03  EXEC PGM=IEBGENER                                  
//SYSUT2   DD SYSOUT=*                                       
//SYSUT1   DD DSN=HLQ.TEST.GDG(0),DISP=SHR  <<   Error CAY6079E is issued                   
//SYSPRINT DD SYSOUT=*                                       
//SYSIN    DD DUMMY    

Additional Information

Definition of option DSNERR:

DSNERR