Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
Find the line at which error happens using offset value

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM
View previous topic :: :: View next topic  
Author Message
mrright

New User


Joined: 07 Jan 2004
Posts: 4

PostPosted: Fri Jun 11, 2004 2:45 pm    Post subject: Find the line at which error happens using offset value
Reply with quote

Hello Everybody,

I have doubt for long time. How to find the line at which error happens using offset value. please help me
Back to top
View user's profile Send private message

mrright

New User


Joined: 07 Jan 2004
Posts: 4

PostPosted: Fri Jun 11, 2004 3:07 pm    Post subject: offset
Reply with quote

hai again,

I go other quries regarding detecting of error using error.
Can anyone please show me with good examples.

Thanks and Regards
mrright
Back to top
View user's profile Send private message
mrright

New User


Joined: 07 Jan 2004
Posts: 4

PostPosted: Fri Jun 11, 2004 3:10 pm    Post subject: offset
Reply with quote

Sorry, i have typed my query uncorrectly.
My query is can anyone give me some good examples to detect error using offset.

Thanks and regards
mrright
Back to top
View user's profile Send private message
mmwife

Super Moderator


Joined: 30 May 2003
Posts: 1592

PostPosted: Tue Jun 15, 2004 12:21 am    Post subject:
Reply with quote

First recompile your pgm using these 2 COBOL parms along with the others: : LIST,NOOFF.

This will give you a listing similar to that below.

Use the 2nd column (e.g. 00066C) to match with the offset addr from the dump listing. When the 2 addresses match you've found the offending assembler language instruction.

Now proceed back up the page untill you come to a COBOL reserved word (e.g. when). The numer to its left is the number of the COBOL stmt that caused the abend.

Find that stmt in your listing and you've found the offending COBOL stmt.

HTH, Jack.


000188 EVALUATE
000189 WHEN
00066C 95F1 7002 CLI 2(7),X'F1'
000670 4770 B294 BC 7,660(0,11)
000674 47F0 B298 BC 15,664(0,11)
000678 GN=9 EQU *
000678 47F0 B2CC BC 15,716(0,11)
00067C GN=35 EQU *
000190 IF
00067C 9500 8021 CLI 33(8),X'00'
000680 4740 B2C8 BC 4,712(0,11)
000684 957F 8021 CLI 33(8),X'7F'
000688 4720 B2C8 BC 2,712(0,11)
000191 COMPUTE
00068C F270 D118 7001 PACK 280(8,13),1(1,7)
000692 4F20 D118 CVB 2,280(0,13)
000696 4C20 A028 MH 2,40(0,10)
00069A 5A20 A014 A 2,20(0,10)
00069E 4842 8002 LH 4,2(2,8)
0006A2 4820 8022 LH 2,34(0,8)
0006A6 1A24 AR 2,4
0006A8 4020 8022 STH 2,34(0,8)
0006AC GN=11 EQU *
0006AC 47F0 B374 BC 15,884(0,11)
0006B0 GN=34 EQU *
000194 WHEN
0006B0 95F0 7002 CLI 2(7),X'F0'
0006B4 4770 B2D8 BC 7,728(0,11)
0006B8 47F0 B2DC BC 15,732(0,11)
0006BC GN=12 EQU *
0006BC 47F0 B310 BC 15,784(0,11)
0006C0 GN=37 EQU *
PP 5655-G53 IBM Enterprise COBOL for z/OS and OS/390 3.2.0
000195 IF
0006C0 9580 8021 CLI 33(8),X'80'
0006C4 4740 B30C BC 4,780(0,11)
0006C8 95FF 8021 CLI 33(8),X'FF'
0006CC 4720 B30C BC 2,780(0,11)
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts -502 Error - Cursor already open anand jeyapaul DB2 7 Sun Oct 29, 2017 4:22 am
No new posts line 52: Name or string > 250 char... Ashishpanpaliya CLIST & REXX 5 Sat Oct 14, 2017 2:29 am
No new posts IEW2456E error when link-editing a C ... Senthilraj JCL & VSAM 0 Fri Oct 13, 2017 3:12 pm
No new posts How to write Rexx program to size and... sreejeshcs CLIST & REXX 14 Thu Oct 12, 2017 7:26 am
No new posts FTP Skip or ignore error and process ... AJAYREDDY All Other Mainframe Topics 3 Wed Sep 27, 2017 8:12 pm

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us