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
 

 

Creation of GDG using rexx

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CLIST & REXX
View previous topic :: :: View next topic  
Author Message
shchan

New User


Joined: 06 Jun 2007
Posts: 58
Location: Hyderabad

PostPosted: Thu Aug 09, 2007 6:59 pm    Post subject: Creation of GDG using rexx
Reply with quote

Hi,
Can anyone tell me how to create a GDG using rexx and how to find if a particular GDG or a ps or PDS already exists using rexx?
Back to top
View user's profile Send private message

expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8593
Location: Back in jolly old England

PostPosted: Thu Aug 09, 2007 7:20 pm    Post subject:
Reply with quote

GDG creation - why not just code the GDG(+1) in the JCL and access it via the DDname.

To see if a dataset exist, either DSINFO or LISTDSI should work.
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 Aug 10, 2007 12:10 am    Post subject:
Reply with quote

Hello,

By this
Quote:
Can anyone tell me how to create a GDG using rexx
are you asking how to create a new generation or are you asking how to define a new gdg base?

The "create" of a new generation is answered above.

To define a new base, invoke IDCAMS from within your rexx code.
Back to top
View user's profile Send private message
shchan

New User


Joined: 06 Jun 2007
Posts: 58
Location: Hyderabad

PostPosted: Fri Aug 10, 2007 2:24 pm    Post subject:
Reply with quote

Hi
Apart from invoking IDCAMS from rexx do we have any other method?
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8593
Location: Back in jolly old England

PostPosted: Fri Aug 10, 2007 2:25 pm    Post subject:
Reply with quote

Or do you mean using REXX code to define a +1 generation ?
Back to top
View user's profile Send private message
shchan

New User


Joined: 06 Jun 2007
Posts: 58
Location: Hyderabad

PostPosted: Fri Aug 10, 2007 4:35 pm    Post subject:
Reply with quote

Thanx expat,
I do not mean defining a +1 generation but to create the base version.
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 Aug 10, 2007 5:23 pm    Post subject: Re: Creation of GDG using rexx
Reply with quote

Then yes, you have to use IDCAMS through the proper TSO command:

Code:

/* REXX */
ADDRESS TSO
"DEF GDG (NAME(GDG01) EMP NSCR LIM(255))"
Exit 0


or, as already mentioned, by invoking IDCAMS:

Code:

/* REXX */
ADDRESS TSO
"ALLOC DD(SYSPRINT) DA(*) REU"
"ALLOC DD(SYSIN) NEW REU RECFM(F B) LRECL(80)"
Queue "  DEF GDG (NAME(GDG01) EMP NSCR LIM(255))"
"EXECIO "Queued()" DISKW SYSIN (FINIS"
"CALL *(IDCAMS)"
Exit 0
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 -> CLIST & REXX All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
This topic is locked: you cannot edit posts or make replies. Calling REXX code from ISPF panel sanchita dey TSO/ISPF 4 Mon Jan 02, 2017 5:13 pm
No new posts REXX DB2: Dynamic allocation of DB2.D... BHAS CLIST & REXX 3 Mon Dec 19, 2016 8:26 pm
No new posts find particular member name in PDS us... ravi243 CLIST & REXX 10 Mon Dec 19, 2016 6:44 pm
No new posts What is the command to check MODE of ... rohanthengal CLIST & REXX 7 Fri Nov 18, 2016 1:48 pm
This topic is locked: you cannot edit posts or make replies. Rexx to create GDG by scanning JJ result krish.deepu CLIST & REXX 5 Tue Oct 25, 2016 5:32 pm


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