一、程序的书写 规范

COBOL 源代码依赖于列，这意味着列规则是严格执行的。每个 COBOL 源代码行都有五个区域，其中每个区域都有一个开始列和结束列。

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

COBOL代码书写区格式如下:

1）序号区域(第1 - 6列)   空白或保留行序列号, 标号是6位数字，应从小到大，但不一定连续，标号只是方便查阅程序，可以省略。

2）指标区域(第7列)  多用途区域：

• • 注释行（通常为星号（*）表示注释 ）
  • 续用线（通常为 连字符（ - ）表示延续）
  • 调试线（D 或 d）
  • 源列表格式（ 斜杠（/）表示换页）

        3）区域 A（第 8 - 11 列）

• • 某些项目必须从区域A开始，它们是：部名、节名、段名，描述符（FD）

  • 列 8 称为 A 边距

4）B区（第12-72列）

• • 某些项目必须从区域B开始，它们是：程序正文部分，过程部语句必须从该区开始书写。

    • 条目、句子、语句和子句

    • 延续线

  • 第12列称为B边距

5) 识别区(第73 - 80栏)   被编译器忽略

可以为空，也可以由程序员用于任何目的。

COBOL程序的书写格式：

COBOL 的结构：

COBOL 是一个层次结构，由以下自上而下的顺序组成：

• • 部门

  • 部分

  • 段落

  • 句子

  • 语句

COBOL 部门结构:

各部细分为若干节。

各节被细分为段落。

段落被细分为句子。

句子由语句组成。

语句以 COBOL 保留字开头，可以细分为“字符”

COBOL 保留字：

官方链接保留字巨详细（虽然是英文的但是不影响我们使用，毕竟保留字都是英文的）：Reserved words - IBM Documentation

范围终止符：

作用域终止符可以是显式的，也可以是隐式的。

例如：

· 显式作用域终止符使用“END-”COBOL 保留字标记某些过程 DIVISION 语句的结束。

           任何具有条件子句（计算、执行、读取）的 COBOL 谓词都将具有匹配的作用域终止符。

· 隐式作用域终止符是一个句点 （.），它结束所有先前尚未结束的语句的作用域。句点用作范围终止符

 COBOL 部分:

 “Section”是用户定义的名称，也可以是预定义的名称，后跟句点，由零个或多个句子组成。“Section”是"Paragraph"的集合。

COBOL 句子：

COBOL “句子”是一个或多个“语句”，后跟句点 （.），其中句点用作范围终止符。

COBOL 段落：

COBOL “Paragraph”是用户定义或预定义的名称，后跟句点。“Paragraph”由零个或多个句子组成，是“部分”或“划分”的细分，

COBOL程序包括四个部：

1）标识部（Identification Division）：

• • COBOL程序的第一个也是唯一强制要求的部。
  • 用名称标识程序，并提供其他标识信息，如作者名称、程序编译日期(最后修改)等。

2）环境部（Environment Division）

环境部用于指计算机配置以及计算机输入和输出，它由两个节组成（需要时写）：

• • • 配置节（Configuration section）可提供有关编写和执行程序的系统信息。它由两个段组成：

      源计算机（source computer）：用于编译程序的系统。

      对象计算机（object computer）：用于执行程序的系统。

    • 输入输出节（Input-Output section）提供有关程序中要使用的文件的信息。它由两个段组成：

      文件控制（file control）：提供在程序中使用的外部数据集的信息。

      IO控制（I-O control）：提供在程序中使用的文件的信息。

3）数据部（Data Division）

数据部用于定义程序中使用的变量。它由四个节组成：

• • • 文件节（File section）用于定义文件的记录——输入-输出操作中使用的数据。

    • 工作存储节（Working-Storage section）用于在程序的生命周期内分配并保留的存储——声明程序中使用的临时变量和文件结构。

    • 本地存储节（Local-Storage section）是类似于工作存储节。唯一的区别是每次程序开始执行时都会分配存储和初始化变量，并在程序结束时取消分配。

    • 连接节（Linkage section）用于描述从外部程序接收到的数据名称。 定义为内部处理而开发的数据时。

4）过程部（Procedure Division）

过程部用于包含该程序的逻辑。它由使用数据部定义的变量的可执行语句组成。在这个部中，段和节的名称是用户定义的。

在过程部中必须至少有一个语句。结束这个部的执行的最后一条语句是在调用程序中使用的STOP RUN或者是在被调用程序中使用的EXIT PROGRAM。

参考过的资料：

COBOL学习_yjjm1990的博客-CSDN博客_cobol

一个英文资料，里面有代码感觉比较系统（网页翻译可以看看）：COBOL 学习资料