ABEND EVALUATION and

RESOLUTION
On-Call Training

Srinivas Byri
– How do I know job abended?
– look at CA-7 request queue,(e.g. xqm,job=bhfi*)
– Queue list will displays *RST along with the job

– What do I do first?
– look at SYSOUT, return codes, displays
– we will walk through a space abend in
this presentation’s example

– How do I identify the cause?

– space, contention, syntax, bad data, JCL error
– How do I fix the root problem?
– increasing space, researching contention
– we will fix a space error in this presentation’s example

– How do I restart the job?

– restart instructions, JEM/JSCAN

– How do I log the abend?

– Abend Aid, Abend Form
 IMPORTANT NOTE:

• if you are ever in doubt about how to

resolve an abend, please feel free to contact
your back-up or any one else on the team.
– even if you think you have done everything
necessary
• but you just want to run it past someone else
• we all do it!
 FIRST…

– locate SYSOUT in SAM

SAM -DQ- JES2 Queue Information Row 1 to 1 of 1
COMMAND ===> SCROLL ===> CSR

LC JOBNAME JOBID QUEUE C PRI QPOS HDS SAFF SACT STAT TRKGP PCT
S_ CHFNR3FN JOB19114 AWAITING PRINT H 1 1307 Y ANY 2
0******************************* Bottom of data ********************************

– or locate SYSOUT in CA-View

VIEW 2.0 ALL ------------- SYSOUT SELECTION LIST ------------------------------
COMMAND ===> SCROLL ===> PAGE

SEL ID JOBNAME JOBID ARCH DATE/TIME LOC LINES PAGES XCODE

S CHFNR3FN CHFNR3FN J19413 01/31/00 22:56 DISK 228 4
CHFNR3FN CHFNR3FN J19114 01/31/00 22:45 DISK 237 4 SB37
CHFNR3FN CHFNR3FN J11572 01/01/00 00:08 TAPE 223 4
CHFNR3FN CHFNR3FN J11436 12/31/99 23:49 TAPE 232 4 SB37
 TIPS:
=S to get to SAM.
• enter the job name under the Job Selection Criteria (i.e.
J=> CHFNR3FN). Then enter DQ on the command
line…on the following screen, enter S by the job.
=E.CA.R to get to CA-View.
• enter the highlighted fields…you can use the
GENERATION field or DATE field to pull a
specific date if necessary.
– Refer to the next page for an example
 THE EXAMPLE BELOW WILL
PULL ALL DATES
VIEW 2.0 ALL -- PRIMARY SELECTION FOR SYS3.CAVIEW -----------------------------
COMMAND ===>

SYSOUT ID ===> CHFNR3FN SELECT BY ===> R (R, I, IL, or IR)

INDEX NAME ===> VALUE ===>
===> ===>
===> ===>
===> ===>

SELECTION CRITERIA:
GENERATION ===> * (*, ALL, specific (n), relative (-n),
range (n:m or -n:m))
DATE ===> (specific (MM/DD/YY), relative (-n),
range(MM/DD/YY:MM/DD/YY or -n:m))

SELECTION OPTIONS: Only specify to restrict selection

EXCEPTIONS ===> X exceptions only, NX non exceptions only, AX/(blank) any
PERMANENT ===> P permanent only, NP non permanent only, AP/(blank) any

Enter END command to terminate this VIEW 1.7 session.

 FIND THE ABENDING STEP
AND THE RETURN CODE
ABEND JOB STEP DD
CODE NAME NAME NAME

.22.45.18 JOB19114 IEC030I B37-04,IFG0554A,CHFNR3FN,JS010,SYSPRINT,0878,NKW118

