IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

Could anybody decipher this dump?


IBM Mainframe Forums -> ABENDS & Debugging
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
rchandran_19

New User


Joined: 08 Mar 2005
Posts: 34

PostPosted: Thu Feb 28, 2008 10:56 pm
Reply with quote

Hi,

I made a change to an existing COBOL program by adding a dynamic call statement in it. It compiled perfectly well, without any errors. At run time it Abends.

this is the dump, which I don't know how to decipher. I don't know why these abends in Cobol are not user friendly at all.

Thanks in advance to all who is trying to help me.

RC

Code:
----------------------------------------------------------------------------------

XPD0439 RA105      S46D-18 ABEND AT 000E5E4A  REASON CODE 00000018           
                                                                               
      PSW AT TIME OF ERROR  070C0000 - 8A6BFB3A                                 
      DATA AT PSW - 5810C85B  0A0D4830  90004180                               
      GP REGISTERS AT ABEND   0 0000000C   1 8446D000   2 00000B80   3 00000BD8
                              4 007AE2C0   5 007AE238   6 00FD9240   7 00B22E80
                              8 00000002   9 00000BE0  10 00000090  11 0A6BF022
                             12 0A6C0021  13 00138DA0  14 00FE5280  15 00000018
      AR REGISTERS AT ABEND   0 00000000   1 00000000   2 00000000   3 00000000
                              4 00000000   5 00000000   6 00000000   7 00000000
                              8 00000000   9 00000000  10 00000000  11 00000000
                             12 00000000  13 00000000  14 00000000  15 00000000
      INTERRUPT ADDRESS AT OFFSET 000B38 IN LOAD MODULE IEAVTESP               
  XPD0439 RA105      S306-0C ABEND AT 4AB41024  REASON CODE 00000018           
                                                                               
      PSW AT TIME OF ERROR  070C0000 - 8A6BFB3A                                 
      DATA AT PSW - 8400181E  0A0D18FB  180C181D                               
      GP REGISTERS AT ABEND   0 0000000C   1 8446D000   2 00000B80   3 00000BD8
                              4 007AE2C0   5 007AE238   6 00FD9240   7 00B22E80
                              8 00000002   9 00000BE0  10 00000090  11 0A6BF022
                             12 0A6C0021  13 00138DA0  14 00FE5280  15 00000018
      AR REGISTERS AT ABEND   0 00000000   1 00000000   2 00000000   3 00000000
                              4 00000000   5 00000000   6 00000000   7 00000000
                              8 00000000   9 00000000  10 00000000  11 00000000
                             12 00000000  13 00000000  14 00000000  15 00000000
      INTERRUPT ADDRESS AT OFFSET 000B38 IN LOAD MODULE IEAVTESP               
  XPD0439 RA105      SA06-04 ABEND AT 0BA58632  REASON CODE 00000018           
                                                                               
      PSW AT TIME OF ERROR  070C0000 - 8A6BFB3A                                 
      DATA AT PSW - 8400181E  0A0D18FB  180C181D                               
      GP REGISTERS AT ABEND   0 0000000C   1 8446D000   2 00000B80   3 00000BD8
                              4 007AE2C0   5 007AE238   6 00FD9240   7 00B22E80
                              8 00000002   9 00000BE0  10 00000090  11 0A6BF022
                             12 0A6C0021  13 00138DA0  14 00FE5280  15 00000018
      AR REGISTERS AT ABEND   0 00000000   1 00000000   2 00000000   3 00000000
                              4 00000000   5 00000000   6 00000000   7 00000000
                              8 00000000   9 00000000  10 00000000  11 00000000
                             12 00000000  13 00000000  14 00000000  15 00000000
      INTERRUPT ADDRESS AT OFFSET 000B38 IN LOAD MODULE IEAVTESP
Back to top
View user's profile Send private message
CICS Guy

Senior Member


Joined: 18 Jul 2007
Posts: 2146
Location: At my coffee table

