Note: If you write your own node error program, you must generate a NET, even if
it contains no entries because your error processors do not use it.
Optional common subroutines
The common subroutines are addressed via the CSVT and provide error processors
with the following functions:
v Locate or assign NEBs and ESBs on the basis of node ID and error group index.
v Time stamp an error, update an error count, and test an error count against
numeric and time threshold values.
v Release a dynamically assigned NEB from a particular node.
Optional error processors for 3270 logical units
Two error processors are supplied for 3270 LUs, as follows:
1. Group index 1, error codes X'D9', X'DC', X'DD', and X'F2'.
These error codes correspond to the receipt of sense or status bytes in the user
sense fields of the RPL. The error processor locates an ESB of the standard
format and updates a weighted error count. The weight, threshold, and timer
values are based on those used by the sample terminal error program 3270
except as noted in the previous section. If the threshold is not exceeded, the
abend SEND, abend RECEIVE, abend transaction flags, and all the print action
flags are turned off. Otherwise the default actions are taken and the NEB is
released if it is reusable.
2. Group index 2, error code X'42'.
This code means that no 3270 printer was available to satisfy a print request
made at a 3270 screen. The error processor examines the printers defined for
this screen to determine why they were unavailable. If either is busy on a
previous PRINT or COPY request (that is, a task is attached with a transaction
ID of CSPP or CSCY) or is no longer unavailable, that printer address is
returned to the node abnormal condition program which retries the print request
Node Error Table Node Error Block
NODE ERROR NODE ERROR
TABLE HEADER BLOCK HEADER
NODE ERROR ERROR STATUS
BLOCK BLOCK
PERMANENTLY
ASSIGNED
NEBs
ESBs
DYNAMICALLY
ASSIGNED
NEBs
Figure 26. Format of node error table and node error block
the sample node error program
468
CICS TS for OS/390: CICS Customization Guide