2. SB37 Abend
The most primary abend you will be getting is SB37.
//Spacejob Job Class=A,Msglevel=1,Msgclass=s
//Step1 Exec Pgm=SpacUtil
//Input DD Dsn=Sample.Space.Input,Disp=SHR
//Output DD Dsn=Sample.Space.Output,
// Disp=(New,Catlg,Delete),
// Dcb=(Lrecl=80,Blksize=800,Recfm=FB),
// Space=(Trk(500,100),Rlse)
If you are getting this SB37, then you need to increase the primary allocated space.
Follow the below steps to fix it.
Fix 1:
------
In the above Jcl, you need to change the 500 to, say, 800.
// Space=(Trk(800,100),Rlse)
This will almost fix you SB37. If you are still getting SB37, follow Fix 2.
Fix 2:
------
If you are still getting SB37, then you need to increase the secondary allocated space. See the below line.
// Space=(Trk(800,500),Rlse)
This will fix your job.
Fix 3:
------
If still you are getting the same SB37, then you need to change the Tracks to Cylinders. See below for the change.
// Space=(Cyl(10,10),Rlse)
This will make your job fine.
No comments:
Post a Comment