View previous topic :: View next topic
|
Author |
Message |
Anand78
New User
Joined: 06 Mar 2006 Posts: 50 Location: PUNE
|
|
|
|
Hi All,
Can any one tell me about how to specify DCB parameters for variable record length?
Input file is of VB
Output file is to be created with FB recfm.
I will more greatful if anybody send more information about this topic.
plese do reply..
Regards
Anand |
|
Back to top |
|
|
Prasanthhere
Active User
Joined: 03 Aug 2005 Posts: 306
|
|
|
|
For variable record length the DCB parametere can be
RECFM=V
LRECL is the logical record length
BLKSIZE equals LRECL plus 4. |
|
Back to top |
|
|
shekhar1s
New User
Joined: 13 Apr 2006 Posts: 14 Location: USA
|
|
|
|
DCB For Variable length record....
DCB=(DSORG=PS,LRECL=80,RECFM=VB,BLKSIZE=800)
Block size should be in multiples of record length. And as per my knowledge.. it automatically takes the four bytes when we declare the record format as VB(variable length).
And About output file... u can create it in the JCL itself or using 3.2 option..
please let me know if i'm wrong....
Thanks
Shekhar |
|
Back to top |
|
|
Rupesh.Kothari
Member of the Month
Joined: 27 Apr 2005 Posts: 463
|
|
|
|
Hi Anand,
Quote: |
Hi All,
Can any one tell me about how to specify DCB parameters for variable record length?
Input file is of VB
Output file is to be created with FB recfm.
I will more greatful if anybody send more information about this topic.
plese do reply..
Regards
Anand |
As per your query, ur Input is VB then u can mention in JCL as SHR and no need to mention DCB parameter.
Hope this helps
Regards
Rupesh |
|
Back to top |
|
|
Husna
New User
Joined: 02 Jun 2006 Posts: 49
|
|
|
|
Hi,
Will you please let me know about the four bytes when we declare the record format as VB(variable length). It will store the variable length at the begining of the first four bytes or end of the last four bytes. |
|
Back to top |
|
|
guptae
Moderator
Joined: 14 Oct 2005 Posts: 1208 Location: Bangalore,India
|
|
|
|
It will store the length in first 4 bytes |
|
Back to top |
|
|
sathish_seabiscuit
New User
Joined: 14 Jun 2006 Posts: 4
|
|
|
|
We can use ICEGENER utility.
In the code,
RIS&ENV..P370.UNLOAD.RECIPTSI.BSAM - Variable length file
RIS&ENV..P370.RECIPTSI.BSAM -Fixed length file
RISL3701 is given at last.
//ICEGEN01 EXEC PGM=ICEGENER,COND=(04,LT)
//*
//SYSUT1 DD
DSN=RIS&ENV..P370.UNLOAD.RECIPTSI.BSAM,
// DISP=SHR
//SYSUT2 DD DSN=RIS&ENV..P370.RECIPTSI.BSAM,
// DISP=(NEW,CATLG,DELETE),
// DCB=(RECFM=FB,LRECL=173),
// SPACE=(173,&SPMED.,RLSE),
// UNIT=&UNITWRK
//SYSIN DD DSN=&QUAL..PARMLIB(RISL3701),
// DISP=SHR
//SORTMSG DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=Z
//*
Parm RISL3701,
GENERATE MAXFLDS=1
RECORD FIELD=(173,1) |
|
Back to top |
|
|
Frank Yaeger
DFSORT Developer
Joined: 15 Feb 2005 Posts: 7129 Location: San Jose, CA
|
|
|
|
Quote: |
Will you please let me know about the four bytes when we declare the record format as VB(variable length). It will store the variable length at the begining of the first four bytes or end of the last four bytes. |
The first four bytes of every VB record is the Record Descriptor Word (RDW). The first two bytes of the RDW contain the record length in binary usually followed by two bytes of binary zeros. For example, an 80-byte VB record will have an RDW of X'00500000'. |
|
Back to top |
|
|
Bharanidharan
New User
Joined: 20 Jun 2005 Posts: 86 Location: Chennai, India
|
|
|
|
Frank,
This one has always nagged me - what are the 2 bytes of binary zeros used for? I've always been told "It is for IBM purposes"! Could you explain? |
|
Back to top |
|
|
Frank Yaeger
DFSORT Developer
Joined: 15 Feb 2005 Posts: 7129 Location: San Jose, CA
|
|
Back to top |
|
|
puneet478
New User
Joined: 03 Jan 2006 Posts: 13 Location: Bangalore india
|
|
|
|
Hi,
The DCB will look like as follows:
//M57Tst DD DSN=input.data.set,
// DISP=(NEW,CATLG,DELETE),
// UNIT=TSODA,DATACLAS=STANDARD,
// DCB=(RECFM=VB,LRECL=704,BLKSIZE=0),
// EXPDT=2007/350
You can change the LRECL and EXPDT fields.
Hope this will help.
- Puneet |
|
Back to top |
|
|
cjcpr
New User
Joined: 21 Mar 2006 Posts: 21 Location: USA
|
|
|
|
simple solutio n is using a OUTREC field with CONVERT parameter. |
|
Back to top |
|
|
Frank Yaeger
DFSORT Developer
Joined: 15 Feb 2005 Posts: 7129 Location: San Jose, CA
|
|
Back to top |
|
|
|