Portal | IBM Manuals | Downloads | Products | Refer | Info | Programs | JCLs | Forum Rules*| Site Map | Mainframe CD 
IBMMAINFRAMES.com - IBM Mainframe Support Forums Index
 
Register
 
IBMMAINFRAMES.com - IBM Mainframe Support Forums Index FAQ Search Memberlist Usergroups Profile Log in to check your private messages Log in
 
copy one GDG into another one with increased length

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> DFSORT/ICETOOL
Author Message
diwansk

New User


Joined: 01 May 2005
Posts: 7
Location: Bangalore
PostPosted: Mon May 09, 2005 8:11 pm    Post subject: copy one GDG into another one with increased length
 Reply with quote
Can you please suggest me the best way/utility to copy one GDG to another GDG with increased file length using a JCL. Source file is of length 11 FB, Destination file is of length 80, FB
Back to top
View user's profile Send private message
References
superk

Moderator Team Head


Joined: 26 Apr 2004
Posts: 3265
Location: Charlotte,NC USA
PostPosted: Mon May 09, 2005 8:45 pm    Post subject: Re: copy one GDG into another one with increased length
 Reply with quote
Here's an easy solution:
Code:

//STEPXXXX EXEC PGM=SORT
//SORTIN   DD DISP=SHR,DSN=input.gdg
//SORTOUT  DD DISP=SHR,DSN=output.gdg
//SYSOUT   DD SYSOUT=*
//SYSIN    DD *
  OPTION COPY
  OUTREC FIELDS=(1,11,80:X)
/*
//*
Back to top
View user's profile Send private message
Display posts from previous:   
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> DFSORT/ICETOOL All times are GMT + 6 Hours
Page 1 of 1