MVSFORUMS.com

[analyst]

I am having a JCL which is creating PS with RECL 2000.This JCL is being called by many reporting programs.The length of the reports vary from 100-2000.

When I am generating a report with RECL = 100,still the dataset is being created with LRECL 2000 and when I emailed this file as CSV it is taking huge amount of space.Because of space limitations at the organisation as Max (10 MB).the file is truncated and truncated file has been sent.

Is there any mechansim which reduces the file size in teh above cases.

The RECFM = FBA
Fixed Block

Whether any mechanism will reduce the file size by using any VB file ..or any thoughts..

tHE FOLLOWING JCL IS USED.The DSN: ABC.DEF.GHE is using more space

//STEP1 EXEC PGM=IEBGENER
//SYSIN DD DUMMY
//SYSUT1 DD DSN=ABC.DEF.GHE,DISP=(OLD,DELETE,DELETE)
//SYSUT2 DD SYSOUT=(B,TCPSMT)

[warp5]

What does your original file look like?

[Anuj Dhawan]

[Nic Clouston]

DISP=(OLD,DELETE,DELETE)

You are asking for trouble with this DISP - you are saying to the operating system "please delete this file if the job works OR fails" If it does not matter then why not use a temporary file?

Why not pass the LRECL into the procedure as a symbolic parameter set to the correct value for each execution?
_________________
Utility and Program control cards are NOT, repeat NOT, JCL.

[analyst]

Thanks all for your replies.The same file if created with FB with LRECL is taking 45 MB.If I create teh same file with VB then it is taking 3 MB of space.

The dataset created with LRECL = 2000 because multiple programs use the same file and the file sizes valies between 100 to 2000.To cater that I was creating the Dataset with LRECL=2000.

The mailing of 3MB dataset is working fine as the email limitation is 10MB.Thanks for your replies.

Passing Symbolic parameter is the good option,will check on the same.