Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
To define multiple GDG's

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

New User


Joined: 02 Mar 2006
Posts: 2

PostPosted: Mon May 15, 2006 11:13 am    Post subject: To define multiple GDG's
Reply with quote

I need to define the multiple GDG's using IDCAMS
can anyone help me.
Back to top
View user's profile Send private message

Rupesh.Kothari

Member of the Month


Joined: 27 Apr 2005
Posts: 464

PostPosted: Mon May 15, 2006 11:39 am    Post subject: Re: To define multiple GDG's
Reply with quote

Hi,

You can define GDG base using IDCAMS utility. U can define each GDG in a single STEP.

If you are looking for Sample JCL. Please Search the forum.

Hope this helps

Regards
Rupesh
Back to top
View user's profile Send private message
creddy

New User


Joined: 02 Mar 2006
Posts: 2

PostPosted: Mon May 15, 2006 12:13 pm    Post subject: i checked in forum but not found rupesh
Reply with quote

Rupesh can u send the code ..

Thanks,
chandra
Back to top
View user's profile Send private message
parikshit123

Active User


Joined: 01 Jul 2005
Posts: 269
Location: India

PostPosted: Mon May 15, 2006 12:36 pm    Post subject:
Reply with quote

Hi creddy,

Here is code you need. Add steps for each gdg you need.

Code:
 000050 //TTYAGDG JOB 1,CLASS=I,MSGCLASS=0,USER=&SYSUID,NOTIFY=&SYSUID         
 000060 //STEP1 EXEC PGM=IDCAMS                                                 
 000070 //SYSPRINT DD SYSOUT=*                                                 
 000080 //SYSIN DD *                                                           
 000090                DEFINE GDG (                                          - 
 000100                       NAME(TTBB.TEST2.TEST3.TEST.GDG1)               -
 000200                       LIMIT(30)                                      - 
 000300                       NOEMPTY                                        - 
 000400                       SCRATCH )                                         
 000500 /*                                                                     
 000060 //STEP2 EXEC PGM=IDCAMS                                                 
 000070 //SYSPRINT DD SYSOUT=*                                                 
 000080 //SYSIN DD *                                                           
 000090                DEFINE GDG (                                          - 
 000100                       NAME(TTBB.TEST2.TEST3.TEST.GDG2)               -
 000200                       LIMIT(30)                                      - 
 000300                       NOEMPTY                                        - 
 000400                       SCRATCH )                                         
 000500 /*                                                                     
 000510                                                                       
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 Sum the fields in particular format f... sharana64 DFSORT/ICETOOL 9 Fri Jan 05, 2018 1:11 am
No new posts Merging 2 records at multiple rows wi... Bijesh DFSORT/ICETOOL 2 Wed Dec 06, 2017 1:50 am
No new posts Formatting multiple records to a sing... Vignesh Sid SYNCSORT 3 Tue Nov 07, 2017 12:22 pm
No new posts Updating multiple counts in trailer!! Vignesh Sid SYNCSORT 4 Mon Nov 06, 2017 1:04 pm
No new posts Selecting a row from multiple tables! Vignesh Sid DB2 2 Thu Oct 26, 2017 6:09 pm

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us