MAinframe之cobol

cobol 分四个部分

identifiction division enviroement division. datadivision.procedure division.

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

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

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

occurs:定义表项目 occurs ntimes                    定长

                 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-OUTPUTSECTION中用SELECT ASSIGN TO 连接

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