ISSUE ERASEAUP
擦除 3270 缓冲区的所有未保护字段。
语法
条件: INVREQ ， NOTALLOC 和 TERMERR
NOHANDLE、RESP 和 RESP2是常用选项，可添加到所有 EXEC CICS 命令中以处理错误条件。 命令语法图和选项说明中没有明确包含这些选项。 有关这些常用选项和 EXEC CICS 命令语法的信息，请参阅 EXEC CICS 命令格式和编程注意事项.
描述
ISSUE ERASEAUP 通过以下方法擦除不受保护的字段:
- 将所有不受保护的字段清除为空 (X'00 ')
- 将每个未受保护字段中的已修改数据标记重置为零
- 将光标定位到第一个不受保护的字段
- 恢复键盘
可以将 ISSUE ERASEAUP 命令用于以下类型的 3270 逻辑单元:
- 3270 显示逻辑单元 (LUTYPE2)
- 3270 打印机逻辑单元 (LUTYPE3)
- 3270 逻辑单元
- 3650 主机会话式 (3270) 逻辑单元
- 3790 (3270-display) 逻辑单元
- 3790 (3270-printer) 逻辑单元
选项
- WAIT
- 确保在控件返回到应用程序之前完成擦除。 如果省略 WAIT ，那么在 ISSUE ERASEAUP 开始处理时，控制权将立即返回到应用程序。
条件
- 16 INVREQ
- RESP2 值：
- 200
- 分布式程序链接服务器应用程序在 CONVID 选项上指定了函数输送会话 (其主体设施)。
缺省操作: 异常终止任务。
- 61 个 NOTALLOC
- 如果命令中指定的设施不是由应用程序拥有，那么将发生此情况。
缺省操作: 异常终止任务。
- 81 个 TERMERR
- 发生与终端相关的错误。
如果用户节点错误程序 (NEP) 的 CANCEL TASK 请求在节点异常条件程序处理会话错误时有未完成的终端控制请求处于活动状态，那么可能会导致此情况。
缺省操作: 异常终止任务，异常终止代码为 ATNI。