格式 1 - 数据传输

ACCEPT 语句-格式 1-数据传输

读取语法图跳过可视语法图ACCEPTidentifier-1FROM助记名环境-名称1END-ACCEPT1
注:
  • 1 IBM® 扩展

格式 1 将数据从输入设备传输到 identifier-1。 传入数据将作为在最左边的字符位置上对齐的字符串进行传输。 将不会进行数据转换。 如果 identifier-1 的大小大于输入设备的记录长度,那么在一个记录的传输完成后将请求其他数据。 将从先前从设备传输的最后一个字符右侧的位置开始,将其他数据传输到 identifier-1 中。 此过程将继续,直到填充 identifier-1 为止。 如果在任何传输中,设备记录包含的字符数超过填充 identifer-1所需的字符数,那么多余的数据将被截断。

由于所有数据都作为字符串传输,因此通常使用使用 DISPLAY 来显式或隐式定义 identifier-1 。 但是, ACCEPT 语句将处理其他格式的数据,前提是可以在输入设备上以与 identifier-1的内部表示相对应的格式输入数据。

当需要操作员干预 (以提供给定的消息,代码或异常指示符) 时,格式 1 对于程序中的异常情况很有用。 当然,必须向操作员提供要应答的相应消息。

identifier-1
接收数据项。
IBM 扩展

如果 identifier-1 的描述包含 TYPE 子句,那么该子句中引用的 type-name 必须是 primary。

IBM 扩展结束
IBM 扩展

可以使用 DISPLAY-1来定义 Identifier-1 ,即,它可以是 DBCS 或 DBCS 编辑的项。 然后,输入设备上的数据必须由移出和移入字符定界; 在传输数据时将除去这些字符。

IBM 扩展结束
IBM 扩展

Identifier-1 也可以定义为N国项。 接受的数据将从作业的当前 CCSID 指定的代码集转换。

IBM 扩展结束
IBM 扩展

Identifier-1 可能不是日期,时间或时间戳记项。

IBM 扩展结束
助记名
必须在 SPECIAL-NAMES 段中指定,其中它将与引用输入设备的环境名称相关联。 输入设备可以是交互式作业所使用的工作站,批处理作业的作业输入流或系统操作员控制台。
IBM 扩展
环境-名称
可以指定环境名称 CONSOLE 或 SYSIN 来代替助记符名称。
IBM 扩展结束
相关信息: