1. 全栈程序员必看首页

MAinframe之cobol

全栈程序员-站长 • • 未分类 • 阅读 2

MAinframe之cobolcobol 分四个部分 identifictio datadivision procedurediv environmentd 中 input outputsectio 连接外部要使用的文件 66 层用来重命名 77 层不可分割 88 层放值的范围变量的符号 a 字母或者空格 nbsp x 字符 9 数字 s

cobol 分四个部分

identifiction division enviroement division. data division.procedure division.

environment division中input -output section,连接外部要使用的文件。

66层用来重命名 77层不可分割 88层放值的范围

变量的符号 a:字母或者空格  x:字符 9:数字 s:符号位 v:小数位,不占位置 b:空格位

occurs:定义表项目 occurs n times                     定长

                  occurs times depending on data-item 变长

 

evaluate;相当于switch语句 evaluate 条件

                          when 选项

                               执行、、、、

                          when other

                               执行.\\\

或者                    evaluate true

                         when 判断

                               执行、、、、 

 

inspect data-1 tallying countr for leading ‘a’     查找DATA-1中字幕A个数放到COUNTR中

COBOL中连接外部数据中，先在ENVIRONMENT DIVISION ，INPUT-OUTPUT SECTION中用SELECT ASSIGN TO 连接

然后再DATA DIVISION.FILE SECTION中写接受数据的结构用FD OUTPUT-FILE 或者FD INPUT-FILE

 

 

 

版权声明：本文内容由互联网用户自发贡献，该文观点仅代表作者本人。本站仅提供信息存储空间服务，不拥有所有权，不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容， 请联系我们举报，一经查实，本站将立刻删除。

发布者：全栈程序员-站长，转载请注明出处：https://javaforall.net/217885.html原文链接：https://javaforall.net

赞 (0)
0 0

关于作者

全栈程序员-站长的头像

全栈程序员-站长

133.5K 文章
3 粉丝
本网站汇聚当前互联网主流语音，持续更新，欢迎关注公众号“全栈程序员社区”
上一篇 2026年3月18日 上午8:32
下一篇 2026年3月18日 上午8:33


相关推荐

发表回复

您的邮箱地址不会被公开。 必填项已用 * 标注

关注全栈程序员社区公众号