MVSFORUMS.com

[karunkallore]

Hello Guru's,

I have a question which is bothering me a little bit. Hope to get some relief posting it here.

I have a file , the name is &&TEST ( a temporary one ) which is declared in the following format in the JCL and in the COBOL code.


IN JCL
----------

//TEST DD DSN=&&TEST,
// DISP=(NEW,DELETE,DELETE),
// UNIT=SYSWK,
// SPACE=(CYL,(1,75),RLSE),
// DCB=(RECFM=VB,LRECL=11508,BLKSIZE=0,DSORG=PS,BUFNO=50)


IN COBOL CODE
----------------------

INPUT-OUTPUT SECTION.
*********************
SELECT TEST-FILE
ASSIGN TO TEST
ORGANIZATION IS SEQUENTIAL.

FILE SECTION.
*********************

FD TEST-FILE
BLOCK CONTAINS 0 RECORDS
LABEL RECORDS ARE STANDARD.


Now the question is :-

1) Would there be a problem in converting this VB file to a VBS ? I am planning to do this because I heard somewhere that if a file is in VBS then it increases the perforamance when a sort is done on the file.

2) Could some one tell me what all parmeters I need to change to convert this VB file to VBS. I have done it the way I figured out it should be but as always Guru's please correct me if I am wrong.

IN JCL ( modified one )
--------------------------------

//TEST DD DSN=&&TEST,
// DISP=(NEW,DELETE,DELETE),
// UNIT=SYSWK,
// SPACE=(CYL,(1,75),RLSE),
// DCB=(RECFM=VBS,LRECL=11508,BLKSIZE=0,DSORG=PS,BUFNO=50)


IN COBOL CODE ( Modified One )
----------------------------------------------

INPUT-OUTPUT SECTION.
*********************
SELECT TEST-FILE
ASSIGN TO TEST
ORGANIZATION IS SEQUENTIAL.

FILE SECTION.
*********************

FD TEST-FILE
BLOCK CONTAINS 0 CHARACTERS
LABEL RECORDS ARE STANDARD.
RECORDING MODE IS S.

Can I retain the LRECL as11508 and BLKSIZE=0 or do I need to change it ? Any other changes so that the file (&&TEST ) created in VB and VBS format are same.

3) Finally but not the least could some one tell me the diffirence between VB and VBS formats ? Pros and Cons and stuff like that ?

Thanks a lot in advance....

Karun

[dbzTHEdinosauer]

[kolusu]

[karunkallore]

Hi Dick,

Its a VB record.


Hi Kolusu,

One of my colleagues in main frame had suggested. May be I misinterpreted him. My fault.

Could you please see the changes I made in JCL and COBOL code and let me know if this okay. I am worried about the BLKSIZE and LRECL ? Can i retain those as same as that when the file was VB ?

Thanks,
Karun.

[kolusu]

karunkallore,

Let us stick to the topic in discussion instead of me.

Why do you have to code the LRECL and Blksize in the JCL? If you want the LRECL to be 11508 , then define the FD field as

[karunkallore]

Okay thanks ! But then how about Blksize ? Can i retain that in the JCL ? Or should it be totally removed with no reference neither in the code nor in the JCL ?

Also may be a naive question ..but is there any disadvantage in keeping the Lrecl in the JCL as the lay out for this file is kind of fixed in the code due to some coding standards followed here.


Thanks
Karun

[vak255]

[karunkallore]

Thanks Vak255 ! The file is VBS...