PostPosted: Thu Feb 28, 2008 11:06 pm
Reply with quote

rchandran_19 wrote:
Code:
XPD0439 RA105      S46D-18 ABEND AT 000E5E4A  REASON CODE 00000018           
I'd start with the 46D
Explanation: A program issued the ESPIE macro incorrectly
Back to top
View user's profile Send private message
rchandran_19

New User


Joined: 08 Mar 2005
Posts: 34

PostPosted: Thu Feb 28, 2008 11:45 pm
Reply with quote

CICS Guy wrote:
rchandran_19 wrote:
Code:
XPD0439 RA105      S46D-18 ABEND AT 000E5E4A  REASON CODE 00000018           
I'd start with the 46D
Explanation: A program issued the ESPIE macro incorrectly


Thank you, CICS guy.
I dont understand all the explanation over there....I am going to send it to the admin guy, cause I feel its more on the OS level.
Back to top
View user's profile Send private message
dick scherrer

Moderator Emeritus


Joined: 23 Nov 2006
Posts: 19243
Location: Inside the Matrix

PostPosted: Fri Feb 29, 2008 12:23 am
Reply with quote

Hello,

I expect the "admin guy" will pass it back. . .

There will be additional diagnostic info in the output of the run.

My guess without seeing any of the code or other diagnostic info is that there is a problem between the calling and called modules. Has the called module ever been called successfully or is this the first attempt?

Keep in mind that a clean compile does not mean that all is well between the called and calling code.
Back to top
View user's profile Send private message
enrico-sorichetti

Superior Member


Joined: 14 Mar 2007
Posts: 10886
Location: italy

PostPosted: Fri Feb 29, 2008 12:57 am
Reply with quote

the abends are a chain of system abends invoked by
the RTM (recovery termination manager) module ieavtesp

here is the sequence of abends

sa06-04
Quote:
SA06 Explanation: The error was detected during processing of either a LINK(X), LOAD, XCTL(X) or ATTACH(X) macro instruction.
Code Explanation
04 A request block (RB) is requesting a serially reusable program. Another RB associated with the task requested the same program, and that request has not yet been satisfied.


s306-0c
Quote:
306 Explanation: The error occurred during processing of a LINK(X), XCTL(X), ATTACH(X), or LOAD macro.
An incorrect load to global request was attempted, or the authorized routine requested a module that could not be found in an authorized library. The module was found either in an unauthorized library or already loaded in storage but marked as coming from an unauthorized library.
The reason code in register 15 identifies the error:
Code Explanation
04 ...
08 ...
0C An authorized program requested, by a LINK(X), LOAD, XCTL(X) or ATTACH(X) macro, a module in a non-APF-authorized library or concatenation of libraries.


s46d-18
Quote:
46D Explanation: A program issued the ESPIE macro incorrectly:
A hexadecimal reason code in register 15 explains the error:
Code Explanation
04 ...
08 ...
0C ...
10 ...
14 ...
18 The program issuing an ESPIE macro is in a mode that is not valid for one of the following reasons:
* The program is in supervisor state.
* The program that issued the ESPIE macro had a program status word (PSW) storage key that did not match the task control block (TCB) key.


I would check ...
linkage editor attributes
steplib concatenation
for all the program libraries involved
Back to top
View user's profile Send private message
rchandran_19

New User


Joined: 08 Mar 2005
Posts: 34

PostPosted: Fri Feb 29, 2008 2:07 am
Reply with quote

Thank you Mr. enrico-sorichetti and Mr. Scherrer.

This is the first time attempt to call the subroutine in my program also the subroutine is new.

You guys are awesome in response with good explanation.

Thanks.
Back to top
View user's profile Send private message
Douglas Wilder

Active User


Joined: 28 Nov 2006
Posts: 305
Location: Deerfield IL

PostPosted: Fri Feb 29, 2008 2:27 am
Reply with quote

