cobol学习笔记

cobol学习笔记(1) COBOL入門 COBOLとは？

2010/06/29 16:35

COBOL面向商业的通用语言 (Common business Oriented Language) コボル

∙ 1960.04 CODASYL-60

∙ 1968. ANSI COBOL(COBOL68)第1次規格

∙ COBOL74 第2次規格

∙ COBOL85 第3次規格

∙ COBOL2002 第4次規格

COBOL是Common Business-Oriented Language（公用面向商业的语言）的缩写，主要供数据处理、数据收集及分析之用。COBOL自60年代初开始广泛应用于计算机应用领域（商业和其他领域）。事实上，除了商业之外，各种管理工作都广泛使用COBOL,如各种统计工作，财会工作，企业计划编制，作业制度，情报检索，人事管理等。COBOL针对商业世界的使用，是真正商用应用程序开发的首选语言。

1．适于数据处理领域。

2．采用英语语法的高级语言，可读性、可维护性、可移植性较强。

3．通用性强，标准化程度较高。

4．结构严谨，层次分明。

5．缺点是比较繁琐。

cobol的书写格式（每行）

1、前6列为序号区(一般不编辑)

2、第7列为标示列，仅可以写如下几个标示符。

a. “＊” 注释符(注释当前行的代码)

b “/“ 注释符(注释当前行的代码,程序编译时，强制程序清单另起一页,不建议使用)

c “－“ 字符串连接符

d “D” DEBUG行标示符(程序为DEBUG模式时，标有该标示符的语句行代码执行，否则和注释行效果一样)

3、第8列---11列为A区，包括以下内容。

a 部、节名。

b 层号01

4、第12列---72列为B区，过程部的程序必须写在B区中。

5、第72以后部分不能编辑。

cobol学习笔记(2)COBOL的程序结构 IDENTIFICATION DIVISION 标识部見出し部

2010/06/29 20:44

COBOL程序由4部(DIVISION)组成：IDENTIFICATION DIVISION.(标识部)、ENVIRONMENT DIVISION.(环境部)、DATA DIVISION.(数据部)、PROCEDURE DIVISION.(过程部)，而每个部又由若干节 (SECTION)组成。

IDENTIFICATION DIVISION.(标识部)

“PROGRAM-ID”（程序识别ID）、“AUTHOR”（作者名）、“DATE-WRITTEN”（编写日期），这些并直接不影响程序的执行，而是程序的注释信息。程序注释可以采用任何语言书写，COBOL编译器可以接受。

（一）必写部分

IDENTIFICATION DIVISION.

PROGRAM-ID. 程序名.

（二）任选部分

一般格式：

[AUTHOR. 作者姓名]

[INSTALLATION. 设计这个程序的公司或部门。]

[DATE-WRITTEN. 编写日期，可记入修订史，修改日期、原因及人员。] [DATE-COMPILED. 编译日期]

[SECURITY. 保密程度的描述。]

見出し部(IDENTIFICATION DIVISION)

プログラムＩＤ(PROGRAM-ID)や作成者(AUTHOR)、作成日(DATE-WRITTEN)などを記述します。プログラムＩＤは必須ですが、その他は省略しても構いません。

cobol学习笔记(3)COBOL的程序结构 ENVIRONMENT DIVISION 环境部環境部2010/06/30 14:40

ENVIRONMENT DIVISION.(环境部)

用于记载程序可以被运行的计算机环境。“ENVIRONMENT DIVISION.”部包括“CONFIGURATION SECTION”配置节和“INPUT-OUTPUT SECTION”输入输出节。

環境部(ENVIRONMENT DIVISION)

構成節(CONFIGURATION SECTION)と入出力節(INPUT-OUTPUT SECTION)からなります。

構成節には、翻訳用計算機記述項(SOURCE-COMPUTER)、実行用計算機記述項(OBJECT-COMPUTER)、特殊名記述項(SPECIAL-NAMES)が記述されます。

环境部的作用是说明程序运行的环境，即程序是在什么软硬件环境下运行的。这是整个COBOL程序中唯一与计算机硬件设备有关的部分。在这部分中要说明程序用到哪些设备，哪些文件，将程序中用到的内部文件名与外部文件（或外部设备）之间建立起联系。

COBOL将外部设备和外部文件只集中出现在环境部，是为了提高程序的可移植性，不致因外部环境的改变而导致程序中每一部分都需要作相应的修改，而只

需要修改环境部即可。

一般格式：

ENVIRONMENT DIVISION. （环境部）CONFIGURATION SECTION. （配置节）SOURCE-COMPUTER. 源计算机名.

OBJECT-COMPUTER. 目标计算机名.

[SPECIAL-NAMES. 专用名描述项]

[INPUT-OUTPUT SECTION. （输入输出节）FILE-CONTROL. {文件控制描述体}…

[I-O-CONTROL. 输入输出控制描述体]]

配置节包括三段：源计算机段﹑目标计算机段﹑专用名段。

源计算机指的是编译源程序时使用的计算机。目标计算机指的是经过编译后所得的目标程序运行时所使用的计算机，即数据处理阶段所使用的计算机。这二者可以是同一计算机，也可以是不同的计算机。如果是不同的计算机，则应要求这二台计算机是兼容的。因为一种型号的计算机编译出的目标程序，在另一型号的计算机上往往是不能运行的。

在配置节中还应说明程序运行时需要目标计算机提供的最小容量。如果目标计算机所提供的能使用的内存容量小于此数字，则程序不能正常运行。

源计算机段和目标计算机段的一般格式

SOURCE-COMPUTER．源计算机名．

OBJECT-COMPUTER．目标计算机名．

MEMORY SIZE IS 整数 WORDS/CHARACTERS/MODULES

专用名段用来通知系统把系统中原规定的一些设备名或功能名或符号改为用户自己指定的名字或符号。计算机对有关的硬设备和某些功能（如打印时不换行，跳到本页末或下页头等），都赋予一个特定的专用名。例如有的系统把打印机定名为PRINTER，把控制台定名为CONSOLE，有的把宽行打印机定为SYSOUT，把读卡机定为SYSIN等（请注意，每个系统所起的专用名是不同的）。程序编写者可以用自己规定的助忆名去代替系统的专用名。如果程序中不规定自己定的助忆名，则此段可不写。

专用名段的一般格式

SPECIAL-NAMES．

[DECIMAL-POINT IS COMMA．]

[CURRENCY SIGN IS 非数值常量．]

[专用名 IS 助忆名．]

欧洲人的习惯是用逗号代表小数点，如12．34，他们写成12，34。对此COBOL 提供一项说明，可在专用名段中写：