IDMS

We are having an issue with an ADS dialog calling a COBOL DC program. The COBOL DC program is abending with S0C7. I remember from many years back that, there was a location in the dump (OLP) that would give the address offset where the exception was happening (I think it may have been one of registers).

I will appreciate if someone can let me know how to find the offset in the dump or point me to a document.

Thanks

Sat Pal

I think the answer to this depends on how your LE options are set.  If LE is passing the abend to DC you should get the offset right in the program check message:

IDMS DC027001 V20 T72565 D003 PROGRAM CHECK IN FADDI112 AT OFFSET 31AE    
                  PSW WAS 078D1000 9426B7AE  DUMP OF TASK FOLLOWS        

If LE is handling the abend I'm sure exactly what messages are produced, there may be even more that one option depending on exactly what you have specified.   To get the normal DC handling I used the following:

ABTERMENC=(RETCODE),                          07/30/10

TRAP=(OFF,NOSPIE)                             02/11/10

Initially I was OK with just overriding the setting for TRAP, but later that year an OS change made in necessary to add the ABTRMENC option also.  I've been running this way since.  I think you will have to consult the LE manuals for more information if that is the type of output you are getting.  I'm not aware of offset being put into a register, but perhaps some forms of LE error handling do that.

Good luck,

John