put-message 出口
每当 CSD 更新批处理实用程序 DFHCSDUP 发出消息时,都会调用 put-message 出口。
如果您正在 TSO 下运行,那么在操作程序输入高度注意中断之后,可以使用此出口来终止 DFHCSDUP。 (请参阅 从用户程序调用 DFHCSDUP。) 或者,您可以使用它以操作员的本地语言提供消息。
即使提供了此出口,也始终会将消息额外写入缺省输出文件 (即,写入 SYSPRINT ,或者写入在与 DFHCSDUP 的条目链接上指定的替换 ddname)。
调用时机
将发出消息时调用。
特定于出口的参数
- UEPMNUM
- 包含消息号的 4 字符字段的地址
- UEPMDOM
- 保留的
- UEPINSN
- 包含插入字段数的 2 字节字段的地址
- 厄瓜多尔皮纳萨大学
- 以下消息结构的地址:
DS F Reserved
INS_1_TEXT_PTR DS A Address of insert 1
INS_1_LEN_PTR DS A Address of a fullword containing
the length of insert 1
DS F Reserved
DS F Reserved
INS_2_TEXT_PTR DS A Address of insert 2
INS_2_LEN_PTR DS A Address of a fullword containing
the length of insert 2
DS F Reserved
...
DS F Reserved
INS_n_TEXT_PTR DS A Address of insert n
INS_n_LEN_PTR DS A Address of a fullword containing
the length of insert n
DS F Reserved
特定于出口的参数仅提供消息号和插入字段,以使您能够以 TSO 操作员的语言提供消息。 UEPINSA 所指向的结构会重复 UEPINSN 要求的次数。
返回码
- UERCNORM (X'00 ')
- 继续处理。
- UERCERR
- 不可恢复错误。 这将导致 DFHCSDUP 终止,返回码为 "8"。
XPI 调用
不得使用。