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
 

 

S0C-9 abend

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM
View previous topic :: :: View next topic  
Author Message
Baby Priya

New User


Joined: 06 Aug 2008
Posts: 3
Location: Bangalore

PostPosted: Mon Feb 02, 2009 10:13 am    Post subject: S0C-9 abend
Reply with quote

Hi

My program uses a comp variable as given:

03 A PIC S9(10) COMP.

I have initialized A to zero.In the program,I am incrementing A by just adding 1 as

ADD +1 to A.

When I execute the program I am getting S0C 9 abend at this statement.While checking in abend-aid, A contains the value -412152206158925504.

Please let me know how to resolve this.

Thanks,
Priya
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: Mon Feb 02, 2009 10:24 am    Post subject:
Reply with quote

Hello,

How is this related to jcl?

Is this a cobol program? If it is, suggest you put visable footprints on both sides of this field and look in the dump for the footprints. You might also define a s9(11) comp-3 variable, initialize it to zero also, and every time you add 1 to the comp field, add 1 to toeh comp-3 field.

I believe the posted value should not occur if you start at zero and add 1.
Back to top
View user's profile Send private message
Terry Heinze

JCL Moderator


Joined: 14 Jul 2008
Posts: 1249
Location: Richfield, MN, USA

PostPosted: Mon Feb 02, 2009 11:43 am    Post subject:
Reply with quote

I don't think you can get a "fixed-point-divide exception" by adding 1 to a binary number. Check your coding and Abend-Aid report again. Post your exact field names and procedure division statements and the relevant parts of the Abend-Aid report.
Back to top
View user's profile Send private message
Anuj Dhawan

Senior Member


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

PostPosted: Mon Feb 02, 2009 11:58 am    Post subject:
Reply with quote

Hi,

I've the below description for S0C9 which no where belongs to what you tell, are you hiding something?
Quote:
System ABEND: S0C9

Description: This ABEND is caused by a fixed-point divide exception. A quotient has exceeded the register size in a DIVIDE instruction, or the result of a CONVERT TO BINARY instruction is more than 31 bits long.

(Reason Code 9)

User Action: Dividing by zero is the most common cause of this ABEND. Correct the program logic error that caused the divide exception and resubmit the job.
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
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts IMS region inactive - User abend code... gthmrj IMS DB/DC 5 Tue Mar 07, 2017 12:29 pm
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 abend sort based on count records in ... anatol DFSORT/ICETOOL 5 Mon Oct 17, 2016 10:10 pm
No new posts hot to get details when "EXEC CI... Andi1982 CICS 11 Tue Sep 20, 2016 5:01 pm
No new posts S213-14 ABEND explantion Apurva Mehta JCL & VSAM 5 Thu Jul 07, 2016 10:56 pm


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