Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

GDG created and referred in same Proc

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM
View previous topic :: :: View next topic  
Author Message
selvaraja

New User


Joined: 04 Apr 2008
Posts: 17
Location: Maryland

PostPosted: Fri Jul 10, 2009 12:39 am    Post subject: GDG created and referred in same Proc
Reply with quote

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:
Code:

//CCMTB61S PROC MI09='X', 
//             GDG='(+1)'                                         
//STEP01 EXEC PGM=ARU000,                                       
//             COND=(99,NE)                                       
//CARDS    DD DSN=SOURCE.CARD.FILE,                 
//             DISP=(SHR,KEEP,KEEP)                               
//ATCC      DD DSN=MYGDG.FILE&MI09&GDG,
//             DISP=(NEW,CATLG,DELETE),   
//             DATACLAS=&SP10,           
//             DCB=(RECFM=FB,LRECL=86)   
//STEP02 EXEC PGM=TEST,                             
//             COND=(00,NE)                             
//INFILE      DD DSN=MYINFILE.FILE&MI09, 
//               DISP=(SHR,KEEP,KEEP) 
//ATCC      DD DSN=MYGDG.FILE&MI09&GDG,     
//             DISP=(SHR,KEEP,KEEP)     


JCL:
Code:

// JCLLIB ORDER=(MYDATA.PROCLIB)   
//JOBLIB  DD DSN=MYDATA.LOD,DISP=SHR                   
//JSYT0010 EXEC CCMTB61S,                                         
//         MI09='0'                                               
//JSYT0011 EXEC CCMTB61S,                                         
//         MI09='1'
Back to top
View user's profile Send private message

Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 8055
Location: East Dubuque, Illinois, USA

PostPosted: Fri Jul 10, 2009 12:43 am    Post subject:
Reply with quote

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?
Back to top
View user's profile Send private message
superk

Moderator Team Head


Joined: 26 Apr 2004
Posts: 4648
Location: Raleigh, NC, USA

PostPosted: Fri Jul 10, 2009 12:45 am    Post subject: Re: GDG created and referred in same Proc
Reply with quote

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


The first time you use the PROC (in the same job) with +1, the second time with +2, the third with +3, and so on, right?
Back to top
View user's profile Send private message
selvaraja

New User


Joined: 04 Apr 2008
Posts: 17
Location: Maryland

PostPosted: Fri Jul 10, 2009 1:02 am    Post subject: Reply to: GDG created and referred in same Proc
Reply with quote

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.
Back to top
View user's profile Send private message
selvaraja

New User


Joined: 04 Apr 2008
Posts: 17
Location: Maryland

PostPosted: Fri Jul 10, 2009 1:47 am    Post subject: Reply to: GDG created and referred in same Proc
Reply with quote

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.
Back to top
View user's profile Send private message
dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Fri Jul 10, 2009 2:44 am    Post subject: Reply to: GDG created and referred in same Proc
Reply with quote

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

d
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Jcl pram vs proc parms ashek15 JCL & VSAM 3 Thu Mar 30, 2017 6:50 pm
No new posts New PROC not reflecting in prod even ... Musab Ahmed CA Products 9 Tue Mar 15, 2016 12:45 pm
No new posts PROC to JCL mapping jena_samirkumar JCL & VSAM 13 Tue Dec 08, 2015 12:37 pm
No new posts Include a member getting created with... anjali.bisht JCL & VSAM 5 Tue Oct 13, 2015 11:19 am
No new posts JCL/job to PROC -- Symbolic to be use... Elixir JCL & VSAM 2 Thu Aug 20, 2015 2:56 am


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us