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
 

 

Copy a VB file to FB.

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

Active User


Joined: 28 Aug 2008
Posts: 205
Location: Hyderabad

PostPosted: Mon Feb 16, 2009 3:54 pm    Post subject: Copy a VB file to FB.
Reply with quote

Hi all,

I want to copy a VB file with LRECL=24 into a FB file LRECL=80. i tried with IDCAMS,IEBGENR,SORT but it failed. Is there any other utility or jcl to copy a VB file into FB file.

thanks,
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: Mon Feb 16, 2009 4:01 pm    Post subject:
Reply with quote

SORT usually works exceptionally well for this.

Please post your code and error messages from the SORT step.
Back to top
View user's profile Send private message
arvind.m

Active User


Joined: 28 Aug 2008
Posts: 205
Location: Hyderabad

PostPosted: Mon Feb 16, 2009 6:19 pm    Post subject:
Reply with quote

i just used SORT FIELDS=COPY with input beign the VB file and the output file i have defined as FB and LRECL=80

Code:

//SYSIN    DD  *       
   SORT FIELDS=COPY     
/*                     


let me know if i need to include any.
thanks,
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: Mon Feb 16, 2009 6:25 pm    Post subject:
Reply with quote

That's a start, but you need to specify that that you are converting from one RECFM to another.

Try this simple little code (DFSORT) but should work for either DFSORT or SYNCSORT - I think.
Code:

  SORT FIELDS=COPY           
  OUTFIL FNAMES=SORTOUT,VTOF,
  OUTREC=(5,24,80:X)       
Back to top
View user's profile Send private message
CICS Guy

Senior Member


Joined: 18 Jul 2007
Posts: 2150
Location: At my coffee table

PostPosted: Mon Feb 16, 2009 6:29 pm    Post subject:
Reply with quote

Have you looked at the manual?
Look at VTOF or CONVERT can be used with OUTREC or BUILD to convert variable-length input records to fixed-length output records.....
Back to top
View user's profile Send private message
arvind.m

Active User


Joined: 28 Aug 2008
Posts: 205
Location: Hyderabad

PostPosted: Mon Feb 16, 2009 7:11 pm    Post subject:
Reply with quote

I actually got the result using FILEAID thru jcl. Sorry i did not refer the DFSORT manual. But there is a small mistake by expat (see the outrec field)

Code:

SORT FIELDS=COPY             
OUTFIL FNAMES=SORTOUT,VTOF,   
OUTREC=(5,20,80:X)           


Thanks everyone for your help and manual icon_smile.gif .
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: Mon Feb 16, 2009 8:45 pm    Post subject:
Reply with quote

arvind.m wrote:
But there is a small mistake by expat (see the outrec field)

Naah, just checking to see if you were on the ball or not icon_lol.gif
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
This topic is locked: you cannot edit posts or make replies. Fetching data from BAI File arunsoods JCL & VSAM 1 Wed Jul 19, 2017 4:28 pm
No new posts Write out NODUPS but just from one file Jay Villaverde DFSORT/ICETOOL 8 Fri Jul 14, 2017 12:44 am
No new posts How to add header with Date(YYMMDD) i... Rajan Moorthy DFSORT/ICETOOL 2 Thu Jul 06, 2017 11:44 pm
No new posts How to generate a new unique Input fi... for1ranjith CLIST & REXX 11 Sat Jul 01, 2017 12:09 pm
No new posts Writing a file using online program grvtomar PL/I & Assembler 3 Fri Jun 30, 2017 1:06 pm


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