.22.45.18 JOB19114 IEA995I SYMPTOM DUMP OUTPUT
. SYSTEM COMPLETION CODE=B37 REASON CODE=00000004
. TIME=22.45.18 SEQ=38772 CPU=0000 ASID=00F5
. PSW AT TIME OF ERROR 075C1000 80E709FA ILC 2 INTC 0D
. NO ACTIVE MODULE FOUND
. NAME=UNKNOWN
. DATA AT PSW 00E709F4 - 4100381E 0A0DB20A 00509808
. GPR 0-3 00E70BF8 A4B37000 00005C30 00E703DA
. GPR 4-7 009C64A8 00E88000 009C674C 009C67A4
. GPR 8-11 009C676C 009C4060 00F24138 00008890
. LAST 00000004
GPR 12-15 009B20C8 00000080 00E70834
JOB
. END OF SYMPTOM DUMP
STEP
.22.45.18 JOB19114 *IEF450I CHFNR3FN JS010 - ABEND=SB37 U0000 REASON=00000004 CL=H
. TIME=22.45.18
.22.45.19 JOB19114 MVS0010I CHFNR3FN 00.031 H JS010 ** SB37 **
.22.45.19 JOB19114 IEF404I CHFNR3FN - ENDED - TIME=22.45.19
.22.45.19 JOB19114 $HASP395 CHFNR3FN ENDED 203 LINES 0 CARDS CL=N
.------ JES2 JOB STATISTICS ------
. 31 JAN 2000 JOB EXECUTION DATE
. 99 CARDS READ
.ACC20210-A INCSEC FOR DD=SYSPRINT DSN=SYS00031.T224136.RA000.CHFNR3FN.MTDRPTA.H
.ACC20450-A SECONDARY SPACE SET TO 90 BLK (150% OF 60)
.IEC030I B37-04,IFG0554A,CHFNR3FN,JS010,SYSPRINT,0878,NKW118,SYS00031.T224136.RA
.IEA995I SYMPTOM DUMP OUTPUT
.SYSTEM COMPLETION CODE=B37 REASON CODE=00000004
. TIME=22.45.18 SEQ=38772 CPU=0000 ASID=00F5
. PSW AT TIME OF ERROR 075C1000 80E709FA ILC 2 INTC 0D
. NO ACTIVE MODULE FOUND
. NAME=UNKNOWN
. DATA AT PSW 00E709F4 - 4100381E 0A0DB20A 00509808
. GPR 0-3 00E70BF8 A4B37000 00005C30 00E703DA
. GPR 4-7 009C64A8 00E88000 009C674C 009C67A4
. GPR 8-11 009C676C 009C4060 00F24138 00008890
. GPR 12-15 009B20C8 00000080 00E70834 00000004
 TIPS:

• have a list of System Return Codes.

– list is located in the On-Call Manual
• return codes that begin with 'U' are User
Abends
– this usually means the programmer coded for
this abend and probably provided displays
• look in the SYSOUT of the abending step to find
these displays.
 FIXING A SPACE PROBLEM

• Find Current Space Parameter

//*******************************************************************
//*** JS010 - PROGRAM REPORTS RECORDS WITH PLANT EQUAL TO 11 OR ***
//*** NA AND GENERAL LEDGER EQUAL TO 8390 ***
//*** RESTART FROM THIS STEP ***
//*******************************************************************
//*JCLLIB=PCHFN.MBICH.JCLPAN U
//*
//JS010 EXEC PGM=EASYTREV
//FILEA DD DSN=PBHFI.DS3JW.S8293508.MDCN.ME,
// DISP=(SHR,KEEP,KEEP)
//FILEB DD UNIT=SYSDA,
// SPACE=(CYL,(2,2),RLSE)
//SYSIN DD DSN=PCHFN.MBICH.SYSIN(DR3IFN01),
SPACE NEED TO
// DISP=SHR BE CHANGED
//SYSOUT DD SYSOUT=*
//SYSPRINT DD DSN=&&MTDRPTA,
// DISP=(,PASS,DELETE),
// UNIT=SYSDA,
// SPACE=(10796,(60,60),RLSE),
// DCB=(RECFM=FBA,LRECL=133,BLKSIZE=00000,DSORG=PS)
 RESTARTING

• Edit JCL in CA7

• after putting on hold
File Edit Confirm Menu Utilities Compilers Test Help

-------------------------------------------------------------------------------

EDIT SYS99134.T140851.RA000.TUAJD71.CA7EDIT.H02 Columns 00001 00072

Command ===> Scroll ===> CSR

****** ***************************** Top of Data ******************************

000001 //CHFNR3FN JOB (TJM5CM),’ENG. BUDGET ANAL.',

000002 // CLASS=H,

000003 // MSGCLASS=7,

000004 //*

000005 //JESWTR OUTPUT JESDS=ALL ,DEST=PLIPC4B,DEFAULT=YES

000006 //*
 EDIT JCL in CA7 (continued)

• Increase the space

//*******************************************************************
//*** JS010 - PROGRAM REPORTS RECORDS WITH PLANT EQUAL TO 11 OR ***
//*** NA AND GENERAL LEDGER EQUAL TO 8390 ***
//*** RESTART FROM THIS STEP ***
//*******************************************************************
//*JCLLIB=PCHFN.MBICH.JCLPAN U
//*
//JS010 EXEC PGM=EASYTREV
//FILEA DD DSN=PBHFI.DS3JW.S8293508.MDCN.ME,
// DISP=(SHR,KEEP,KEEP)
//FILEB DD UNIT=SYSDA,
// SPACE=(CYL,(2,2),RLSE)
//SYSIN doubled
DD DSN=PCHFN.MBICH.SYSIN(DR3IFN01),
// DISP=SHR space
//SYSOUT DD SYSOUT=*
//SYSPRINT DD DSN=&&MTDRPTA,
// DISP=(,PASS,DELETE),
// UNIT=SYSDA,
// SPACE=(10796,(120,120),RLSE),
// DCB=(RECFM=FBA,LRECL=133,BLKSIZE=00000,DSORG=PS)
 FOLLOW RESTART
