对起触角的内容进行寻址
当发生错误时,由终端控制程序创建性,并包含 BSAM 提供的所有 I/O 错误信息。
关于此任务
要解决并作为用户编写的终端错误程序的内容,应按顺序包含 COPY DFHTACLE 和 COPY DFHTCTLE 语句。 这些定义了完整的 DFHTCTLE DSECT。 此 DSECT 中的符号名称用于对与该错误相关联的性行条目和实行条目中的字段进行寻址。
"触角" 由一个 16 字节的前缀 (由 COPY DFHTACLE 定义) 和另一个 48 字节的部分组成,后者是创建 "触角" 时实行条目的 DECB 的修改副本。
为了解决起触角,用户编写的终端错误程序应因此包含以下语句:
COPY DFHTACLE
COPY DFHTCTLE
L TCTLEAR,TEPCATCA POINT TO TACLE
USING DFHTCTLE,TCTLEAR请注意,字段通常是实际行条目 DECB 的一部分,但在性中的偏移量增加了 16。
触角中的 DECB 副本中的以下字段 不 表示来自实际行条目的数据副本:
TCTLEDCB (Offset 24 in TACLE,
8 in real TCTLE)"触角" 中的此字段指向实际行条目; 在实际行条目中,它指向行组的 BSAM DCB。
TCTLECSW (Offsets 46, 48 in TACLE,
TCTLEALP 30, 32 in real TCTLE)这些在所致 SAM 错误信息中使用。
以下语句提供对 real 行条目的直接寻址能力:
COPY DFHTCTLE
COPY DFHTCTTE
L TCTLEAR,TEPCATCA POINT TO TACLE
USING DFHTCTLE,TCTLEAR
L TCTTEAR,TCTLEPTE POINT TO ERROR TCTTE
USING DFHTCTTE,TCTTEAR
DROP TCTLEAR
L TCTLEAR,TCTTELEA POINT TO TCTLE
USING DFHTCTLE,TCTLEAR 在执行所需功能并 (可选) 更改 DFHTACP 调度的缺省操作之后,用户编写的 DFHTEP 必须通过发出 EXEC CICS RETURN 命令将控制权返回给 DFHTACP。 然后, DFHTACP 会执行性中指定的操作,并导致错误处理任务终止。
所致 DSECT 的格式如 图 1所示。图 1。 "触角 Dsect: 终端异常" 条件行项的格式描述
图 2。 ▲ Dsect 格式的文本描述: 终端异常条件行项

Displacement
Dec Hex Code Bytes Label Meaning
0 0 4 TCTLEPSA Storage accounting
RESERVED
8 8 1 TCTLEPFL Error flags
81 Message too long
84 TCT search error
85 Write not valid
87 Unsolicited input
88 Input event rejected
8C Output event rejected
8D Output length of zero
8E No output area
8F Output area exceeded
94 Unit check
95 Unit check
(should not occur)
96 Unit exception
97 Unit exception
(should not occur)
99 Undetermined I/O error
9F Invalid destination
(TCAM: no longer supported)
.
. (All codes not listed are reserved and are
. not intended for use by DFHTEP)
.
9 9 1 TCTLEPF2 Special indicator
01 dummy terminal
12 C 4 TCTLEPTE Address of terminal
entry for terminal
in error
16 10 4 TCTLEECB DECB/copy of line
when error occurred
60 3C 4 TCTLEOA For TCAM lines only.
(No longer supported)