格式 1 - 数据传输
格式 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 扩展结束
