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 RECFM VB TO FB OR Viceversa

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> DFSORT/ICETOOL
View previous topic :: :: View next topic  
Author Message
Venkatesan Arumugam

New User


Joined: 28 Jun 2005
Posts: 3

PostPosted: Tue Jun 28, 2005 11:42 am    Post subject: How to Convert RECFM VB TO FB OR Viceversa
Reply with quote

Hi Guys,
i am new to this portal, nice to join with u people, anyone can tell me about the conversion of the Record format From VB(Variable Block) To FB(Fixed Block).

Thanks & Regards,
Venkatesan Arumugam.
Back to top
View user's profile Send private message

machswap

New User


Joined: 19 Apr 2005
Posts: 14

PostPosted: Tue Jun 28, 2005 2:14 pm    Post subject: Re: How to Convert RECFM VB TO FB OR Viceversa
Reply with quote

Hi,

This jcl will convert a file of format variable to fixed.

//STEP0010 EXEC PGM=SORT
//SORTIN DD DSN=input file,DISP=SHR
//SORTOUT1 DD DSN=FV99T.TEST2,
// DISP=(NEW,CATLG,DELETE),LRECL=50,
// RECFM=FB
//SYSIN DD *
SORT FIELDS=COPY
OUTFIL FNAMES=SORTOUT1,VTOF,
OUTREC=(1:1,50)
END
/*
//SYSOUT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//

Please try this....
Back to top
View user's profile Send private message
jz1b0c

Active User


Joined: 25 Jan 2004
Posts: 160
Location: Toronto, Canada

PostPosted: Tue Jun 28, 2005 6:12 pm    Post subject: Re: How to Convert RECFM VB TO FB OR Viceversa
Reply with quote

keep the JCL as it is, and use the below sysin (make necessary changes)

SYSIN :
INREC FIELDS=(01:01,06,
07:4Z,
88:2620,1)
SORT FIELDS=COPY
OUTREC FIELDS=(01:07,82),CONVERT
END
Back to top
View user's profile Send private message
MGIndaco

Active User


Joined: 10 Mar 2005
Posts: 432
Location: Milan, Italy

PostPosted: Tue Jun 28, 2005 10:15 pm    Post subject:
Reply with quote

You can also use other IBM utility as IEBGENER to do the same.
Code:
//STEP010I EXEC PGM=IEBGENER                           
//SYSPRINT DD SYSOUT=*                                 
//SYSIN    DD *                                         
 GENERATE MAXFLDS=1                                     
 RECORD FIELD=(350,1,,1)                               
//SYSUT1   DD DISP=SHR,DSN=myVBinput
//SYSUT2   DD DISP=(,CATLG),UNIT=SYSDA,SPACE=(CYL,(1,1),RLSE),
//            DCB=(RECFM=FB,LRECL=350,BLKSIZE=3500),
//            DSN=myFBoutput

For more detail about this utility see this link:
http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/dgt1u104/CCONTENTS
Back to top
View user's profile Send private message
Frank Yaeger

DFSORT Moderator


Joined: 15 Feb 2005
Posts: 7130
Location: San Jose, CA

PostPosted: Tue Jun 28, 2005 10:17 pm    Post subject:
Reply with quote

For more information on using DFSORT's VTOF (or CONVERT) parameter, see:

http://www.ibm.com/servers/storage/support/software/sort/mvs/tricks/srtmst01.html#t11
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 -> DFSORT/ICETOOL All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Copy RECFM =VB TO FB file with RECL =... sahil41352 DFSORT/ICETOOL 3 Wed Dec 28, 2016 11:29 pm
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 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