JCL error and IEF645I message running AL2DV10

Products

• CA 7 Workload Automation

Issue/Introduction

The job AL2DV10 to validate the database conversion ends with a JCL error and the IEF645I message in the step JS060:

 

62 //JS060     EXEC PGM=CAL2#CMP
63 //STEPLIB  DD DISP=SHR,
   //            DSN=YOUR.CA7V121.CAL2LOAD
64 //         DD DISP=SHR,
   //            DSN=YOUR.DATACOM.USER.CUSLIB
65 //         DD DISP=SHR,
   //            DSN=YOUR.DATACOM.CAAXLOAD
66 //CA7ORIG  DD DISP=SHR,
   //            DSN=*.JS040.SORT.SORTOUT
67 //CA7RVRT  DD DISP=SHR,
   //            DSN=*.JS050.SORT.SORTOUT
68 //RPT      DD SYSOUT=*
  STMT NO. MESSAGE
        30 IEFC001I PROCEDURE SORT WAS EXPANDED USING SYSTEM LIBRARY YOUR.PROCLIB
        46 IEFC001I PROCEDURE SORT WAS EXPANDED USING SYSTEM LIBRARY YOUR.PROCLIB
        66 IEF645I INVALID REFERBACK IN THE DSNAME FIELD
        67 IEF645I INVALID REFERBACK IN THE DSNAME FIELD

 

Environment

Release : 12.1

Component : CA-7

Cause

The referback format is as follows:

 

*.stepname.procstepname.ddname 

 

This asks the system to copy the data set name from a DD statement in a cataloged or in-stream procedure.

Stepname is the name of the job step that calls the procedure, procstepname is the name of the procedure step that contains the DD statement, and ddname is the name of the DD statement

 

The steps JS040 and JS050 calls the SORT procedure with a step named ICEPROC:

30 //JS040    EXEC SORT
31 XXICEPROC  EXEC  PGM=ICEMAN
32 XXSYSOUT   DD  SYSOUT=*
33 XXSYSPRINT DD  DUMMY
34 XXSYSLMOD  DD  DSNAME=&&GOSET,
   XX             UNIT=SYSALLDA,
   XX             SPACE=(3600,(20,20,1))
35 XXSYSLIN   DD  DSNAME=&&LOADSET,
   XX             UNIT=SYSALLDA,SPACE=(80,(10,10))
36 XXSYSUT1   DD  DSNAME=&&SYSUT1,
   XX             SPACE=(1024,(60,20)),
   XX             UNIT=SYSALLDA
37 //SORTIN   DD DISP=SHR,
   //            DSN=*.JS020.OUTPUT
38 //SORTOUT  DD DISP=(,CATLG),
   //            DSN=YOUR.CA7.VALIDATE.SORT1,
   //            DCB=(LRECL=32000,BLKSIZE=32004,RECFM=VB),
   //            UNIT=VTAPE

so the DSN referback of step JS060 should contain ICEPROC instead of SORT in the DSN.

Resolution

Update the step JS060 and code the DSN as follows:

 

//CA7ORIG  DD DISP=SHR,
//            DSN=*.JS040.ICEPROC.SORTOUT
//CA7RVRT  DD DISP=SHR,
//            DSN=*.JS050.ICEPROC.SORTOUT

Additional Information

For more information about the format of a backward reference, see  MVS JCL Reference (Page 171)