Convert the files from fixed format to Variable block format

yogesh · New User Joined: 27 May 2005 Posts: 21

Hi friends,

I have written a COBOL program to convert the files from fixed block format to Variable block format,( the output files are of VB format.)
What changes i need to do in the COBOL program if i want the same output in V ( variable files ) instead of VB file?

Regards,
Yogesh.

DavidatK · Posted: Wed Feb 08, 2006 11:08 pm

Yogesh,

I believe that if you have coded BLOCK CONTAINS 0 RECORDS. in the FD there is nothing in the cobol program you must do. It is the DCB parms in the JCL that will determine if it's RECFM=V or RECFM=VB.

I don't use Variable records much, so if I'm wrong, someone please jump in.

Dave,

yogesh · New User Joined: 27 May 2005 Posts: 21

hI

mY EXISTING COBOL PROGRAM HAS THE SAME LOGIC
BUT STILL WHEN I TRY TO CONVERT FB FILES TO vARIABLE FILES I AM NOT ABLE TO DO SO

dneufarth · Posted: Sat Mar 18, 2006 7:58 pm

post your file code from your program as well as jcl dd statements for these files

mmwife · Super Moderator Joined: 30 May 2003 Posts: 1592

Hi Yogesh,

It would be helpful if you provided the following info:

JCL used VB vs V.
FDs in pgm (IP & OP) VB vs V. If the same just show 1 set.
READs/WRITEs in pgm (IP & OP) VB vs V. If the same just show 1 set.
Tell us HOW it doesn't work. Error msgs, output samples, etc.

yogesh · New User Joined: 27 May 2005 Posts: 21

hi

i am attaching the infor
please have a look any help from u all will be a grt help

thanks in advance

yogesh · New User Joined: 27 May 2005 Posts: 21

When i use the same program for VB file conversion it works
but it gives me the abend when i use the program for V files.
What might be the reasons

dneufarth · Posted: Sun Mar 19, 2006 7:04 pm

I see no obvious problem

try dropping LRECL and/or BLKSIZE from JCL DD for output

what ABEND do you receive?

mmwife · Super Moderator Joined: 30 May 2003 Posts: 1592

Hi Yogesh,

As Dave said, what you provided looks OK, with possibly one exception. You vary the rec from 270, while the IP rec is defined as length 166.

COBOL variable rec lengths do not contain the length of the RDW. They are only considered in JCL rec/blk length calcs.

That may not be the cause of your prob, but you may want to consider changing it to 166. Also could you include the READ/WRITEs for the files.

Thanx and