Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

SB37 ABEND, but dataset is created successfull
Goto page 1, 2  Next
 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM
View previous topic :: :: View next topic  
Author Message
erhema

New User


Joined: 07 Oct 2008
Posts: 23
Location: Chennai

PostPosted: Tue Jan 06, 2009 11:54 am    Post subject: SB37 ABEND, but dataset is created successfull
Reply with quote

Hi!

My job abended with Sb37 (space issue in the dataset). But the dataset is loaded successfully with the data from the input file.
If dataset load is success, then why did the ABEND occur?

Can anyone please justify this situation.

JCL : Dataset to be created with
SPACE=(CYL,(50,25),RLSE)

dataset has been created has the properties as
1st extent cylinders: 88
Secondary cylinders : 25

Current Utilization
Used cylinders . . : 88
Used extents . . . : 1

Thanks
Hema
Back to top
View user's profile Send private message

Gnanas N

Active Member


Joined: 06 Sep 2007
Posts: 785
Location: Chennai, India

PostPosted: Tue Jan 06, 2009 11:57 am    Post subject:
Reply with quote

Hi,

Do you have something like BMC Stop X37 or CA-Allocate?
Back to top
View user's profile Send private message
erhema

New User


Joined: 07 Oct 2008
Posts: 23
Location: Chennai

PostPosted: Tue Jan 06, 2009 12:06 pm    Post subject:
Reply with quote

Hi Gnanas,

No. Am not using any thing lik BMC Stop or CA-Allocate.

Thanks
Hema
Back to top
View user's profile Send private message
muthuvel

Active User


Joined: 29 Nov 2005
Posts: 217
Location: Chennai

PostPosted: Tue Jan 06, 2009 12:12 pm    Post subject:
Reply with quote

Were you sure the job abended of SB37,Please post the JCL and Output dataset DISP parameters?
Back to top
View user's profile Send private message
Gnanas N

Active Member


Joined: 06 Sep 2007
Posts: 785
Location: Chennai, India

PostPosted: Tue Jan 06, 2009 12:12 pm    Post subject:
Reply with quote

Please check, B37 for that dataset... dataset is the result of that step today's run...

Also post dataset attributes here.
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8593
Location: Back in jolly old England

PostPosted: Tue Jan 06, 2009 12:22 pm    Post subject:
Reply with quote

Few questions ..........

Are you looking at the correct dataset
What is the disposition of the dataset
Have your storage people set up constraint relief
Back to top
View user's profile Send private message
umasankarmf

New User


Joined: 08 Sep 2008
Posts: 43
Location: india

PostPosted: Tue Jan 06, 2009 12:27 pm    Post subject:
Reply with quote

Hi hema,
Error SB37 is related to space. Just like warning i.e. data set is full with some unused storage space. So just compress the data set.


Corrections are welcome..........!
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8593
Location: Back in jolly old England

PostPosted: Tue Jan 06, 2009 12:28 pm    Post subject:
Reply with quote

umasankarmf wrote:
Hi hema,
Error SB37 is related to space. Just like warning i.e. data set is full with some unused storage space. So just compress the data set.
Corrections are welcome..........!

Please explain with examples on how to compress a PS dataset
Back to top
View user's profile Send private message
umasankarmf

New User


Joined: 08 Sep 2008
Posts: 43
Location: india

PostPosted: Tue Jan 06, 2009 12:32 pm    Post subject:
Reply with quote

Hi expat,

Just type Z infront if the data set after ISPF 3.4 option or by using 3.2 option also you can compress the dataset.

If I am wrong please correct me..........!
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8593
Location: Back in jolly old England

PostPosted: Tue Jan 06, 2009 12:35 pm    Post subject:
Reply with quote

You are talking about a PDS not a PS dataset. You CAN NOT compress a PS dataset.
Back to top
View user's profile Send private message
Arun Raj

Moderator


Joined: 17 Oct 2006
Posts: 2161
Location: @my desk

PostPosted: Tue Jan 06, 2009 1:20 pm    Post subject:
Reply with quote

umasankarmf wrote:
Just like warning
B37 is a System abend code that needs some corrective action. It cannot be treated just as a warning.
Back to top
View user's profile Send private message
erhema

New User


Joined: 07 Oct 2008
Posts: 23
Location: Chennai

PostPosted: Tue Jan 06, 2009 2:02 pm    Post subject:
Reply with quote

Hi All,

Here is my JCL

//STEP1 EXEC PGM=IEBGENER
//SYSPRINT DD SYSOUT=*
//SYSUT1 DD DSN=INPUT.FILE(+0),DISP=SHR
//SYSUT2 DD DSN=OUTPUT.FILE.GROUP(+0),
// DISP=(MOD,CATLG,KEEP),
// SPACE=(CYL,(50,25),RLSE),
// DCB=(RECFM=FB,LRECL=160),
// UNIT=SYSDA

SB37 ABEND occured in this Step.


Output dataset created is OUTPUT.FILE.GROUP.G1100V00

Properties of this file are
1st extent cylinders: 88
Secondary cylinders : 25

Current Utilization
Used cylinders . . : 88
Used extents . . . : 1

Please let me know if i need to provide any other input.

Thank You
Back to top
View user's profile Send private message
Arun Raj

Moderator


Joined: 17 Oct 2006
Posts: 2161
Location: @my desk

PostPosted: Tue Jan 06, 2009 2:11 pm    Post subject:
Reply with quote

Hema,

Have you looked at the JCL manual for the Subparameter description for DISP Parameter.
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8593
Location: Back in jolly old England

