COBOL 教程

什么是 COBOL？

COBOL 是一种主要专注于解决业务问题的编程语言。COBOL 的全称是 Common Business-Oriented Language（通用商业导向语言）。它主要用于公司和政府的业务、财务和行政系统。这种语言也被用作解决许多数据处理问题的方案。

它由 CODASYL（数据系统语言会议）开发。它在大型机系统中被用作一种语言。

COBOL 的特性

以下是 COBOL 编程语言一些最重要的特性

• 由于其先进的文件管理能力，允许您处理大量数据。
• COBOL 中的逻辑结构更易于阅读和修改。
• 它可以在 IBM、个人电脑等机器上执行和编译。
• 测试和调试工具在所有计算机平台上都可用。因此，它是一种健壮的编程语言。
• 由于 COBOL 有不同的部，您可以轻松地进行调试。
• COBOL 是为面向业务的应用程序设计的。由于其先进的文件处理能力，它可以处理大量数据。

COBOL 的历史

以下是 COBOL 历史上的重要里程碑

• COBOL 最初由 CODASYL 于 1959 年设计。
• 1962 年末，IBM 宣布 COBOL 将成为其主要开发语言。
• 1965 年版的 COBOL 引入了处理海量存储文件和表格的功能。
• 1968 年，COBOL 被 ANSI 认可并批准为标准商业用途的语言。
• 到 1970 年，COBOL 已成为世界上使用最广泛的编程语言。
• 1982 年，ISO 成立了其 SC5 的第一个工作组：WG4 COBOL。
• 1985 年，ISO 工作组 4 接受了此版本的 ANSI 提议标准。
• 2002 年，第一个面向对象的 COBOL 发布，可以作为 COBOL 的一部分进行封装。
• 2012 年，Computerworld 的调查发现，超过 60% 的组织仍在使用 COBOL。
• COBOL 2014 包括了方法重载、动态容量表等功能。

如何在 Windows 10 上安装 COBOL

下面是通过几个简单步骤安装 Hercules 模拟器的方法

有多种用于 Windows 的大型机模拟器。您可以使用它们来编写和运行简单的 COBOL 程序。

Hercules 是一个流行的 COBOL 模拟器，可以轻松地在 Windows 上安装。Hercules 是一个开源工具。它适用于最新的 64 位 z/Architecture。

第 1 步) 安装 Hercules
访问 www.hercules-390.eu 网站。您将看到以下链接。

第 2 步) 点击“运行”按钮
在对话框中点击“运行”按钮

第 3 步) 点击“下一步”
在下一个屏幕中，点击“下一步”按钮。

第 4 步) 接受许可协议
在公共许可协议屏幕中，

1. 选择单选按钮接受许可协议的条款
2. 点击“下一步”按钮

第 5 步) 点击“安装”
在下一个屏幕中，点击“安装”按钮。

第 6 步) 点击“安装”按钮
点击“安装”开始安装

第 7 步) 点击“完成”按钮
点击“完成”按钮退出安装向导。

第 8 步) 点击 Hercules CMD 提示符
在开始菜单中，点击 Hercules CMD 提示符。

第 9 步) 输入 ‘hercules’ 启动模拟器
您可以看到命令提示符。

COBOL 程序结构

COBOL 程序的组织是分层的。并非所有组件都必须存在才能形成这种层次关系。

以下是 COBOL 程序的各个组成部分

部 (Divisions)

部是一个代码块，通常包含一个或多个节。它从遇到部名称的地方开始，到下一个部的开始处结束。

节 (Sections)

节是程序逻辑的逻辑细分。它是一组段落的集合。

段落 (Paragraphs)

段落是节的一部分，是一个用户定义或预定义的名称，后面应跟一个句点。这个部分包含零个或多个句子。

句子 (Sentences)

句子是一个或多个语句的组合。它们应该只出现在过程部中。COBOL 语言中的句子必须以句点（.）结尾。

语句 (Statements)

这些是有意义的 COBOL 语句，用于执行某些处理。

字符 (Characters)

这些是层次结构中最低的，不可再分的单位。

部的类型

COBOL 程序结构中的各个部如下

• 标识部 (Identification Division)
• 环境部 (Environment Division)
• 数据部 (Data Division)
• 过程部 (Procedure Division)

标识部 (Identification Division)

• 程序员和编译器可以使用这个部来识别程序。
• 唯一强制的段落是 PROGRAM-ID。
• 它标识程序的名称，该名称包含字符。

环境部 (Environment Division)

它帮助您识别程序的输入和输出文件。

配置节 (Configuration section)

本节提供有关编写和运行程序的系统的信息。

本节有两个段落

源计算机 (Source computer) – 完整程序

目标计算机 (Object computer) – 执行程序。

输入-输出节 (Input-Output sections)

• 本节提供与程序中使用的文件相关的详细信息。

它有四个节

• 文件节 (File section) – 允许您定义文件的记录结构。
• 工作存储节 (Working storage section): 本节帮助您声明临时变量和文件结构。
• 本地存储节 (Local-storage section): 本节与本地工作存储节相同。两者之间的主要区别在于，每次程序开始执行时，变量都必须被初始化。
• 链接节 (Linkage section): 本节描述从外部存储接收的数据名称。

