《COBOL编译程序》

目录1

第1章引 言1

1.1什么是COBOL1

1.1.1 IBM个人计算机COBOL和国家标准1

8.6.1 语法考虑 （12

1.1.3归纳3

1.1.2例外3

第2章怎样书写COBOL程序4

2.1程序结构4

2.1.1程序的各个部4

2.1.2编码结构4

2.1.3编码规则5

2.1.4语法注释6

2.1.5字符集6

2.1.6标点（Punctuation）7

2.1.7字的格式7

2.2语句、句子和名字8

2.2.1语句（Statement）8

2.2.3段落9

2.3.2数据项9

2.3.1什么是记录9

2.3层号和数据名9

2.2.2句子9

2.2.4节（Section）9

2.3.3数据名12

2.3.4限定名（Qualifier Name）12

2.3.5条件名12

2.3.6助记名12

2.4数据描述入口（Entry）12

2.4.1组项格式13

2.4.2基本项格式13

2.5文件名14

2.6直接量14

2.6.1非数字型直接量15

2.6.2数字型直接量15

2.6.3赋形常量（Figurative Constant）15

2.7算术表达式16

2.8算术语句17

图1． 标准COBOL编码形式的例子………………………………………………………（5后）图2． 舍入和截断的说明18

2.8.1 SIZE ERROR任选项18

2.8.2 ROUNDED任选项18

2.8.3 GIVING任选项19

3.1什么是你所需要的20

第3章开发一个程序20

3.3程序开发步骤21

3.4怎样生成COBOL源文件21

3.4.1编码规则21

3.2编译程序概观21

3.5怎样编译COBOL程序22

3.5.1准备开始22

3.5.2编译步骤23

3.6怎样连接COBOL程序24

3.7.1运行时系统（Runtime Sy stem）26

3.7.2特许协议（License Agreement）26

3.7怎样运行COBOL程序26

3.8任选的COBOL命令27

3.8.1例子27

3.8.2／参数28

3.9任选的连接程序命令29

3.9.1例子29

3.9.2自动回答文件（Automatic Response File）30

3.9.3连接子程序30

3.9.5使用批文件（BatchFile）30

3.9.4带分段（Segmentation）的连接30

3.9.6编译一个大程序31

3.10 COBOL使用的文件31

图3． 编译和连接时使用的文件31

3.11输出清单和错误信息32

3.12 COPY语句33

3.13清单示例33

第4章标识部36

目的36

格式36

注解36

例子37

4.1AUTHOR段落37

4.2 DATE-COMPILED段落37

4.3 DATE-WRITTEN段落37

4.5 INSTALLATION段落38

4. 7 SECURITY段落38

4.4 IDENTIFICATION DIVISION首部38

4.6 PROGRAM-ID段落38

目的39

格式39

第5章环境部39

注解40

例子40

5.1 CONFIGURATION SECTION首部40

5.2ENVIRONMENT DIVISION首部41

5.3 FILE-CONTROL段落41

5.4 INPUT-OUTPUT SECTION首部43

5.5 I-O-CONTROL段落43

5.6 OBJECT-COMPUTER段落44

5.7 SOURCE-COMPUTER段落44

5.8SPECIAL-NAMES段落44

注解46

目的46

第6章数据部46

格式46

例子47

6.1文件节47

6.2工作存贮节48

6.3连接节49

6.4屏幕节50

6.5数据部限度54

6.6 BLANKWHEN ZERO子句54

6.7 BLOCK子句54

6.8CODE-SET子句55

6.9 DATA RECORD（S）子句55

6.10 FD入口（只对顺序I/O）55

6.12 LABEL子句56

6.13 LINAGE子句56

6.11 JUSTIFIED子句56

6.1 4 OCCURS子句57

6.15 PICTURE子句59

6.16 RECORD子句62

图4． 用PICTURE编辑数据的例子62

6.17 REDEFINES子句63

6.18 SIGN子句63

图5． SIGN子句的作用64

图6． 符号位上的字母字符65

6.19 SYNCHRONIZED子句65

6.20 USAGE子句65

6.21 VALUE子句66

6.21.1 88层条件名66

6.22 VALUE OF FILE-ID子句67

格式68

注解68

目的68

第7章过程部68

例子69

7.1声明Declarative和USE句子70

7.1.1 例子71

7.2分段71

7.3 ACCEPT语句72

7.3.1 ACCEPT语句格式172

例子73

图7． 当ACCEPT语句终止时，ESCAPE KEY值73

7.3.2 ACCEPT语句格式273

例子74

7.3.3 ACCEPT语句格式374

图8． ACCEPT语句格式3例180

图9． ACCEPT语句格式3例281

图10．ACCEPT语句格式3例382

7.3.4 ACCEPT语句格式483

7.5 ALTER语句84

7.4 ADD语句84

例子84

7.7 DISPLAY语句85

7.6 COMPUTE语句85

7.7.3 屏幕名86

7.7.1位置指定（Position-spec）86

7.7.2标识符、直接量和ERASE86

7.7.4 例子87

7.9 EXHIBIT语句87

7.8 DIVIDE语句87

7.12 IF语句88

