DBUGPPM1 Error

arun nehra · New User Joined: 29 Nov 2008 Posts: 62 Location: mumbai

Hi Everyone,

While doing XPED Online (COBOL/CICS module) testing i am getting the below error message which says:

MODULE: DBUGPPM1 +++++++++++ No source available. Use HELP key ++++++++++++
CAUSE: PROGRAM CHECK ABEND CODE: ASRA
APPLID: ITO5R153 USERID: XXXXXXX TERM: N400 NETNAME: TPA67097 TRAN: CECI
INTERRUPT OFFSET: 001C9A ADDRESS: 80296C3A PSW: 478D2000 00000000 00040010
RESUME OFFSET: 001C9A ADDRESS: 80296C3A LAST CICS COMMAND:

This is happening when i am executing either of the two CICS commands

EXEC CICS
ASSIGN
APPLID(WS-CICS-APPLID)
END-EXEC

or

EXEC CICS
READ
FILE (WC-AXX-XXXX-XXXX-XX-DDNAME)
INTO (WS-AXXXXX-XXXX-XXX-XXX-LOG)
LENGTH (LENGTH
OF WS-AXXXXX-XXXX-XXX-XXX-LOG)
RIDFLD (WS-AXXXXX-XXXX-XXX-LOG-KEY
OF WS-AXXXXX-XXXX-XXX-XXX-LOG)
RESP (WS-RESP-CODE)
END-EXEC

Can someone help why this is heppening.

Regards
Arun

Nic Clouston · Posted: Thu Aug 01, 2013 3:01 pm

What have you found out so far? Or did you just sy to yourself "I don't know what this is - I'll post on the forum"?

arun nehra · New User Joined: 29 Nov 2008 Posts: 62 Location: mumbai

Further to add, As i understand DBUGPPM1 is a system module and and is available for use and thus not sure i am getting the above ASRA abend related to this module. CEMT indicates this module is available for use:

I PROG(DBUGPPM1)
STATUS: RESULTS - OVERTYPE TO MODIFY
Prog(DBUGPPM1) Leng(0000189448) Ass Pro Ena Pri Ced
Res(001) Use(0000000008) Bel Uex Ful Qua Cic Nat

Robert Sample · Posted: Thu Aug 01, 2013 4:40 pm

First, there is little chance that this is a problem with the Xpediter code. AND, if it is a problem with the Xpediter code, you are wasting your time and our time by posting here -- the ONLY way you can get help for an Xpediter code issue is through the vendor Compuware.

Second, the most likely cause of the problem is something your program is doing; if you have trouble finding out what your program did to cause an abend, then you SHOULD go to Compuware and ask them for debugging help since you have the Xpediter code processing.

arun nehra · New User Joined: 29 Nov 2008 Posts: 62 Location: mumbai

The better way to answer this would have, We can't help plz go to compuware for any further assistance.

dick scherrer · Posted: Thu Aug 01, 2013 7:21 pm

Hello,