过程部 (Procedure Division)

• 这个部用于包含程序的逻辑。
• 过程部也包含在数据部中定义的可执行语句。

COBOL 编码规则

以下是使用 COBOL 时一些最重要的编码规则

• 前六个字符位置分配给序列号。
• 第七个字符位置保留给续行符，或者一个星号，表示注释行。
• 实际的程序文本从第 8 列开始。
• 从第 8 到 11 的四个位置被称为 A 区，从 12 到 72 的位置被称为 B 区。

Cobol 程序的标准格式

• 每行有 80 个字符。
• 列(l-6)：表示序列
• 第 7 列：该位置包含指示符(^,/,-)
• 列(8-11)：表示 A 区。
• 列(12-72)：表示 B 区。
• 列(72-80)：用于标识。

COBOL 的程序语法规则

以下是 COBOL 的一些重要语法规则

• COBOL 的语法与英语非常相似，旨在实现自文档化和高可读性。
• 示例：y = x; 表示为：MOVE x TO y
• 它不是一种大小写敏感的语言。
• 它有超过 300 个保留字
• 复杂的条件可以通过移除重复的变量和条件来“缩写”。例如
• IS a GREATER THAN x AND y GREATER THAN OR EQUALS To
• 它缺少大型标准库，因为它只有 43 个语句、87 个函数和仅一个类。

COBOL 中的变量

在 COBOL 中，变量是内存中的一个命名位置，程序可以将数据放入其中并从中检索数据。一个数据名或标识符。它是用来识别为变量保留的内存区域的名称。

变量必须根据其大小和类型进行描述。COBOL 程序中使用的每个变量都应在 DATA DIVISION 中有描述。

在 COBOL 中声明变量的规则

• 变量应在工作存储节中声明。变量可以是数组、记录、文件描述符记录等。
• 变量的名称可以包含字母和数字，其第一个字符必须是字母。
• 唯一允许使用的特殊字符是连字符，且必须嵌入其中。
• 9 只代表一个单位数字。

If Else 语句

在 COBOL 中，If-Else 语句用于条件分支

可以使用关系运算符和一些拼写出来的短语

If x < y – 这可以写成 if x is less than y

<、>、=、>=、<= 是可用的关系运算符

NOT、AND、OR 是在 COBOL 中使用的逻辑运算符

Greater than、less than、equal to 是拼写出来的短语

If x is less than y then 
Do the first action 
Else
Do the second action 
End-if.

要检查一个字母数字变量持有何种类型的数据，我们可以使用 if x is number、if x is alphabetic 等条件。它基于 T 或 F 的值。

您可以使用 if-then-else if 来处理多级条件

Evaluate X
When 1 perform action1
When 2 perform action2
When 3 perform action3
When others perform action4
End-evaluate

如果没有条件匹配，则执行 else 子句。这与其他语言中的 switch 语句非常相似。

COBOL 程序示例

示例 1 – Hello World!

IDENTIFICATION DIVISION.
PROGRAM-ID. HELLO-WORLD.
PROCEDURE DIVISION.
DISPLAY 'Hello, world.'
STOP RUN.

COBOL 的优点

以下是使用 COBOL 语言的重要优点/好处

• 您可以将 COBOL 用作一种自文档化语言。
• COBOL 语言可以处理海量数据处理。
• 它是主要使用的高级编程语言之一。
• 与其过去的版本完全兼容。
• COBOL 语言可以处理海量数据处理。
• 由于其有效的错误消息系统，解决错误更容易。
• COBOL 也被广泛用作一种自文档化语言。
• 在 COBOL 中，所有指令都可以用简单的英语单词编码。

COBOL 的缺点

以下是使用 COBOL 的一些缺点/劣势

• 它的语法非常冗长
• COBOL 的格式非常严格
• 它不是为处理科学应用而设计的
• 编译一个 COBOL 程序所需的时间比面向机器的编程语言要长得多。

摘要

• COBOL 是一种主要专注于解决业务问题的编程语言。
• COBOL 的全称是 Common Business-Oriented Language（通用商业导向语言）
• 由于其先进的文件管理能力，它允许您处理大量数据。
• COBOL 最初由 CODASYL 于 1959 年设计
• COBOL 的编程结构包括 1) 部 (Division)，2) 段落 (Paragraph)，3) 节 (Section)，4) 句子 (Sentences)，5) 字符 (Characters)
• COBOL 中的四种部分是 1) 标识部 2) 环境部 3) 数据部 4) 过程部
• 在 COBOL 程序中，每行有 80 个字符
• COBOL 的语法与英语非常相似，旨在实现自文档化和高可读性。
• COBOL 变量是内存中的一个命名位置，程序可以将数据放入其中并从中检索数据。
• 在 COBOL 中，If-Else 语句用于条件分支
• COBOL 的最大优点是您可以将其用作自文档化语言。
• COBOL 的主要缺点是其格式非常严格

如果您喜欢我们为希望从基础到高级主题学习 COBOL 编程的软件程序员设计的免费 COBOL 课程，请随时与您的朋友分享。