IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

S0C-9 abend


IBM Mainframe Forums -> JCL & VSAM
Post new topic   Reply to topic
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
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

Moderator Emeritus


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

PostPosted: Mon Feb 02, 2009 10:24 am
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
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

Superior Member


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

PostPosted: Mon Feb 02, 2009 11:58 am
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 View Bookmarks
All times are GMT + 6 Hours
Forum Index -> JCL & VSAM

 


Similar Topics
Topic Forum Replies
No new posts ISAM and abend S03B JCL & VSAM 10
No new posts Abend S0C4 11 (Page Translation Excep... PL/I & Assembler 16
No new posts WER999A - UNSUCCESSFUL SORT 8ED U Ab... SYNCSORT 5
No new posts the system or user abend SF0F R=NULL COBOL Programming 0
No new posts Need to get an DLI abend like U0200 IMS DB/DC 2
Search our Forums:

Back to Top