View previous topic :: View next topic
|
Author |
Message |
Anran
New User
Joined: 12 Mar 2005 Posts: 14
|
|
|
|
Hi there,
I have to create a report output file, but I have to make sure my output file is no bigger than 30 MB. Please kindly advise if I could do this in JCL or any other solutions in COBOL?
Thanks in advance!
Anran |
|
Back to top |
|
|
dneufarth
Active User
Joined: 27 Apr 2005 Posts: 420 Location: Inside the SPEW (Southwest Ohio, USA)
|
|
|
|
allocate output dataset primary extent of 30 mb with no secondary allocation
when space exhausted job will abend |
|
Back to top |
|
|
Anran
New User
Joined: 12 Mar 2005 Posts: 14
|
|
|
|
Thanks, Dave!!! I am not sure how to code the output dataset primary extent of 30 mb. Could you please give me a coding example?
Anran |
|
Back to top |
|
|
Anran
New User
Joined: 12 Mar 2005 Posts: 14
|
|
|
|
and I forgot to mention, my output file is a GDG file
Anran |
|
Back to top |
|
|
sril.krishy
Active User
Joined: 30 Jul 2005 Posts: 183 Location: hyderabad
|
|
|
|
Hi,
Here is the sample for defininig the data set.
DISP=(,CATLG,CATLG),
UNIT=XXXX,
SPACE=(CYL,(X,Y),RLSE),
DCB=(RECFM=FB,LRECL=80)
You need to change the XXXX and X,Y as per your requirement.
Thanks
Krishy |
|
Back to top |
|
|
Anran
New User
Joined: 12 Mar 2005 Posts: 14
|
|
|
|
Hi, Krishy,
Thanks, I know how to define the output data set, but I don't know how to fill in the XXXX, X, Y to make sure my output is no bigger than 30 MB
DISP=(,CATLG,CATLG),
UNIT=XXXX,
SPACE=(CYL,(X,Y),RLSE),
DCB=(RECFM=FB,LRECL=80)
Anran |
|
Back to top |
|
|
dneufarth
Active User
Joined: 27 Apr 2005 Posts: 420 Location: Inside the SPEW (Southwest Ohio, USA)
|
|
|
|
use the AVGREC=U DD statement parameter in conjunction with the SPACE= parameter
Code: |
DSN=a.b.c,
DISP=(NEW,CATLG,DELETE),
UNIT=SYSDA,
AVGREC=U,SPACE=(80,(375000),RLSE),
DCB=(RECFM=FB,LRECL=80)
|
primary allocation is 30,000,000/80
the actual required space to store this dataset will exceed 30M as devices vary in their optimal blocking factors, but this method will allow for 30M data. |
|
Back to top |
|
|
dneufarth
Active User
Joined: 27 Apr 2005 Posts: 420 Location: Inside the SPEW (Southwest Ohio, USA)
|
|
|
|
for gdg
Code: |
DSN=a.b.c(+1),
DISP=(NEW,CATLG,DELETE),
UNIT=SYSDA,
AVGREC=U,SPACE=(80,(375000),RLSE),
DCB=(RECFM=FB,LRECL=80)
|
|
|
Back to top |
|
|
Anran
New User
Joined: 12 Mar 2005 Posts: 14
|
|
|
|
Thank you so much !!
I think AVGREC=U will solve my problems!!
Have a good day!!
Yurong |
|
Back to top |
|
|
raviprasath_kp Warnings : 1 New User
Joined: 20 Feb 2005 Posts: 65 Location: chennai
|
|
|
|
hi what i s AVREC=U |
|
Back to top |
|
|
|