TELON : Abend SC07



Queries about Compuware’s Debugging Tools: Abend-AID for COBOL, PL/I, Assembler, CICS, DB2, IMS and IDMS

TELON : Abend SC07

Postby coboliste » Wed Aug 17, 2011 6:18 pm

A program has encountered an abend TELON SC07, here is the diagnosis given by Abend-Aid:

A data exception occurred during execution of program GSPTA1T2. The expected
completion code is S0C7.

Analysis of Error

The next sequential instruction to be executed in program GSPTA1T2 was at
displacement 0000B81E.


A Data Exception was caused by data referenced at displacement 44B from the start of TGT BLL cell 14 (X'000E'). The field contains
X'4040400000404040'. Refer to the data division map in the program listing
to locate the field name.

The field causing the exception is located in the linkage section of program
GSPTA1T2.

Analysis of Error
A Data Exception is caused when a computational-3 field has an invalid digit (not 0-9), or its last byte contains an invalid sign (not A, B, C, D, E, or F).

The IBM message that corresponds to the condition is:

CEE3207S The system detected a data exception (System Completion Code=0C7).


My question is:
How can I deduct the address of the problematic instruction from the information in fat, thank you for your help.
coboliste
 
Posts: 1
Joined: Wed Aug 17, 2011 4:23 pm
Has thanked: 0 time
Been thanked: 0 time

Re: TELON : Abend SC07

Postby Ed Goodman » Wed Aug 17, 2011 10:56 pm

In the program listing...find where B81E fits between two lines of code. You probably won't find that exact address.

The format of the listing can change depending on options and versions of COBOL, but keep looking and you'll PROBABLY find something that shows the statements and their offset in the code. Something like:

001298  *10000-INITIALIZE                                   
001304  MOVE                                               
   0010D8                 GN=127   EQU   *                 
   0010D8  D206 86DA A57D          MVC   1754(7,8),1405(10)
001305  MOVE                                               
   0010DE                 GN=128   EQU   *                 
   0010DE  5820 912C               L     2,300(0,9)         
   0010E2  D203 202C A068          MVC   44(4,2),104(10)   
Ed Goodman
 
Posts: 341
Joined: Thu Feb 24, 2011 12:05 am
Has thanked: 3 times
Been thanked: 17 times

Re: TELON : Abend SC07

Postby BillyBoyo » Thu Aug 18, 2011 12:43 am

Depending on compiler options, your compile listing may not include all this detail. In which case, the displacement that is the closest to but less than the Next Sequential Instruction.

You'll find that the line of code is dealing with something in the Linkage Section. Quite possibly something subscripted.

It will be a comp-3 field with 14 or 15 digits (numbers) including decimal places, unless the Cobol verb is a COMPUTE, where it might be considerably less.

Instead of containing a valid packed decimal value, your field contains three spaces, two bytes of binary zeros (or LOW-VALUES), then three more spaces. Maybe you can recognise the pattern space, binary zero, space already. If not, look in the dump and you'll be able to find out how many spaces there are before/after (remember, it might, but doesn't have to be, the same field repeating) to tell which table has gone "wild".

Looks like a "table-overrun" of some sort at first sight.

Look in you data division map, find BLL=14 and displacement 44B. That is the field which your program thinks is packed-decimal.
BillyBoyo
Global moderator
 
Posts: 3804
Joined: Tue Jan 25, 2011 12:02 am
Has thanked: 22 times
Been thanked: 265 times


Return to Abend-AID

 


  • Related topics
    Replies
    Views
    Last post