Do you have Abendaid or Fault Analyzer? Either of these could give you the line of COBOL code that abended and the contents of all of the fields at the time of the abend. This makes it so that you almost never need to read the dump again.
Back to top
View user's profile Send private message
rchandran_19

New User


Joined: 08 Mar 2005
Posts: 34

PostPosted: Fri Feb 29, 2008 2:57 am
Reply with quote

Douglas Wilder wrote:
Do you have Abendaid or Fault Analyzer? Either of these could give you the line of COBOL code that abended and the contents of all of the fields at the time of the abend. This makes it so that you almost never need to read the dump again.


I was stepping thru the cobol code with xpediter. And I was told now that we should not use xpediter when there is a dynamic call.
I was told that, because I was using xpediter i was getting the ESPIE abend/error.

Thanks.
Back to top
View user's profile Send private message
dick scherrer

Moderator Emeritus


Joined: 23 Nov 2006
Posts: 19243
Location: Inside the Matrix

PostPosted: Fri Feb 29, 2008 8:11 am
Reply with quote

Hello,

You're welcome icon_smile.gif

As this is the first attempt with these 2 sets of code, you might write a very small program with no real code that is only to test the ability to call the "called" code. You might also write another "stub" to test that the caller will in fact successfully call some other code.

This could help isolate whether there is something that needs to change in one, the other, or both sets of code.

For xpeditor testing, you might use a static call for the initial testing.
Back to top
View user's profile Send private message
rchandran_19

New User


Joined: 08 Mar 2005
Posts: 34

PostPosted: Sat Mar 01, 2008 4:26 am
Reply with quote

dick scherrer wrote:
Hello,

You're welcome :)

As this is the first attempt with these 2 sets of code, you might write a very small program with no real code that is only to test the ability to call the "called" code. You might also write another "stub" to test that the caller will in fact successfully call some other code.

This could help isolate whether there is something that needs to change in one, the other, or both sets of code.

For xpeditor testing, you might use a static call for the initial testing.


That is a very good ideal !!!

It really paid me for using this forum to get great ideas from all you experts.

Thank you.

By-the-Way....Mr Scherrer...is that your real picture against your name??
:)
Back to top
View user's profile Send private message
CICS Guy

Senior Member


Joined: 18 Jul 2007
Posts: 2146
Location: At my coffee table

PostPosted: Sat Mar 01, 2008 4:48 am
Reply with quote

rchandran_19 wrote:
By-the-Way....Mr Scherrer...is that your real picture against your name?? icon_smile.gif
Are you kidding, have you never seen a 'Pink Panther' movie?
Back to top
View user's profile Send private message
rpuhlman

New User


Joined: 11 Jun 2007
Posts: 80
Location: Columbus, Ohio

PostPosted: Sat Mar 01, 2008 4:30 pm
Reply with quote

Hahahahahahaha! I just spit coffee every where! Thanks!
Back to top
View user's profile Send private message
dick scherrer

Moderator Emeritus


Joined: 23 Nov 2006
Posts: 19243
Location: Inside the Matrix

PostPosted: Sat Mar 01, 2008 10:38 pm
Reply with quote

Hello,
Quote:
Thank you.
You're welcome icon_smile.gif

Quote:
By-the-Way....Mr Scherrer...is that your real picture against your name?? icon_smile.gif
Well, not quite - i wear a different style hat. . . Check my "Location" icon_wink.gif

d
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> ABENDS & Debugging

 


Similar Topics
Topic Forum Replies
No new posts SDUMPX macro fails to dump requested ... PL/I & Assembler 5
No new posts Printing a dataset in DUMP format wit... ABENDS & Debugging 2
No new posts Sorry - Trying again: How can we impr... ABENDS & Debugging 2
No new posts adrdssu tool to dump a files from a PDS JCL & VSAM 5
No new posts DUMP A Multi volume datasets and rest... JCL & VSAM 6
Search our Forums:

Back to Top