WRITE OPERATOR

在系统控制台上撰写消息。

语法

WRITE OPERATOR

读取语法图跳过可视语法图WRITE OPERATORTEXT( data-value)TEXTLENGTH( data-value)ROUTECODES( data-value)NUMROUTES( data-value)CONSNAME( data-value)EVENTUALACTION( CVDA)CRITICALIMMEDIATEREPLY( data-area)MAXLENGTH( data-value)REPLYLENGTH( data-area)TIMEOUT( data-value)

条件: ERROR, EXPIRED , INVREQ 和 ENGERR

此命令是线程安全的。

NOHANDLERESPRESP2是常用选项,可添加到所有 EXEC CICS 命令中以处理错误条件。 命令语法图和选项说明中没有明确包含这些选项。 有关这些常用选项和 EXEC CICS 命令语法的信息,请参阅 EXEC CICS 命令格式和编程注意事项.

注: 此命令是线程安全的,但 REPLY 选项与键 9 TCB 不兼容。 如果从键 9 TCB 发出指定 REPLY 选项的 EXEC CICS WRITE OPERATOR 命令,那么 CICS® 将切换到 QR TCB 以处理该命令。

描述

WRITE OPERATOR 使应用程序能够将消息写入一个或多个系统控制台,并在需要时等待应答。 如果要将消息写入特定控制台,请使用 CONSNAME 选项来指定要接收消息的控制台。 如果要将消息写入多个控制台,请使用 ROUTECODES 选项指定一组要接收消息的控制台。 ROUTECODES 选项特别适用于必须发出其自己的操作员消息的应用程序包。 但是, CONSNAMEROUTECODES 是互斥的。

由于更改了 CICS 处理发送到控制台的消息的方式,将超过 113 个字符的文本长度拆分为两行。 以下变量都不能定义为 PL/I 变量字符串。

注: 如果指定了 ACTION (或下面的某个等效 CVDA 值) ,那么将保留此消息,直到控制台操作员显式删除此消息或 CICS 终止为止。

操作码与要与消息关联的描述符代码相同。 只能为此参数指定其中一个描述符代码 2 , 3 或 11。

如果未指定 ACTION ,那么没有描述符代码与消息相关联。 描述符代码具有以下含义:
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 符号) , # (磅符号) 和 $(美元符号)。

CONSNAMEROUTECODES 互斥。

MAXLENGTH (data-value)
指定包含应答区域长度的全字二进制字段 (范围为 1-119 字节)。 如果指定 REPLY,那么必须指定 MAXLENGTH
NUMROUTES (data-value)
指定用于定义路由代码数的全字二进制字段。
REPLY (数据区)
指定用于接收操作员应答的数据区。 如果指定此选项,那么应用程序将暂停,直到收到应答或 TIMEOUT 时间段到期为止。
REPLYLENGTH (数据区域)
指定运算符应答的实际长度 (全字二进制值)。
ROUTECODES (data-value)
指定变长字段。 每个代码都是一个字节,并且包含 1-28 范围内的二进制数字。 缺省值为单个代码,设置为 2。

仅在 COBOL 程序中,必须使用包含 1 字节值的数据区,而不是数据值。

ROUTECODESCONSNAME 互斥。

文本 (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 ,并且已被截断。

缺省操作: 异常终止任务。