Record size increasing

kumar_ngl · New User Joined: 05 Aug 2005 Posts: 50 Location: chennai

Dear friends,

I have given a task to increase the record size of the COBOL program as well as in the JCL ..to make the file capable to contain more than 3500 records since the file was restricted with 3500 recs..

can any one gimme a sample code ..so that i can change my program

kumar.p.v

sridevi2005 · New User Joined: 15 Sep 2005 Posts: 42

Hi,

I think you have to change in the cobol program.

Probably you may retrict with the record count.

Just increase your record count from 3500 to some other count.

If this is correct ok other wise please let me know the extact requirement.

Please explain in detail.

Thanks,
Sridevi

Rama Nelluri · New User Joined: 16 Sep 2005 Posts: 6

Hi ,

If the file size is incresed in Cobol program it has to get reflect in RUN JCL.
1.Change the Record length in File section to current requirement length.
2.Present in Production if the code is restricted to write 3500 records then change the Perform Until para (for Input file, they might be count used in the Until para)
count from 3500 to current requirement.

Ex: Perform Infile-read para until wk-count = 5000 or Infile-Eof.
here i assumed the count to 5000.
Increment the wk-count when the record was written to output file.

Regards,
Rama.N