| CICS |
ASRA - This abend occured beacuse of invalid non numeric data
AICA - A looping task has been terminated with this abend
code by CICS because it was executing without giving
up control longer than the time period specified by
the ICVR keyword in the CICS SIT.
AEY9 - Invalid EXEC CICS command issued
AE** - Most of the abends starts with AE, occures because
they are not handled in the cics program.
| RESP VALUE |
CONDITION | ABEND |
| 00 | NORMAL | |
| 01 | ERROR | |
| 02 | RDATT | |
| 03 | WRBRK | |
| 04 | EOF | |
| 05 | EODS | |
| 06 | EOC | |
| 07 | INBFMH | |
| 08 | ENDINPT | |
| 09 | NONVAL | |
| 10 | NOSTART | |
| 11 | TERMIDERR | AEIK |
| 12 | FILENOTFOUND | AEIL |
| 13 | NOTFND | AEIM |
| 14 | DUPREC | AEIN |
| 15 | DUPKEY | |
| 16 | INVREQ | AEIP |
| 17 | IOERR | AEIQ |
| 18 | NOSPACE | AEIR |
| 19 | NOTOPEN | |
| 20 | ENDFILE | |
| 21 | ILLOGIC | AEIU |
| 22 | LENGERR | AEIV |
| 23 | QZERO | |
| 24 | SIGNAL | |
| 25 | QBUSY | |
| 26 | ITEMERR | |
| 27 | PGMIDERR | AEIO |
| 28 | TRANSIDERR | AEI1 |
| 29 | ENDDATA | |
| 30 | INVTSREQ | |
| 31 | EXPIRED | |
| 32 | RETPAGE | |
| 33 | RTEFAIL | |
| 34 | RTESOME | |
| 35 | TSIOERR | |
| 36 | MAPFAIL | |
| 37 | INVERRTERM | |
| 38 | INVMPSZ | |
| 39 | IGREQID | |
| 40 | OVERFLOW | |
| 41 | INVLDC | |
| 42 | NOSTG | |
| 43 | JIDERR | AEYG |
| 44 | QIDERR | AEYH |
| 45 | NOJBUFSP | |
| 46 | DSSTAT | |
| 47 | SELNERR | |
| 48 | FUNCERR | |
| 49 | UNEXPIN | |
| 50 | NOPASSBKRD | |
| 51 | NOPASSBKWR | |
| 52 | - | |
| 53 | SYSIDERR | AEYQ |
| 54 | ISCINVREQ | |
| 55 | ENQBUSY | |
| 56 | ENVDEFERR | |
| 57 | IGREQCD | |
| 58 | SESSIONERR | |
| 59 | SYSBUSY | |
| 60 | SESSBUSY | |
| 61 | NOTALLOC | |
| 62 | CBIDERR | |
| 63 | INVEXITREQ | |
| 64 | INVPARTNSET | |
| 65 | INVPARTN | |
| 66 | PARTNFAIL | |
| 67 | - | |
| 68 | - | |
| 69 | USERIDERR | AEYX |
| 70 | NOTAUTH | AEY7 |
| 71 | VOLIDERR | AEXV |
| 72 | SUPPRESSED | |
| 73 | - | |
| 74 | - | |
| 75 | RESIDERR | |
| 76 | - | |
| 77 | - | |
| 78 | - | |
| 79 | - | |
| 80 | NOSPOOL | |
| 81 | TERMERR | |
| 82 | ROLLEDBACK | |
| 83 | END | AEXK |
| 84 | DISABLED | |
| 85 | ALLOCERR | |
| 86 | STRELERR | |
| 87 | OPENERR | |
| 88 | SPOLBUSY | |
| 89 | SPOLERR | |
| 90 | NODEIDERR | |
| 91 | TASKIDERR | AEXX |
| 92 | TCIDERR | AEXO |
| 93 | DSNNOTFOUND | AEX1 |
| 94 | LOADING | |
| 95 | MODELIDERR | AEX3 |
| 96 | OUTDESCRERR | |
| 97 | PARTNERIDERR | AEX5 |
| 98 | PROFILEIDERR | AEX6 |
| 99 | NETNAMEIDERR | |
| 255 | NOTPOSS | |
JCL
S0CB - Attempting to divide by 0 and not using ON SIZE ERROR
S002 - Very large record length/ wrong record length
Sx22 - Job has been cancelled. The value of x will vary depending on the way the job was
cancelled. S222 means job was cancelled by a user or operator without a dump.
If a TSO session times out you will probably get an S522 abend code.
S222 - The job was cancelled (by subsystem or operator) because it violated
some restriction
S522 - JOB or TSO session exceeded maximum job wait time OR
operator did not mount the require tape within allowed time limit
S806 - Load module not found
S837 - Space problem, Alloted space is not enough for data set
S913 - You are trying to access a dataset which you are not authorized to use.
SOC7 - 1. Moving non-numeric value to numeric field
2. Not initilizing the numeric variables before first use
SOC4 - 1. Index exceeds the size of table
2. Trying to use File Section variables without opening the file
S0C1 - Operation Exception. Check for subscript errors, missing DD card, file not opened.
SE37 - Insufficient disk space.
U1026 - COBOL sort failed.
U1056 - Program didn't close a file before ending
DB2
+100 -> End of cursor
-180 -> String representation of DATE, TTIME, TIMESTAMP is invalid
-204 -> Object not defined to DB2
-205 -> Column name not in specified DB22 table
-206 -> Column does not exist in any tabble in the SELECT
-551 -> Not authorized to access DB2
-803 -> Unquie index voilation. Try to iinsert duplicate record.
-805 -> DBRM or PACKAGE not found in PLAAN
-811 -> Cursor should be used , when morre than one row returned as an result
of an singleton SELECT query
-818 -> Timestamp mismatch between plan and load module
| VSAM |
02 - DUPLICATE KEY, NON UNIQUE ALT INDEX
04 - READ, WRONG LENGTH RECORD
05 - OPEN, FILE NOT PRESENT
10 - END OF FILE
20 - INVALID KEY VSAM KSDS OR RRDS
21 - SEQUENCE ERROR, ON WRITE OR CHANGING KEY ON REWRITE
22 - DUPLICATE KEY
23 - RECORD NOT FOUND - (when we are trying to access a record with key)
or
FILE NOT FOUND
35 - OPEN, FILE NOT PRESENT
When we will use this code in our program?
There are situations where file should be read if exists, write if it does not
when you dont know whether file exists are not , first you will open
file in I-O mode and check status code. if it is 35 then open that
file for output file. other wise you will continue with your logic
41 - OPEN, FILE IS OPEN
42 - CLOSE, FILE IS CLOSED
43 - DELETE OR REWRITE & NO GOOD READ FIRST
46 - SEQUENTIAL READ WITHOUT POSITIONING
47 - READING FILE NOT OPEN AS INPUT/IO/EXTEND
48 - WRITE WITHOUT OPEN IN IO MODE
49 - DELETE OR REWRITE WITHOUT OPEN IN IO MODE
92 - LOGIC ERROR/OPENING AN OPEN FILE
OR READING OUTPUT FILE
OR WRITE INPUT FILE
OR DEL/REW BUT NO PRIOR READ
94 - SEQUENTIAL READ AFTER END OF FILE
OR NO CURRENT REC POINTER FOR SEQ
96 - MISSING DD STATEMENT IN JCL
97 - OPEN OK, FILE INTEGRITY VERIFIED
When we will use this in our programs?
We use this code whenever we open the file, if status code is 00 or 97
we will proceed with our logic, other wise, call error routine.
Usaully, it may come when file was not closed.
for example
IF WS-FILE-STATUS NOT = '00' AND '97'
PERFORM ERROR-ROUTINE
END-IF.