WRITE OPERATOR
在系统控制台上撰写消息。
语法
条件: ERROR, EXPIRED , INVREQ 和 ENGERR
此命令是线程安全的。
NOHANDLE、RESP 和 RESP2是常用选项,可添加到所有 EXEC CICS 命令中以处理错误条件。 命令语法图和选项说明中没有明确包含这些选项。 有关这些常用选项和 EXEC CICS 命令语法的信息,请参阅 EXEC CICS 命令格式和编程注意事项.
描述
WRITE OPERATOR 使应用程序能够将消息写入一个或多个系统控制台,并在需要时等待应答。 如果要将消息写入特定控制台,请使用 CONSNAME 选项来指定要接收消息的控制台。 如果要将消息写入多个控制台,请使用 ROUTECODES 选项指定一组要接收消息的控制台。 ROUTECODES 选项特别适用于必须发出其自己的操作员消息的应用程序包。 但是, CONSNAME 和 ROUTECODES 是互斥的。
由于更改了 CICS 处理发送到控制台的消息的方式,将超过 113 个字符的文本长度拆分为两行。 以下变量都不能定义为 PL/I 变量字符串。
操作码与要与消息关联的描述符代码相同。 只能为此参数指定其中一个描述符代码 2 , 3 或 11。
- 2
- 立即采取行动
- 3
- 最终行动
- 11
- 关键的最终行动。
CRITICAL 选项等同于 ACTION (11) 规范。 最终 选项等同于 ACTION (3) 规范。 IMMEDIATE 选项等同于 ACTION (2) 规范。
控制台操作员可以多种方式处理保留的信息(请参阅 z/OS MVS 系统命令)。 有关此命令如何影响操作员的控制台屏幕外观的信息,请参阅系统程序员。
选项
- ACTION (cvda)
- 指定与此消息关联的操作码。 CVDA 值包括:
- 关键
- 指定消息需要操作员最终执行操作,并且具有足够的关键重要性以保留在控制台屏幕上。 该消息将保留在屏幕上,直到操作员将其删除为止。
- 最终
- 指定操作员应该在有时间时执行操作。 当其他消息填满屏幕时,将会滚出该消息,但操作系统仍会保留该消息,直到操作员显式删除该消息为止。
- IMMEDIATE
- 指定操作员应立即执行操作。 此消息将保留在控制台屏幕上,直到操作员将其删除为止。
- CONSNAME (data-value)
- 指定要将消息发送到的控制台的 8 字符名称。 此选项允许向消息发送由 CONSNAME标识的特定控制台。
有效字符包括大写字母 (A-Z) ,数字 (0-9) 和特殊字符 @ (at 符号) , # (磅符号) 和 $(美元符号)。
CONSNAME 和 ROUTECODES 互斥。
- MAXLENGTH (data-value)
- 指定包含应答区域长度的全字二进制字段 (范围为 1-119 字节)。 如果指定 REPLY,那么必须指定 MAXLENGTH 。
- NUMROUTES (data-value)
- 指定用于定义路由代码数的全字二进制字段。
- REPLY (数据区)
- 指定用于接收操作员应答的数据区。 如果指定此选项,那么应用程序将暂停,直到收到应答或 TIMEOUT 时间段到期为止。
- REPLYLENGTH (数据区域)
- 指定运算符应答的实际长度 (全字二进制值)。
- ROUTECODES (data-value)
- 指定变长字段。 每个代码都是一个字节,并且包含 1-28 范围内的二进制数字。 缺省值为单个代码,设置为 2。
仅在 COBOL 程序中,必须使用包含 1 字节值的数据区,而不是数据值。
ROUTECODES 和 CONSNAME 互斥。
- 文本 (data-value)
- 指定包含要发送的文本的数据值。
如果数据值以 DFHnnnn 或 DFHaannnn 开头,那么会将该消息视为 CICS 消息并相应地重新格式化。
如果要使用 COBOL2 转换程序选项,那么必须使用包含要发送到操作程序的文本的数据区,而不是数据值。
- TEXTLENGTH (data-value)
- 指定文本的长度 (作为全字二进制值)。 该选项仅适用于 C® 和 C++ 程序。
- 如果指定了 REPLY 选项,那么长度在 0-121 字节范围内。
- 如果未指定 REPLY 选项,那么长度在 0-690 字节范围内。
如果文本长度大于 113 ,那么 CICS 会将消息格式化为多行写入操作程序 (WTO); 每行有 69 个字节,最多 10 行。
编辑输出的方式是,如果可能,每行在空格字符处中断,那么下一行以非空格字符开头。 如果没有空间在总限制 690 字节 (10 行 69 字节) 内重新格式化数据,那么不会重新格式化输出。
- 超时 (data-value)
- 指定一个全字二进制字段,其中包含 CICS 在返回对此事务的控制之前等待应答的最长时间 (以秒计)。 这必须在 0-86 400 (24 小时) 范围内。 系统缺省值由 OPERTIM 系统初始化参数指定。 仅当还指定了 REPLY时,才能指定 TIMEOUT 。
条件
- 1 个错误
- RESP2 值:
- 1
- MVS WTO 命令指定了 CONSNAME,该命令由 CICS 为 WRITE OPERATOR 请求发出,已返回错误。
- 31 已到期
- RESP2 值:
- 7
- 在接收到操作员的应答之前发生了 TIMEOUT。
缺省操作: 将异常条件返回到应用程序。
- 16 INVREQ
- RESP2 值:
- 1
- TEXTLENGTH 值无效。
- 2
- NUMROUTES 值无效。
- 3
- ROUTECODES 值无效。
- 4
- MAXLENGTH 值无效。
- 5
- TIMEOUT 值无效。
- 6
- ATION 值无效。
- 7
- CONSNAME 长度无效。 CONSNAME 值的长度必须为 2 到 8 个字符。
- 8
- CONSNAME 值无效。
缺省操作: 异常终止任务。
- 22 LENGERR
- RESP2 值:
- 8
- 应答的长度超过 MAXLENGTH ,并且已被截断。
缺省操作: 异常终止任务。
