COBOL学习

COBOL概述

          什么是COBOL语言：

           COBOL是Common Business Oriented Language的缩写，是面向商业通用编程语言。它是专门为商业数据处理而设计的计算机高级程序语言。普遍用于数据管理领域。应用于多个行业如：银行，证券，金融，制造，等等。

           COBOL程序的基本结构：

                       标识部(IDENTIFICATION DIVISION)

                              用来标识程序名称，记录程序的文档记录住处如做者和日期等。

                        环境部(ENVIRONMENT DIVISION)

                               用来描述程序运行和编译的计算机环境，内部数据文件与系统设备的对应关系。

                        数据部(DATA DIVISION)

                                定义程序中全部数据的类型和所占内在的大小。

                         过程部(PROCEDURE DIVISION)

                                 编写程序要执行的语句，是程序的核心。

            

                     部下设置节，节下设置段或描述体，段下或节一包含句子。

                     节是由一个或者多个段组成的。节的定义从一个节名开始到下一个节名或文本结束为止。

                             定义格式：节名            SECTION(节名分为系统定义和用户定义两种。)

                      段由一个或多个句子组成，段的定义从段名开始到下一个段名或文本结束为止。

                             定义格式：段名.（段名+点）  （段名分为系统定义和用户自定义两种）

                      文件描述体只能在数据部中定义，用于描述外部文件的属性及其记录的格式。

                              定义格式：FD 文件名.   (文件描述体用FD（file definition)语句定义）。

                      句子是完整的指令，用相应的动词表示其操做，以一个句号加一个以上的空格来结束。

 

            COBOL程序的书写区域               

                      标准COBOL程序每行80列，被分为五人区域。

                      第01——06列为“标识区”

                               标号是6位数字，应从小到大，但不必定连续，标号只是方便查阅程序，能够省略。

                      第7列为“注释区”

                                “*”：表示本行为注释行，用于注释程序说明。

                       第08——11列为“A区”

                                  程序中一列语句必须从该区开始书写：部名、节名、段名，描述符（FD），01和07层。

                       第12——72列为“B区”

                                  程序正文部分，过程部语句必须从该区开始书写。

                       第73——80列为“注释区”

                                   行注释区，写入此区的内容在编译时被忽略（通常不推荐使用。）

 

           COBOL程序的书写格式

                        大小写字母等价，可是引号中的字符除外。

                        相邻的两个COBOL字之间有一个以上的空格。

                         运算符和=左右必须各有一个以上的空格；圆括号外面必须有一个以上的空格，内侧没必要。

                         逗号、分号、句号左边不能有空格，而右边应有。

            COBOL的字符

                          COBOL的字符集包括：数字0-9，字母A-Z，a-z，15个专用符号：+ - * / = ,(逗号)  .(句号) ;(分号) '(引号) $ () <> 空格。属于系统字符集而不属于COBOL字符集的字符，只能出如今COBOL的字符串或注释行中。

                          COBOL字是由上述字符组成的最小单位。（保留字、用户字）

                          保留字：规定五种类型专门用途的字（300多个）

                                  键字:如MOVE ADD 等

                                  可选字：如USAGE IS等

                                  专用字符：如运算符：+ - * /等；比较符><=等

                                  表意常量：如ZERO/ZEROS/ZEROES;SPACE/SPACES;QUOTE/QUOTES;HIGH-VALUE/HIGH-VALUES;LOW-VALUE/LOW-VALUES;ALL;NULL/NULLS

                                   专用寄存器：如：LENGTH OF;RETURN-CODE等。

                          用户字：用户自定义的名字。

                                  如：程序名、文件名、节名、段名、数据名等。

 

                          数据名：至关于其它语言中的变量名，它表明一个具体的数据项。

                                 只能由字母（至少一个），数字和连字符“-”组成，连字符不能出如今两端，不能包含空格。

                                 数据名长度不能超过30个字符

                                尽可能使用有意义的英文

                                不能使用保留字做为数据名，多使用连字符，如NAME-OF-STUDENT

                          常量：COBOL常量分为数据常量，非数值常量，表意常量

                                 数值常量：由数字0-9，正负号和小数点组成，如：123，25.67，-73

                                 非数值常量：用匹配的引号（单引号）括起来的字符串，如‘$123’ ，由纯数字组成的非数值常量不能用于数学运算，如‘123’和123不一样。

                                 表意常量：

                                    

 

 

标识部

           标识部的做用

                      标识部是COBOL程序的第一部分，用来为程序设定标识，以便识别，每一个程序（包括主程序和子程序）都必须有一个名字，系统按名字对程序管理和调用。标识部下面不设置节，只设置段，部名和段名都从A区开始书写。

            书写格式

                     

             PROGRAM-ID命名规则

                      只能使用字母、数字和连字符

                      最少一个字符，不能以连字符开头或者结尾

                      最长30个字符，但一般工做中要求不超过8个字符（和分区数据集下的member名一致）

                     书写格式：PROGRAM-ID.     PROGRAM-NAME.

 

