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

what's the different between "OFFSET" in EDF sessi


IBM Mainframe Forums -> CICS
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
alexchen01

New User


Joined: 22 Nov 2005
Posts: 2

PostPosted: Thu Nov 27, 2008 1:39 pm
Reply with quote

Hi all, I have a question, when I debug a program with EDF utility, an ASRA abend occur, and I saw offset "00072A" in a program, but when I try to find message in JESSYSLG, the offset of message is different from the EDF session, it is "000750" , why?


the EDF session :
TRANSACTION: DE04 PROGRAM: DEMO04 TASK: 0017643 APPLID: CICSAAAA DISPLAY: 00
STATUS: AN ABEND HAS OCCURRED
COMMAREA = '.'
EIBTIME = 153816
EIBDATE = 0108332
EIBTRNID = 'DE04'
EIBTASKN = 17643
EIBTRMID = '6272'

EIBCPOSN = 1
EIBCALEN = 1
EIBAID = X'F1' AT X'1D1D00EA'
EIBFN = X'0000' AT X'1D1D00EB'
EIBRCODE = X'000000000000' AT X'1D1D00ED'
EIBDS = '........'
+ EIBREQID = '........'
OFFSET:X'00072A' INTERRUPT: DATA EXCEPTION
ABEND : ASRA PSW: X'078D2000 9DF13750 00060007'

ENTER: CONTINUE
PF1 : UNDEFINED PF2 : SWITCH HEX/CHAR PF3 : END EDF SESSION
PF4 : SUPPRESS DISPLAYS PF5 : WORKING STORAGE PF6 : USER DISPLAY
PF7 : SCROLL BACK PF8 : SCROLL FORWARD PF9 : STOP CONDITIONS
PF10: PREVIOUS DISPLAY PF11: EIB DISPLAY PF12: REGISTERS AT ABEND




the JESSYSLG:

DFHAP0001 CICSAAAA An abend (code 0C7/AKEA) has occurred at offset X'00000750' in module DEMO04.
DFHME0116 CICSAAAA
(Module:DFHMEME) CICS symptom string for message DFHAP0001 is
PIDS/5655M1500 LVLS/640 MS/DFHAP0001 RIDS/DFHSRP PTFS/UK05645
AB/S00C7 AB/UAKEA RIDS/DEMO04 ADRS/00000750
DFHDU0205 CICSAAAA A SYSTEM DUMP FOR DUMPCODE: AP0001 , WAS SUPPRESSED BY THE GLOBAL SYSTEM DUMP SUPPRESSION OPTION
Back to top
View user's profile Send private message
Earl Haigh

Active User


Joined: 25 Jul 2006
Posts: 475

PostPosted: Thu Nov 27, 2008 11:01 pm
Reply with quote

Why does it matter ? Just fix the OC7 problem in the program and move on.
Back to top
View user's profile Send private message
alexchen01

New User


Joined: 22 Nov 2005
Posts: 2

PostPosted: Fri Nov 28, 2008 7:49 am
Reply with quote

because fixing it , I need to locate the instruction in cobol source by the offset in complie listing. which offset should I need ?
Back to top
View user's profile Send private message
Bill O'Boyle

CICS Moderator


Joined: 14 Jan 2008
Posts: 2501
Location: Atlanta, Georgia, USA

PostPosted: Fri Nov 28, 2008 8:12 am
Reply with quote

The OFFSET to look for in the compilation is at X'750'. Compile the program using the options LIST,NOOFFSET, which will produce the Assembler expansion and you'll be able to see the exact instruction being executed at X'750', which is probably a packed-decimal instruction (IE: ZAP).

What's missing here is the length of the COBOL CICS Stub, which is X'26' in length and is never accounted for in the CEDF abend.

So, X'72A' plus X'26' = X'750'.

HTH....

Regards,

Bill
Back to top
View user's profile Send private message
Earl Haigh

Active User


Joined: 25 Jul 2006
Posts: 475

PostPosted: Fri Nov 28, 2008 10:56 pm
Reply with quote

Quote:
because fixing it , I need to locate the instruction in cobol source by the offset in complie listing. which offset should I need ?


seems to me you have 2 choices, either the CEDF offset, or the
the jes log msg. You could look at both, and if one doesn't look
like it could be the problem, then it has to be the other.

However, I would use the X'750' Jes log as Bill points out'
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 -> CICS

 


Similar Topics
Topic Forum Replies
No new posts PuTTY - "User is not a surrogate... IBM Tools 5
No new posts Newbie Stuck on "Duplicate Datas... TSO/ISPF 5
No new posts RABBIT HOLE NEEDED - "Live"... All Other Mainframe Topics 0
No new posts Using PARM=('JPn"&SYMBOL&quo... DFSORT/ICETOOL 2
No new posts Syncsort "Y2C" Function SYNCSORT 1
Search our Forums:

Back to Top