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
 

 

How to convert GDG of length 103 to 150

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

New User


Joined: 08 May 2007
Posts: 26
Location: hyderabad

PostPosted: Fri Jun 01, 2007 3:51 pm    Post subject: How to convert GDG of length 103 to 150
Reply with quote

How to convert GDG of length 103 to 150 (LRECL) with the increased bytes filled with default values icon_question.gif

Is there any process of direct convertion (i.e. change of LRECL for the GDG) ?
Back to top
View user's profile Send private message

murmohk1

Senior Member


Joined: 29 Jun 2006
Posts: 1439
Location: Bangalore,India

PostPosted: Fri Jun 01, 2007 4:22 pm    Post subject:
Reply with quote

Laxminarsimharao,

Quote:
Is there any process of direct convertion (i.e. change of LRECL for the GDG) ?


Do you want to increase the record lenght of existing generations or the generations you would create in future(if at all)?
Back to top
View user's profile Send private message
Laxminarsimharao

New User


Joined: 08 May 2007
Posts: 26
Location: hyderabad

PostPosted: Fri Jun 01, 2007 4:28 pm    Post subject:
Reply with quote

murmohk1,

Yes, I wanted to change it for existing generation
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 Jun 01, 2007 5:47 pm    Post subject: Re: How to convert GDG of length 103 to 150
Reply with quote

Your best bet is to use DFSORT to copy the data to the new required length, and update the version so that the position of the generation in the GDG doesn't change:

Code:

//STEPX    EXEC PGM=ICEMAN
//SORTIN   DD   DISP=SHR,DSN=THE.EXISTING.GDG.GxxxxV00
//SORTOUT  DD   DSN=THE.EXISTING.GDG.GxxxxV01,
//         DISP=(,CATLG,DELETE),UNIT=SYSDA,SPACE=.....
//SYSOUT   DD   SYSOUT=*
//SYSIN    DD   *
  OPTION COPY
  OUTREC FIELDS=(1:1,103,150:X)
/*


where xxxx is the existing generation number (0001-9999).
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 Jun 01, 2007 6:24 pm    Post subject:
Reply with quote

Superk has given the best solution, however, call me old fashioned, but I would take a backup of the generations before starting - just in case.
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 How to convert the VBM file to VB or... Sulabh Agrawal JCL & VSAM 4 Fri Nov 18, 2016 1:04 pm
No new posts Convert +9999999999999.99 to S9(12)V9(3) vnktrrd DFSORT/ICETOOL 8 Thu Nov 17, 2016 8:15 pm
This topic is locked: you cannot edit posts or make replies. Db2 SQL query to convert rows into co... subratarec DB2 5 Thu Nov 17, 2016 4:51 pm
No new posts SQZ pipe delimited file with 1 column... Rick Silvers DFSORT/ICETOOL 2 Sun Nov 06, 2016 8:11 pm
No new posts convert PD to ZD ram_vizag DFSORT/ICETOOL 5 Sat Nov 05, 2016 3:06 am


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