.-SYSTEM-. >>-DFHSRT--TYPE=--+--------+--,ABCODE=(abend-code,...)----------> '-USER---' >--+--------------------+-------------------------------------->< | .-NO--. | '-,RECOVER=--+-----+-' '-YES-'
If you code TYPE=SYSTEM, this abend code must be three hexadecimal digits (xxx) representing the MVS system abend code Sxxx.
If you code TYPE=USER, this abend code must be a decimal number (nnnn) representing the user part of the MVS abend code Unnnn. This is usually the same number as the CICS message that is issued before CICS tries to terminate abnormally.
001,002,013,020,025,026,030,032,033,034,035,
036,037,03A,03B,03D,052,053,067,0D3,0D4,0D5,
0D6,0D7,0D8,0E0,0F3,100,113,137,202,213,214,
237,283,285,313,314,337,400,413,437,513,514,
613,614,637,713,714,737,813,837,913,A13,A14,
B13,B14,B37,D23,D37,E37
Abend code 0F3 covers various machine check conditions. It also covers the Alternate Processor Retry condition that can occur only when running on a multiprocessor. CICS-supplied recovery code attempts to recover from instruction-failure machine checks on the assumption that they are not permanent. It also attempts to recover from Alternate Processor Retry conditions.
DFHSRT TYPE=INITIAL
DFHSRT TYPE=FINAL
END
There is no need to list the standard codes individually.
DFHSRT TYPE=INITIAL
DFHSRT TYPE=SYSTEM,or USER,
ABCODE=(user or system codes),
RECOVER=YES
DFHSRT TYPE=FINAL
END