社区
其他开发语言
帖子详情
COBOL 中READ 问题
jie4208
2011-07-10 09:04:02
READ 文件名
AT END MOVE 'Y' TO EOF-FLAG
END-READ
不在循环中,它到底表达的是什么意思?
是读取了一条记录,如果这条记录是最后一条的时候,执行后面操作
还是循环读取每条数据,当读取到最后一条时,执行后面操作。
...全文
690
2
打赏
收藏
COBOL 中READ 问题
READ 文件名 AT END MOVE 'Y' TO EOF-FLAG END-READ 不在循环中,它到底表达的是什么意思? 是读取了一条记录,如果这条记录是最后一条的时候,执行后面操作 还是循环读取每条数据,当读取到最后一条时,执行后面操作。
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
2 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
tiangongzhicheng
2012-03-19
打赏
举报
回复
是读文件的一条记录,如果文件到了末尾,Y作为标志位(EOF-FLAG
)的值,一般在循环中,就以这个标志位(EOF-FLAG
)为判断条件!
jinjielong
2012-03-17
打赏
举报
回复
按理来说,在工作存储节声明的只是读一个记录的内存,所以应该是每次读一条记录就应该去执行后面的操作。马千里写的那本书,他都有用一个循环来读取,不过华东理工94版的都没用循环。这我就也纳闷了,在COBOL85之前,没END-READ难道说,程序执行到STOP RUN 之前又返回来执行READ语句?
Cobol
学习总结
COBOL
程序的结构 部 IDENTIFICATION DIVISION 标识部 ENVIRONMENT DIVISION 环境部 DATA DIVISION 数据部 PROCEDURE DIVISION 过程部 节(SECTION)和段(PARAGRAPH) (1)部-节-段 (2)标识部下面不设节,直接设段 (3)过程部可以设节,下面再设段,也可以直接设段 句子、语句和子句 每一段由若干句子...
COBOL
语言的迭代器
虽然在传统的
COBOL
程序
中
并没有内置的迭代器概念,但我们可以通过结合模块化编程和数据结构的使用,自定义一个迭代器的实现方式。例如,我们可以使用一个
COBOL
程序模块来实现数据的存取和遍历。首先,我们可以定义一个自定义的数据结构,用于存储我们的集合。
cobol
。
cobol
文件操作
要在
COBOL
中
使用文件,要在3个不同的部
中
放上信息。环境部,要有程序使用的每个文件的文件控制项目(FILE-CONTROL)。这个项目将程序
中
使用的文件名与程序外的实际文件联系起来。这些项目还定义文件的组织和访问方式。数据部,要有每个文件的文件描述符(FD)项目,就是数据定义。过程部,放上处理语句,OPEN,
READ
,WRITE,DELETE等。环境部
中
主要是FILE-CONTROL和I-O-C
COBOL
语言概述
一.
COBOL
程序的结构 1.部 IDENTIFICATION DIVISION 标识部 ENVIRONMENT DIVISION 环境部 DATA DIVISION 数据部 PROCEDURE DIVISION 过程部 2.节(SECTION)和段(PARAGRAPH) (1)部-节-段 (2)标识部下面不设节,直接设段 (3)过程部可以设节,下面再设段,也可以直接设段 3.
COBOL
文件操作
要在
COBOL
中
使用文件,要在3个不同的部
中
放上信息。环境部,要有程序使用的每个文件的文件控制项目(FILE–CONTROL)。这个项目将程序
中
使用的文件名与程序外的实际文件联系起来。这些项目还定义文件的组织和访问方式。数据部,要有每个文件的文件描述符(FD)项目,就是数据定义。过程部,放上处理语句,OPEN,
READ
,WRITE,Delete等。环境部
中
主要是FILE–CONTROL和I–O–C
其他开发语言
3,425
社区成员
15,624
社区内容
发帖
与我相关
我的任务
其他开发语言
其他开发语言 其他开发语言
复制链接
扫一扫
分享
社区描述
其他开发语言 其他开发语言
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章