COBOL - 部

17 Mar 2025 | 5 分钟阅读

COBOL 部是 COBOL 程序的最顶层组件,也是最重要的组件。它通常包含一个或多个节,这些节随后被划分为段落。它是由节、段落、句子或字符块的集合。部的起始行是部名称,部的结束行是下一个部的开始或程序的结束。部是系统定义的词,所有部都应位于 A 区。

一个 COBOL 程序可以分为以下四个部:

  • 标识部
  • 环境部
  • 数据部
  • 过程部

标识分部 (Identification Division)

标识部是每个 COBOL 程序的第一个也是强制的部。在这个部中,程序员编写关于程序的详细信息,如作者姓名、执行日期、代码编写日期等。这个部用于标识程序,也指定了源元素的名称和类型,以及类和接口的指定位置。

在这个部中,我们必须在标识部之后立即定义 PROGRAM-ID(一个关键字),它指定程序名称,该名称可以包含 1 到 30 个字符。

语法

示例

输出

当您编译并执行上述程序时,它将显示以下输出

COBOL Divisions

环境分部 (Environment Division)

环境部用于指定程序特性,如文件和字符集,这些特性取决于运行它的系统。在这里,我们编写关于程序编写和执行的计算机环境的详细信息。它还用于指定程序的输入和输出文件。环境部由两个节组成:配置节和输入输出节。

  • 配置节: 配置节用于提供关于程序编写和执行的系统的信息。它包含两个段落:用于编译程序的源计算机,以及用于执行程序的目标计算机。
  • 输入输出节: 输入输出节用于提供关于我们在程序中使用的文件的信息。它还包含两个段落:文件控制,用于提供关于我们在程序中使用的外部数据集的信息;以及 I-O 控制,用于提供关于我们在程序中使用的文件的信息。

语法

它由两个节组成

1. 配置节

配置节包含关于您的系统(程序在您的系统上编写和执行)的信息。此节必须在 A 区中指定。

它由两个段落组成

  • 源计算机:这将包含关于编译程序的系统的信息。
  • 目标计算机:这将包含关于执行程序的系统的信息。

语法

输入输出节

此输入输出节包含关于要在您的 COBOL 程序中使用的所有文件的信息。

  • 文件控制:这将显示程序中使用的外部数据集的信息。
  • I-O 控制:这将显示程序中使用的文件的信息。

语法

示例

让我们看一个环境节的简单例子

输出

COBOL Divisions

数据部

在 COBOL 中,数据部用于声明变量和参数。在这里,我们声明变量、它们的数据类型、大小、使用类型等。这是 COBOL 程序结构中最重要的部之一。

数据部包含四个节

  • 文件节: 此节用于定义文件的记录结构。
  • 工作存储节: 此节用于声明程序中使用的临时变量和文件结构。
  • 局部存储节: 此节与工作存储节类似。它唯一的区别在于,在此节中,每次程序开始执行时,都会分配和初始化变量。
  • 连接节: 此节用于描述从外部程序接收的数据名称。

语法

  • 工作存储节:此节指定所有临时变量以及程序中使用的文件结构。

语法

  • 局部存储节:局部存储节存储与工作存储节类似的信息。唯一的区别是,对于局部存储节,每次程序开始执行时,都会分配和初始化变量。
  • 连接节:此节描述从外部程序接收的所有数据项。

语法

示例

让我们看一个数据部的简单例子

输出

COBOL Divisions

过程分部 (Procedure Division)

  • 过程部是 COBOL 程序的主要部分。就像 C/C++ 程序的 main() 函数一样。程序将从过程部分开始实际执行。
  • 此节是程序的逻辑节。这里编写了所有的业务逻辑。像 C/C++ 的 main() 函数一样,所有 COBOL 程序都必须有一个过程部。
  • 过程部包含可执行语句,可执行语句包含在数据部中定义的变量。我们可以在过程部中使用用户定义的名称和段落。
  • 我们必须在此部中指定至少一个语句。我们不能将它留空。
  • 在这个部中,我们编写主要的程序代码。它提供了两种停止程序执行的方法。对于调用程序,我们使用 STOP RUN,对于被调用程序,我们使用 EXIT PROGRAM 来停止程序执行。

语法

示例

让我们看一个过程部的例子

输出

COBOL Divisions
下一主题COBOL 数据类型