How to resolve soc7?

Lohith · Member Joined: 06 Nov 2008 Posts: 3

Hi frnds,
I'm new to mainframe technology. I want to know the step by step method to resolve soc7 abend without using any tools(abend tools).
please guide me.

thanks,
lohit

dbzTHEdinosauer · Moderator Joined: 02 Oct 2006 Posts: 720

start by looking at a cobol/asm/pl1 application programmers guide under the subject of debuging. not only will some things be explained, but links to other manuals will be given; the other manuals will go into depth about debugging.

You could also google, looking for 'how to resolve soc7'.
_________________
Dick Brenholtz
The only thing worse than waking up late,
is waking up the day before you wished it was.

Lohith · Member Joined: 06 Nov 2008 Posts: 3

thanks.............

Natarajan · Moderator Joined: 10 Oct 2008 Posts: 535 Location: chennai

Lohith,

here is some info which i have.

If you get S0C7 means some of your numeric variables/data items have invalid data. now we need to find out how to do this.

while compiling use compiler option LIST. it will give listing of your cobol program in spool.

Now, run your program, it will abend will with S0C7
go to spool and take the last four bytes of offset.

open the compiler listing and find those 4 bytes in the compiler listing.
you can find the position, where S0C7 occured.

In this way , we can find the position where S0C7 error got generated.

If you need any other help, let us know.
_________________
Natarajan
Chennai

Lohith · Member Joined: 06 Nov 2008 Posts: 3

natarajan,
i got the offset address, but i could not find in which line it is showing abend.

Natarajan · Moderator Joined: 10 Oct 2008 Posts: 535 Location: chennai

This example may help you.

step 1. check spool details of run job.
You will find a line similar to following.

Anuj Dhawan · Posted: Sat Nov 22, 2008 7:22 am Post subject:

Hi,

Do you have a product called Abend Aid?
_________________
Anuj

//MYWALLET EXEC PGM=SPOUSE
//SYSIN DD DSN=MYWALLET.ALL,DISP=SHR
//SYSOUT DD DUMMY

Anuj Dhawan · Posted: Sat Nov 22, 2008 7:23 am Post subject:

Hi,

The idea is to add the given displacement to the address given by the base register. And it is hexadecimal addition, so don't forget your base 16 math.

Then you scan down your dump to the given address and read the instruction, checking the contents of the fields. It really helps when you have a yellow IBM instruction card which shows the hexadecimal equivalents of the commands.

But even that won't help unless you know enough Assembler to realize that MVC is a Move Character command, and that the first field after the command is the RECEIVING field contents and the second is the sending field contents.

And unless your compile is done with the Assembler listing, that won't help much, because then you have to take the Assembler instruction back to your COBOL code to figure out what fields are being referenced by the abending command.
_________________
Anuj

//MYWALLET EXEC PGM=SPOUSE
//SYSIN DD DSN=MYWALLET.ALL,DISP=SHR
//SYSOUT DD DUMMY

Anuj Dhawan · Posted: Sat Nov 22, 2008 7:34 am Post subject:

Hi again,

I hit enter little early ..let's continue from last post..

So how do you do this quickly and easily? You have to know what causes what errors - basically, you have to understand your data.

S0C7 is a data exception. This most commonly means that a numeric value has had something done to it that results in it being placed in an alphanumeric field. So start with your numeric fields. Pic 9(nn) fields are very forgiving, so start your research with your COMP fields (COMP, COMP-3, etc.).

Because you got a S0C7, I can safely assume this is a batch job and you are dealing with standard input files. Input files have copybook layouts. Look at the copybook. Find the "packed" (COMP) fields. Using the layout positions, use File-Aid to scan the file for non-numeric data in these fields.

File-Aid option 8 from the main menu allows you to get a file layout froma copybook. This tells you what position the particular field starts in and how long it is. Here is an example:

Topics		Replies	Author	Views	Last Post
Related topics
	IAM BEGINNER IN JCL ...PLZ HELP ME	7	Guest	19421	Fri Sep 23, 2011 10:50 pm DikDude
	Mainframe Simulator	4	Chandra Shekar G R	5356	Sat Jul 31, 2010 1:36 pm Anuj Dhawan
	Mainframe Positions	3	Kyle	6959	Sun Apr 22, 2007 1:01 am rayala_uday
	Free Login Id for any Mainframe Server	1	jyoti	5196	Sat Apr 21, 2007 8:14 pm guru
	What is the command in mainframe avoid auto signout(TIMEOUT)	5	rajendra.pallala	7960	Fri Jan 26, 2007 12:48 am seagreg

	mainframegurukul.com Forum Index -> COBOL	All times are GMT + 5 Hours
Page 1 of 1