INSTRUCTIONS (continued)
File Edit Confirm Menu Utilities Compilers Test Help
-------------------------------------------------------------------------------
EDIT SYS99134.T140851.RA000.TUAJD71.CA7EDIT.H02 Columns 00001 00072
Command ===> Scroll ===> CSR
****** ***************************** Top of Data ******************************
000001 //CHFNR3FN JOB (TJM5CM),’ENG. BUDGET ANAL.',
000002 // CLASS=H,
000003 // MSGCLASS=7,RESTART=JS010 Add this restart
card to the job card
000004 //*
000005 //JESWTR OUTPUT JESDS=ALL ,DEST=PLIPC4B,DEFAULT=YES
000006 //*
000007 //Q001 OUTPUT DEST=TRDNN1A, ** CH40 **
000008 // FCB=SS8,
000009 // FORMS=S331,
000010 // ROOM=CH40,
000011 // CHARS=GT12,
000012 // COPIES=1,
000013 //*
000014 //*********************************************************************
:
 RUN JEM or JSCAN
File Edit Confirm Menu Utilities Compilers Test Help
-------------------------------------------------------------------------------
EDIT SYS99134.T141042.RA000.TUAJD71.CA7EDIT.H02 Columns 00001 00072
Command ===> Scroll ===> CSR
****** ***************************** Top of Data ******************************
==MSG> *** ERROR SUMMARY AND COUNTS *** JEM 6.11RA 05/14/1999 14:11:14
==MSG> 0 ADVISORY LEVEL
==MSG> 0 WARNING LEVEL
==MSG> 0 ERROR LEVEL
==MSG> 0 TOTAL ISSUED 0 SUPPRESSED.
==MSG> THE HIGHEST SEVERITY CODE ENCOUNTERED WAS 00.
000001 //CHFNR3FN JOB (TJM5CM),’ENG. BUDGET ANAL.',
000002 // CLASS=H,
000003 // MSGCLASS=7,RESTART=JS010

000004 //*
000005 //JESWTR OUTPUT JESDS=ALL ,DEST=PLIPC4B,DEFAULT=YES
000006 //*
000007 //Q001 OUTPUT DEST=TRDNN1A, ** CH40 **
000008 // FCB=SS8,
000009 // FORMS=S331,
000010 // ROOM=CH40,
000011 // CHARS=GT12,
000012 // COPIES=1,
000013 //*
000014 //*********************************************************************
:
RESUBMIT JOB (after you release it since you
put it on hold to edit it)

. . . . . . . . . . . . . . . . . . . . . . . . . . .

-------------- CA-7 QUEUE MAINTENANCE - CPU JOBS STATUS (RQMTS) --------------

F-JOBNAME---J--I--E--U--N-SHJV
F CHFNR3FN . . . . . *RST JOB: BHFI*
CHFNR3FD . . . . . S
SEQ: JOBNAME
QUEUE: REQ
LIST: ANY

FUNCTIONS:
C=CANCEL
F=RESTART
H=HOLD
J=JCLOVRD
P=RSVP
Q=REQUEUE
R=RELEASE
S=SUBTM OFF
U=UPDATE
V=VERIFY
X=RQMT POST
E=EDIT QJCL
PROGRAM: QM20 MSG-INDX: 00 -- QM.1-M -- 00.034 / 02:16:52
MESSAGE: ENTER FUNCTION IN 'F' FIELD OR ENTER A COMMAND ON THE TOP LINE
 RESUBMIT JOB (continued)
------------ CA-7 QUEUE MAINTENANCE - CPU JOB IN RESTART STATUS -----------
JOB: CHFNR3FN CODE: SB37 LAST-STEP: JS010 MCNT: 003
CA-7#: 4052 JES#: 19114 NODE-NAME: LOCAL

REASON: SB37

-- X -- RESUBMIT FOR PRODUCTION

-- -- FORCE COMPLETE

-- -- CA-11 RESTART/RERUN PSEUDO:

START: END:
CC: BYPGDG: USAGE: LRTCD: = 0
CMT STATUS: JOB NOT FOUND IN CMT

-- -- SET PARM DATA FOR RMS AND RESUBMIT

PARM:

-- -- DO NOT INSERT RMS PROC BUT RESUBMIT

PROGRAM: QM20 MSG-INDX: 00 -- QM.1-M -- 00.034 / 02:18:51

MESSAGE: ENTER FUNCTION IN 'F' FIELD OR ENTER A COMMAND ON THE TOP LINE
 TIPS
 use the Abend Form to capture the necessary
information about the abend.
 reference handout
 =A.A to enter Abend Aid.
 Use option A to ADD a log entry.
----------------------------- Abend Log Menu ---------------------------- SPO
OPTION ===> A

Select the option desired:

A ADD Add an abend log entry

S SCAN Search abend log index, browse or edit logs
Z CONVERT Convert abend log index to new format

Year ===> 99
 WRAP UP

 questions
 call someone if you need to
 always call an expert about unusual abends
– S0C7, +100, -803
• refer to the EASE ABEND LOG ENTRY
• refer to the ABEND CHECKLIST
Thank you