环境部

             环境部的做用

                     环境部用来讲明程序运行的软硬件环境，是COBOL程序中惟一与设备相关的部分，将程序中的内部文件与外部文件创建起联系。

                     环境部包括两个节：配置节和输入输出节（当无配置说明和文件应用时可省略。）

                    

                     配置节包括三个段

                     

                     输入输出节

                    

                    

数据部

             一、数据部的做用

                          程序中涉及到的所有数据（输入、输出、中间）都要在此定义，对它们的属性进行说明。主要描述如下属性：

                          数据类型（数值/字符）和存储形式（长度）

                          数据项之间的关系（层次和层号）

                          文件与记录的关系

             二、数据部的结构

                          根据数据项的用途不一样，数据部能够分为：

                          文件节（file section）

                                  用来描述程序中用到的输入输出文件及记录中各数据项的属性

                          工做单元节（working-storage section)

                                  用来描述程序中用到的中间数据

                          联接节（linkage section)

                                   用来描述与调用程序间发生数据传递的数据项（即参数）

             三、数据定义

                          COBOL中把有层属关系的数据用层次关系来描述

                         

                          层次规定：

                          

                          

             四、文件节（file section）

                         程序中的每一个输入、输出文件的数据格式都要在此描述，包括：

                                 文件名称和属性

                                 文件中包括的记录的名字

                                 每一个记录中数据的层次关系

                                 记录中各数据项的格式和占内存的大小

                         文件的描述通常格式

                                 FD 文件名（内部文件名）

                                 01 记录名

                                       05 数据项1 PIC 。。。。。。

                                       05 数据项2 PIC 。。。。。。

                                 FD语句是文件描述体，用来描述文件与记录的属性，如记录名称、格式、长度

                                 FD语句下全部的数据组和和数据项组成了该文件的一条记录

                                 记录描述：记录描述体由01层号开始，后跟记录名。用于定义记录的数据格式，即各下层的数据项的数据类型和长度。若是记录自己就是一个初等项，则在记录名后描述记录型和长度。

                                举例说明：

                               

             五、工做单元节（working-storage section）

                       

                       

             六、COBOL中的数据类型（数值型、字母型、字符型、编辑型）

                        

                       

                       

                       

                      

                      

             七、连接节（linkage    section）

                       做为主程序与子程序间参数传递的数据名定义在子程序的linkage section。也就是该子程序的接口。数据项的定义形式与在工做单元节一致。

                        

过程部

           一、过程部的做用。

                 编写程序要执行的语句，是程序的核心。

           二、INITIALIZE语句

                 

           三、ACCEPT语句：用于接收从键盘或指定设备上得到输入数据

                  

           四、DISPLAY语句：从计算机内存中的数据输出到某一指定的输出设备上，如监视器、系统输出流等。

                 

                  

           五、MOVE语句：至关地赋值语句，能够将常量或一个数据项的内容传送到另外一个数据项中

                 

                  

                 

                 

                 

           六、文件操做语句（OPEN READ WRITE CLOSE)

                  

                 

                 

                

                

                

           七、算术运算语句

                 

                  

                  

                  

                 

                 

           八、字符串语句（STRING UNSTRING INSPECT）

                  

                 

                 

                 

                 

           九、IF语句（条件转移语句。根据给出的断定条件是否知足，来决定执行哪一部分语句）

                  

                 

                 

                 

                                   

           十、EVALUATE语句（多分支选择结构）

                  

                   

                                    

           十一、PERFORM语句（做为执行语句和循环控制语句）

                   

                               

           十二、EXIT语句

                   提供一组过程的公共出口，或者说它指出了被调用过程的逻辑终点，通常用做perform语句序列的出口。EXIT必须是段中惟一的语句，前面必须有段名。

           1三、CONTINUE语句

                     用来指定一个空操做，即什么也不作，用来占位置。程序将顺序执行到CONTINUE的下一条语句。

           1四、GOTO语句

                    

           1五、CALL语句（调用子程序）

                   

                   

                   

           1六、GOBACK语句

                    返回语句。中止运行，将控制权返回给上一级。子程序必须用GOBACK，而不能用STOP，由于STOP中止的是一个RUN UNIT（运行单元）。

           1七、STOP RUN语句

中止语句。STOP RUN在逻辑上应该是程序的最后一个语句。STOP RUN执行后，程序中止运行，中止后不能再接着运行，如须要，可再从新运行一次。主程序通常经过STOP RUN语句结束运行单元。

VSAM文件

           一、什么是VSAM

                

           二、VSAM的组织形式和存取方法

                 

                 

           三、VSAM在环境部

                 

           四、VSAM在数据部

                 

           五、VSAM在过程部

                

               

          

COBOL语言编程规范