PostPosted: Tue Jan 06, 2009 2:15 pm    Post subject:
Reply with quote

Ohhhhhhhhhh boy. I haven't seen JCL like that since about 1983 when I changed from this to a new accumulation method that preserved data integrity.

If you are doing an accumulation of data, why on earth do you use DISP=MOD. This is rather dangerous and may invalidate data integrity, as you probably have done in your run shown above.

This is much safer because it is rerun friendly. How are you going to recover your output gdg gen(0) before rerun ?

Also, please learn to use code tags as shown below to make your code easier to read.
Code:

//STEP1    EXEC PGM=IEBGENER
//SYSPRINT DD SYSOUT=*
//SYSUT1   DD DSN=OUTPUT.FILE.GROUP(+0),DISP=SHR
//         DD DSN=INPUT.FILE(+0),DISP=SHR
//SYSUT2   DD DSN=OUTPUT.FILE.GROUP(+1),
//            DISP=(,CATLG,DELETE),
//            SPACE=(CYL,(50,25),RLSE),
//            DCB=(RECFM=FB,LRECL=160),
//            UNIT=SYSDA
Back to top
View user's profile Send private message
Anuj Dhawan

Senior Member


Joined: 22 Apr 2006
Posts: 6258
Location: Mumbai, India

PostPosted: Tue Jan 06, 2009 2:15 pm    Post subject:
Reply with quote

Try using DISP=(NEW,CATLG,DETELE) & check what happens ?
Back to top
View user's profile Send private message
erhema

New User


Joined: 07 Oct 2008
Posts: 23
Location: Chennai

PostPosted: Tue Jan 06, 2009 2:32 pm    Post subject:
Reply with quote

Hi Expat,

yes, you are right, this code is written before 20 years and am maintaining it. I have to correct this ABEND.

This same job runs more than 10 times in one day and i want all 10 diff inputs to be accumulated in one partiuclar Group GDG.

Please answer my question, Why this output GDG dataset have the data received from its latest input file copied successfully and also have thrown an ABEND.

please let me know if am wrong anywhere

thanks
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8593
Location: Back in jolly old England

PostPosted: Tue Jan 06, 2009 3:11 pm    Post subject:
Reply with quote

It probably has some of the data accumulated, but not all of it, as it has run out of space.
Back to top
View user's profile Send private message
Anuj Dhawan

Senior Member


Joined: 22 Apr 2006
Posts: 6258
Location: Mumbai, India

PostPosted: Tue Jan 06, 2009 3:22 pm    Post subject:
Reply with quote

Hi,

First consider this format of DISP parameter: DISP=({status}{,normal-termination-disp}{,abend-disp})

erhema wrote:
Please answer my question, Why this output GDG dataset have the data received from its latest input file copied successfully and also have thrown an ABEND.
Because you use "Keep" for "abend-disp", so till the sapce was availabe to your DSN it was "loaded" with data & the moment space was filled up..boom..you got the abend..but because of "KEEP" DSN was still kept & was not deleted.
Back to top
View user's profile Send private message
Anuj Dhawan

Senior Member


Joined: 22 Apr 2006
Posts: 6258
Location: Mumbai, India

PostPosted: Tue Jan 06, 2009 3:28 pm    Post subject:
Reply with quote

Hello,

By the way did you try using
Quote:
DISP=(NEW,CATLG,DETELE) & check what happens ?
and again, did you notice the DISP parameter for SYSUT2 in the code from Expat.
Back to top
View user's profile Send private message
dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Tue Jan 06, 2009 9:51 pm    Post subject:
Reply with quote

Hello,

Quote:
This same job runs more than 10 times in one day and i want all 10 diff inputs to be accumulated in one partiuclar Group GDG.
Even though this has run for a long time, i believe you will be better served if you correct it (yup, as coded it is not correct).

You might consider changing the individual runs to create a +1 of a different gdg base and at the end of the day (after the last run) copy all 10 generations to a new +1 of the existing gdg. This would make one generation available for each day's data without using the current problem scheme. This copy could simply be an iebgener like:
Code:

//COPY     EXEC PGM=IEBGENER                                         
//SYSUT1   DD DSN=MY.TEN.FILES,DISP=(OLD,DELETE,KEEP)                               
//SYSUT2   DD DSN=MY.DAILY.FILE(+1),DISP=(,CATLG,DELETE),UNIT=xxxxxx,     
//            SPACE=(CYL,(50,25),RLSE),DATACLAS=zzzzzz               
//SYSOUT   DD SYSOUT=*                                               
//SYSPRINT DD SYSOUT=*                                               
//SYSIN    DD DUMMY                                                   


By not specifying a generation on sysut1, all cataloged geneerations would be processed and then automatically deleted at successful end. If some day there were other than 10 generations, this would work for however many were available.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM All times are GMT + 6 Hours
Goto page 1, 2  Next
Page 1 of 2

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts IMS BMP program causes 878 system abend Artemk IMS DB/DC 7 Tue Nov 22, 2016 8:26 pm
No new posts FTP - JCL failed while passing FTP co... Suneetha1612 JCL & VSAM 12 Wed Nov 16, 2016 7:33 pm
No new posts abend sort based on count records in ... anatol DFSORT/ICETOOL 5 Mon Oct 17, 2016 10:10 pm
No new posts To trim spaces in a pipe delimited da... Nish84 COBOL Programming 16 Mon Oct 10, 2016 1:54 pm
No new posts Allocate dataset withour BLKSIZE Susanta CLIST & REXX 2 Thu Sep 22, 2016 11:51 am


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us