How to get a FB file when unloading data from a table

husj · New User Joined: 05 Sep 2005 Posts: 12 Location: P.R.C

Hi,
I unloaded data from a table into a dataset. but the record format of this dataset was VB. I want a FB format dataset by same JCL. What to do?
The JCL I used is followed.

//UNLOAD02 EXEC PGM=DSNUTILB,PARM='DQ11,GAFV009A',REGION=2M,
// COND=(4,LE,JBABTDN0)
//STEPLIB DD DSN=DSN.SDSNLOAD,DISP=SHR
//SYSPRINT DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSREC DD DSN=GAF.DTG.UT.EA01C311.TEMPG020,
// DISP=(NEW,CATLG),UNIT=SYSDA,
// SPACE=(TRK,(1,1),RLSE)
//SYSIN DD *
UNLOAD
FROM TABLE SC0BABTU.TBACA0X0 HEADER NONE
(KMTNKOZASIKBTNO,KNYKKNCODE,KNYKKNEIGYOTCODE,
YOKINSHMKKBN,KOZANO)
SHRLEVEL REFERENCE
UNLDDN(SYSREC)
/*

best regards
husj

rajandhla · Posted: Thu May 25, 2006 8:04 pm

for the specify the DCB parameters , give recl =max rec length and recfm=fb

rajandhla · Posted: Thu May 25, 2006 8:05 pm

for the file please specify the DCB parameters

give recl =max rec length and recfm=fb

regards
jai

husj · New User Joined: 05 Sep 2005 Posts: 12 Location: P.R.C

Hi,

Thanks for your help. I have specified the following DCB parameters,still gotten a VB file. The length is max length+4. How to do?

DCB=(RECFM=FB,LRECL=30,BLKSIZE=23460),

regards

husj

abhishekraghav · New User Joined: 31 Mar 2006 Posts: 9 Location: Pune

Use SORT

take only 5th byte onwards from input fie using OUTFIL OUTREC with VTOF or CONVERT option.
and write output record with

RECFM =FB and LRECL should be maximum.

find any SORT document for writing exact syntax about the options mentioned above.

murali.gummadi · New User Joined: 17 May 2006 Posts: 5

HI Abhishekraghav,

Will u plase more clear on above answer.
I didnt get the answer u specified above.

Thanks In Advance
Murali

varun_sharma · New User Joined: 08 Jun 2005 Posts: 19 Location: new delhi

Use RECFM =FB and LRECL= max record length +4

Let me know if it doesn't work. Else you can use File Aid for DB2, which is the most easy option.

Cheers
Varun