GDG created and referred in same Proc

selvaraja · New User Joined: 04 Apr 2008 Posts: 17 Location: Maryland

Hi,

I have PROC where i am creating new generation of GDG in step01 and using the same file in step02 by refereing (+1) in both places.

when i am using this PROC once in job, it runs with out error. but when i use twice it give JCL error.

Proc:

Robert Sample · Posted: Fri Jul 10, 2009 12:43 am

What JCL error do you get? Your JCL refers to MYINFILE.FILE0 and MYINFILE.FILE1 as well as MYGDG.FILE0(+1) and MYGDGFILE1(+1) -- you do have them defined correctly?

superk · Posted: Fri Jul 10, 2009 12:45 am

selvaraja · New User Joined: 04 Apr 2008 Posts: 17 Location: Maryland

Robert,

Error message:
ENDED AT CBN3NODE - JCL ERROR CN(INTERNAL)

yes i have defined the files correctly by MYGDG.FILE0(+1) and MYGDGFILE1(+1)

if i run the jobs twice like below it run without error

code:

Job1:

// JCLLIB ORDER=(MYDATA.PROCLIB)
//JOBLIB DD DSN=MYDATA.LOD,DISP=SHR
//JSYT0011 EXEC CCMTB61S,
// MI09='1'

Job2:
// JCLLIB ORDER=(MYDATA.PROCLIB)
//JOBLIB DD DSN=MYDATA.LOD,DISP=SHR
//JSYT0010 EXEC CCMTB61S,
// MI09='0'

superk,
No, i have different GDG files for each Proc call. so it has to be +1 for each time.

selvaraja · New User Joined: 04 Apr 2008 Posts: 17 Location: Maryland

Sorry every one, i have found the issue. it nothing to do with PROC. i have given (99,NE) by typo in STEP01.

//STEP01 EXEC PGM=ARU000,
// COND=(99,NE)

it cause this issue.

dick scherrer · Posted: Fri Jul 10, 2009 2:44 am

Good to hear it is fixed - thanks for letting us know

d