SOC7 abend- How to resolve it

sandeep kumar302 · New User Joined: 14 Mar 2012 Posts: 69 Location: India

I am getting SOC7 abend and not able to fix it. I know it is caused due to any one of the following-

1. Numeric data was not initialized.
2. A subscript or index contained an invalid value.
3. A comp-3 field had an invalid sign.
4. A group move overlaid a numeric field with non-numeric data.

Important parts of the program:

Akatsukami · Posted: Wed Apr 30, 2014 6:04 pm Post subject:

Do you have the message that indicates the offset in the load module where the abend occurred?

Bill Woodger · DFSORT Moderator Joined: 09 Mar 2011 Posts: 7315

What did you get from the sysout of your step?

sandeep kumar302 · New User Joined: 14 Mar 2012 Posts: 69 Location: India

the sysout says as-

The system detected a data exception (System Completion Code=0C7).
From compile unit RP30H99C at entry point RP30H99C at compile unit unit offset +00000C28 at entry offset +00000C28
at address 13E00E18.
ENTERED (LEVEL 06/15/2011 AT 18.20)

Akatsukami · Posted: Wed Apr 30, 2014 6:43 pm Post subject:

Terry Heinze · Posted: Wed Apr 30, 2014 6:46 pm Post subject:

Find the field that gave you the S0C7, then look for all references to that field. You may need to backtrack a lot. Look for C28 in your compile listing.

sandeep kumar302 · New User Joined: 14 Mar 2012 Posts: 69 Location: India

Hi Akatsukami & Terry,
Thanks fof te prompt reply but i am not able to track any source statemtnt in the CEEDUMP.

my spool contains-

JESMSGLG JES2 2 CPISXK X LOCAL 34
JESJCL JES2 3 CPISXK X LOCAL 181
JESYSMSG JES2 4 CPISXK X LOCAL 193
SYSPRINT JS0010 PC 101 CPISXK X LOCAL 34
SYSTERM JS0010 PC 102 CPISXK X LOCAL 9
SYSUT2 JS0010 GENER 104 CPISXK X LOCAL 656
SYSPRINT JS0010 GENER 105 CPISXK X LOCAL 4
SYSPRINT JS0010 LKED 106 CPISXK X LOCAL 183
SYSOUT PSTY0010 107 CPISXK X LOCAL 25
CEEDUMP PSTY0010 111 CPISXK X LOCAL 343

sandeep kumar302 · New User Joined: 14 Mar 2012 Posts: 69 Location: India

I can see the below in the dump-

Pandora-Box · Posted: Wed Apr 30, 2014 7:01 pm Post subject:

CEEDUMP ==> Helps you in finding the last processed data with value of fields did you try looking into it?

Akatsukami · Posted: Wed Apr 30, 2014 7:04 pm Post subject:

sandeep kumar302 · New User Joined: 14 Mar 2012 Posts: 69 Location: India

Hi Akatsukami,
Apology for this but i am not sure where is the compile listing is present
. i mean is it a SPOOL or a library?

Bill O'Boyle

Probably in SDSF....

sandeep kumar302 · New User Joined: 14 Mar 2012 Posts: 69 Location: India

Hi Akatsukami,
I recompiled with-
CBL NOOFFSET LIST
but still i am not able to get any source code.Can you please guide me on how to see in cobol listing.

Akatsukami · Posted: Wed Apr 30, 2014 7:25 pm Post subject:

sandeep kumar302 · New User Joined: 14 Mar 2012 Posts: 69 Location: India

In SPOOL,
in sysout when i am trying to display the values-
i am getting-

Marso · Posted: Wed Apr 30, 2014 7:38 pm Post subject:

In the code you gave at the beginning, field COST-CHG-PERCENT is not in COMP-3 format.
You are only getting us as mixed up as you are!

Marso · Posted: Wed Apr 30, 2014 7:40 pm Post subject:

Can we see the contents of the ICCHGPCT file ?

sandeep kumar302 · New User Joined: 14 Mar 2012 Posts: 69 Location: India

Hi Marso,
Oh i am sorry, actually later i changed it while testing. Anyways it is not working with both the formats.

The content of the ICCHGPCT file is -

Bill Woodger · DFSORT Moderator Joined: 09 Mar 2011 Posts: 7315

Have you been re-typing rather than pasting?

Have you decided whether to provide the earlier information I asked for?

Why did you thing 12 followed by three blanks could be adequately described by PIC 9(3)V99?

Earlier in your program you check for NUMERIC, but continue with the next code anyway. When you do get non-numeric, you will get a S0C7. That is one way with your code, and the output I asked for from your DISPLAYs would affirm or discount that as the actual cause for your S0C7.

If you can't find the compile listing, ask a colleague. It will be much quicker and more certain than asking us.

sandeep kumar302 · New User Joined: 14 Mar 2012 Posts: 69 Location: India

Thanks Bill,
The problem was with input file. I corrected it and then the issue was resolved.

thanks a lot