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

Abend Information How to get Formatted DUMP


IBM Mainframe Forums -> JCL & VSAM
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
syandra

New User


Joined: 30 May 2003
Posts: 1

PostPosted: Fri May 30, 2003 5:49 am
Reply with quote

Hi,

Can anyone please help me understanding the DUMP messages, when a job gets abended.


Thanks,
Sukumar
Back to top
View user's profile Send private message
mcmillan

Site Admin


Joined: 18 May 2003
Posts: 1210
Location: India

PostPosted: Sun Jun 01, 2003 6:05 pm
Reply with quote

But you forget to mention which dump you need to be described!

There are 4 dumps and 5 Listings available

Quote:
1. Formatted Dump
2. SNAP Dump
3. System Dump
4. COBTEST Dump


Quote:
1. Source Listing
2. Procedure Cross reference Listing
3. Data Division map Listing
4. Nested Program listing
5. Diagnostic Message LISTING


I assume your program may be written in VS COBOL II..

Code:

+-------------------------------------------------------------------------------------------------------+
?                                                   
?   --- VS COBOL II Formatted Dump at ABEND ---             
?                                   
?   Program = 'DUMPPGM'     =>Program name                                                                                       
?   Completion code = 'U1035'       => Program Completion code upto Abend                                                                             
?   PSW at ABEND = '000400CA60F39A78'     => Program Status Word at ABEND time                         
?   The ABEND address was outside of mainline COBOL code.        => Abend Address                                 
?   Optimization was in effect for this program.                 => under OPTIMIZE compiler option                                 
?   The relative address of the next instruction to be executed:                                                     
?   '00F19A78'                   => Relative address of Next Instruction                           
?   The GP registers at entry to ABEND were      => Values in General Purpose Registers                                               
?       Regs  0 - 3  - '80000000  8000040B  0000040B  00042164'                                                     
?       Regs  4 - 7  - '00030DA8  00045B98  00042170  000422E2'                                                     
?       Regs  8 - 11 - '00024BBC  00045B98  00026894  0003EF80'                                                       
?       Regs 12 - 15 - '40045D9A  00030D60  50045DF6  00035920'                                                     
?   Data Division dump of 'DUMPPGM'                                                                                   
?   000180 FD DUMPPGM.FILE-1 FD           => File Description details if declared                                                                       
?   FILE SPECIFIED AS:                                                                                             
?     ORGANIZATION=SEQUENTIAL   ACCESS MODE=SEQUENTIAL                                                               
?     RECFM=FIXED BLOCKED                                                                                             
?   CURRENT STATUS OF FILE IS:                                                                                     
?     QSAM STATUS CODE=35                  => File status Code at program ends                                                                               
?   000240 01 DUMPPGM.RECORD-1 X(80)                                                                                 
?                                                         ADDRESS CANNOT BE CALCULATED               
?   000264 01 DUMPPGM.FILLER AN-GR                      => Alphanumeric Group item                                                         
?   000265 02 DUMPPGM.ABEND-ITEM1 S9999                                                                             
?         CMP    ===>+0010                                        => Numeric Computational item                               
?   000266 02 DUMPPGM.ABEND-ITEM2 S9999                                                                             
?         CMP3    ===>+0000                                         => Numeric Packed Decimal item                                   
?   000270 01 DUMPPGM.EOF-SW X                                                                                         
?         DISP    ===>                                      => Alphanumeric Display item                                 
?   000295 01 DUMPPGM.WORK-RECORD AN-GR       => Alphanumeric Group item                                                                       
?   000300 02 DUMPPGM.W-EMPLOYEE-NO 9(6)                                                                             
?                                                    INVALID DATA FOR THIS DATA TYPE               
?         DISP    HEX>000000          => Value that causes the ABEND                                       
?                     000000                                                                                         
?   000305 02 DUMPPGM.NAME-FIELD AN-GR                                                                             
?   000310 03 DUMPPGM.FIRST-NAME X(10)                                                                             
?   .                                                                                                                 
?   .                                                                                                                 
?   .                                                                                                                 
?   --- End of VS COBOL II Formatted Dump at ABEND ---                                                                 
?                                                                                                                   
+----------------------------------------------------------------------------------------------------+
Back to top
View user's profile Send private message
mcmillan

Site Admin


Joined: 18 May 2003
Posts: 1210
Location: India

PostPosted: Tue Jun 03, 2003 11:36 pm
Reply with quote

Another way to learn about Error Messages:

COMPILE this program and check your JCL OUTPUT messages.
Code:
IDENTIFICATION DIVISION.
PROGRM-ID. ERRMSG.
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 -> JCL & VSAM

 


Similar Topics
Topic Forum Replies
No new posts ISAM and abend S03B JCL & VSAM 9
No new posts Capturing Job Execution Information All Other Mainframe Topics 3
No new posts Abend S0C4 11 (Page Translation Excep... PL/I & Assembler 16
No new posts WER999A - UNSUCCESSFUL SORT 8ED U Ab... SYNCSORT 5
No new posts the system or user abend SF0F R=NULL COBOL Programming 0
Search our Forums:

Back to Top