7.11 GO TO语句88

7.10 EXIT语句88

7.12.1条件89

图11． 条件对程序流的影响90

7.13 INSPECT语句91

7.14 MOVE语句93

图12．数据传送的例子94

7.15 MULTIPLY语句94

716 PERFORM语句95

7.18 STRING语句96

7.17 STOP语句96

7.20 TRACE语语句97

7.19 SUBTRACT语句97

7.21 UNSTRING语句98

8.2 怎样管理打印机文件100

第8章数据的输入和输出100

8.1 导言100

8.3 怎样管理通讯文件100

8.4.1 显示器输出101

8.5 怎样管理软盘文件101

8.4 怎样操纵显示器和键盘101

8.4.2键盘输入101

8 .6 什么是顺序文件组织102

8.7 什么是相对文件组织…………………………………………………（102 ）8.7.1语法考虑102

8.6.2 处理顺序文件的过程部语句102

8.8 什么是索引文件组织103

8.7.4 处理相对文件的过程部语句103

8.7.3 FILE STATUS报告103

8.7.2RELATIVE KEY子句103

8.8.1 语法考虑………………………………………………………………（104 ）8.8.2 RECORD KEY子句………………………………………（104 ）8.8.3 FILE STATUS报告…………………………………………（105 ）8.8.4 处理索引文件的过程部语句105

图13．颗粒类型标志符…………………（ 104 ）106

图14．索引文件可使用的过程部语句106

8.9CLOSE语句106

8.12 OPEN语句107

8.11 DELETE语句（相对I/O）107

8.10 DELETE语句（索引 I/O）107

8.13 READ语句（索引I/O）108

8.15 READ语句（顺序I/O）109

8.14 READ语句（相对I/O）109

8.16 REWRITE语句（索引I/O）110

8.19 START语句（索引I/O）111

8.18 REWRITE语句（顺序I/O）111

8.17 REWRITE语句（相对I/O）111

8.21WRITE语句（索引I/O）112

8.20 START语句（相对I/O）112

8.22 WRITE语句（相对I/O）113

8.23 WRITE语句（顺序I/O）113

9.1.1 相对索引115

第9章用索引方法进行表处理115

9.1 索引名和索引数据项115

9.2 SEARCH语句格式1116

9.3 SEARCH语句格式2117

9.4SET语句118

10.1.1汇编子例程（Subroutin e）119

第1 0章程序内部通讯119

10.1怎样控制通讯119

图15． 在进入一个子例程时栈的内容119

10.1.2例子120

10.1.3链参数（Clrain Parameter）121

10.2 CALL语句122

10.3 CHAIN语句122

图16．链接程序时的存贮器格式122

10.4 EXIT PROGRAM语句123

10.5 LINKAGE（连接）节123

10.6带有CALL和CHAIN的PROCEDURE DIVISION首部124

A.1.1命令输入和依赖于DOS的I/O错误125

A.1 编译时期错误125

附录A.COBOL错误信息125

A.1.2 语法错误126

A.2运行时期错误131

附录B保留字134

图17．连接程序使用的输入文件139

图18． 连接程序使用的输出文件139

C.2.2输出文件139

C.2.1输入文件139

C.1导言………………………………………………………………………………（139 ）C.2文件139

附录C． 连接（LINK）程序139

C.3.2组（Group）140

C.3.3类（Class）140

C.3.1段140

C.3定义140

C.2.3 VM.TMF（临时文件）140

C.5.1 目标模块〔.OBJ〕141

C.4命令提示…………………………………………………………………（141））C.5命令提示的详细描述141

图19．连接程序命令提示141

C.5.4库文件〔.LIB〕：142

C.5.3清单文件〔NUL.MAP〕：142

C.5.2运行文件〔文件名1.EXE〕：142

/DSALLOCATION143

/HIGH143

/LINE143

/MAP143

/PAUSE143

C.5.5参数143

C.6.1开始之前144

/STACK：大小144

C.6怎样启动连接程序144

C.6.2例子145

C.6.3例子145

C.7连接程序对话过程示例146

图20．装入模块存贮器映象148

C.8装入模块存贮映象（Map）148

C.10信息149

C.9怎样确定段的绝对地址149

附录D． 对话过程示例152

D.2打印机输出157

D.1单独的屏幕输出157

E.2带括号的条件158

E.1复合条件的求值规则158

附录E． 条件的高级形式158

E.3缩写的条件159

E.4 NOT——逻辑否定运算符159

附录F．嵌套的IF语句160

附录G．ASCll字符编码161

附录H．允许的MOVE操作数表165

图21．MOVE语句中的接收操作数165

附录I． 带有VARYING和AFTER子句的PERFORM语句166

图22．视频方式167

J.1 COBOL程序的例子167

附录J．检查视频方式的程序例子167

J.2 汇编程序的例子168

K.3.2非正常终止169

K.3.1软盘满169

K.2此公用程序怎样工作169

K.1导言169

附录K．索引文件恢复公用程序（REBUILD）169

K.3什么时候使用REBUILD169

K.4 REBUILD的使用170

K.3.3非可用空间170

K.5 REBUILD对话过程示例171