MVSFORUMS.com Forum Index MVSFORUMS.com
A Community of and for MVS Professionals
 
 FAQFAQ   SearchSearch   Quick Manuals   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

S0C7 ABEND
Goto page Previous  1, 2
 
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> Problem Determination
View previous topic :: View next topic  
Author Message
kolusu
Site Admin
Site Admin


Joined: 26 Nov 2002
Posts: 12367
Topics: 75
Location: San Jose

PostPosted: Thu Dec 22, 2005 10:39 am    Post subject: Reply with quote

Quote:

Yes kolusu,
I understand the abend ..but what i mean to say is that we cannot predict the occurance of S0C7 right



Aquarian,

May be this will clarify your Doubt about predicting the S0C7 abend

System ABEND: S0C7

Description: This ABEND is caused by a data exception and can only occur when decimal (packed) instructions are used.

One of the following can cause this error:

    O The sign or digit codes of one or more bytes manipulated by the packed or CONVERT TO BINARY instructions is invalid for packed decimal use. Packed decimal digits must be in the range 0 through 9, with only the sign (i.e., rightmost) digit being a digit in the range A through F.

    O Fields in decimal (packed) arithmetic overlap incorrectly.

    O A packed decimal multiplicand has too many high-order significant digits.

    O The target operand of a CVD assembler instruction is not on a doubleword boundary



Possible causes for this abend include:

Subscript error, referenced beyond table

COBOL: working storage not initialized bad data, should check data for errors garbage in a field being tested or displayed 'move zeroes' to group level is display, had sublevels that were not period missing after imperative statements within AT END clause binary field in an arithmetic operation is not large enough to accept result

User Action: Correct the format of the data being manipulated by the packed decimal instructions in the program and resubmit the job.

The reason code associated with this ABEND can be found in the SDWAXDC field in the SDWA (System Diagnostic Work Area) control block. If you use an ESTAE routine with your program, you can gain access to the SDWA via your ESTAE routine.
_________________
Kolusu - DFSORT Development Team (IBM)
DFSORT is on the Web at:
www.ibm.com/storage/dfsort

www.linkedin.com/in/kolusu
Back to top
View user's profile Send private message Send e-mail Visit poster's website
muralikrishnan
Beginner


Joined: 08 Feb 2006
Posts: 19
Topics: 11

PostPosted: Fri Feb 10, 2006 8:48 am    Post subject: Reply with quote

Hi All,

In my sysout compile JCL I couldn't locate HEXLOC.

Should I have to use XREF compiler option? If yes, how will I specify.

Please correct me.
Back to top
View user's profile Send private message
kolusu
Site Admin
Site Admin


Joined: 26 Nov 2002
Posts: 12367
Topics: 75
Location: San Jose

PostPosted: Fri Feb 10, 2006 10:08 am    Post subject: Reply with quote

muralikrishnan,

Any compiler options can be overridern with CBL statements in the beginning of the program.(before ID division)

Code:

CBL LIST


or

Code:

CBL OFFSET


If the program was compiled with the LIST/OFFSET options, then you will have an assembler listing, and you should be able to find this offset directly.

Hope this helps...

Cheers

Kolusu
_________________
Kolusu - DFSORT Development Team (IBM)
DFSORT is on the Web at:
www.ibm.com/storage/dfsort

www.linkedin.com/in/kolusu
Back to top
View user's profile Send private message Send e-mail Visit poster's website
muralikrishnan
Beginner


Joined: 08 Feb 2006
Posts: 19
Topics: 11

PostPosted: Sat Feb 11, 2006 12:51 am    Post subject: Reply with quote

Thanks Kolusu.
Back to top
View user's profile Send private message
German Castillo
Beginner


Joined: 23 Dec 2005
Posts: 83
Topics: 2
Location: Caracas, Venezuela

PostPosted: Sun Feb 12, 2006 2:34 pm    Post subject: Reply with quote

Just adding on..

You can deal with SYSUDUMP, finding statements/operands addresses and look into that address, but there is an easier way if you do not particularly like to deal with system dumps and the like.

Compile your program with VBREF & TEST(SYM), this wont' prevent your S0C7 but your CEEDUMP will be formatted in a nicer way, The verb ref will force the showing of your offending instruction line, along with the calling path, and the symbolic information provided by the second parm will make your operands at either working storage or linkage section, to be nicely, and readable formatted. In that way you will lnow your operands contents very quickly and eansy. The resolution of the abend shouldn't take long from that point onward.
_________________
Best wishes,

German Castillo
Back to top
View user's profile Send private message
vak255
Intermediate


Joined: 10 Sep 2004
Posts: 384
Topics: 79

PostPosted: Wed Mar 08, 2006 11:31 am    Post subject: Reply with quote

Hi kolusu,

I have a doubt whether comp-3 field can be moved to display field. I know we move display field to comp-3 for various output reasons. But can you tell me when we required to move display to comp-3.
Back to top
View user's profile Send private message
Jaya
Beginner


Joined: 02 Sep 2005
Posts: 77
Topics: 10
Location: Cincinnati

PostPosted: Thu Mar 09, 2006 1:01 am    Post subject: Reply with quote

vak255,

Please check this link to check the validity of elementary MOVE statements

http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/igyl1101/3.22.1?SHELF=&DT=19930312093006&CASE=

Quote:
But can you tell me when we required to move display to comp-3.


When comp-3 variables are used in arithmetic operations, Performance will be better than display variables. It occupies less space in memory.

Also check this link to know the various data items that can be declared with DISPLAY USAGE.

http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/igyl1101/2.7.12.2

Thanks,
Jaya.
_________________
"Great spirits have always encountered violent opposition from mediocre minds."
-Albert Einstein
Back to top
View user's profile Send private message
Display posts from previous:   
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> Problem Determination All times are GMT - 5 Hours
Goto page Previous  1, 2
Page 2 of 2

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum


MVSFORUMS
Powered by phpBB © 2001, 2005 phpBB Group