Example Of A User-Written Terminal Error Program - IBM SC34-6814-04 Customization Manual

Cics transaction server for z/os
Table of Contents

Advertisement

Displacement
Dec
Hex
Code
Bytes Label
0
0
4
8
8
1
81
84
85
87
88
8C
8D
8E
8F
94
95
96
97
99
9F
.
.
(All codes not listed are reserved and are
.
not intended for use by DFHTEP)
.
9
9
1
01
12
C
4
16
10
4
60
3C
4
Figure 27. Format description of the TACLE DSECT (part 2)

Example of a user-written terminal error program

The "DFHTEP recursive retry routine" on page 476 is an example of the logic steps
necessary to design a portion of the terminal error program. In Figure 28 on page
477, 10 retries are provided for each terminal; however, the logic could be used for
any number of retries. The following assumptions are made:
USER FIELD A
(PCISAVE)
USER FIELD B
Meaning
TCTLEPSA
Storage accounting
RESERVED
TCTLEPFL
Error flags
Message too long
TCT search error
Write not valid
Unsolicited input
Input event rejected
Output event rejected
Output length of zero
No output area
Output area exceeded
Unit check
Unit check
(should not occur)
Unit exception
Unit exception
(should not occur)
Undetermined I/O error
Invalid destination
(TCAM: no longer supported)
TCTLEPF2
Special indicator
dummy terminal
TCTLEPTE
Address of terminal
entry for terminal
in error
TCTLEECB
DECB/copy of line
when error occurred
TCTLEOA
For TCAM lines only.
(No longer supported)
represents a 6-byte field in the process control information (PCI) area of the
TCTTE. This field is used to preserve the count of input and output from the
TCTTE when the first error occurs. These counts are contained in 3-byte fields
located at TCTTENI and TCTTENO within the TCTTE.
Chapter 8. Writing a terminal error program
475

Advertisement

Table of Contents
loading

Table of Contents