《ECLIPSE MV系列机资料 AOS/VS COBOL参考手册》

第一章 绪论1

1—1 COBOL程序结构1

1—2 语言扩展1

1—2．1 I／O扩展1

1—2．2 数据扩展2

1—2．3 COBOL级调试2

1—3 示范程序2

第二章 语言概念9

2一1 字符集9

2—2 分隔符9

2—3 COBOL字9

2—3．1 关键字、任选字和专用字符9

2—3．2 象征常数10

2—3．3 专用寄存器10

2—4 用户定义字11

2—5 常字11

2—5．1 数值常字11

2—5．2 字母数字常字11

2—6 源程序格式12

2—6．1 行、语句和句子12

2—6．1．1 调试行12

2—6．1．2 注释行12

2—6．1．3 延续行13

2—6．2 子句和短语13

2—6．3 A界13

第三章 标识部份14

第四章 设备部份15

4—1 配置节15

4—1．1 源计算机段15

4—1．2 目标计算机段15

4—1．3 专用名段16

4—2 输入—输出节18

4—2．1 文件的组织18

4—2．1．1 顺序文件18

4—2．1．2 相对文件19

4—2．1．3 索引文件19

4—2．1．4 数据库文件20

4—2．1．5 排序／合并文件21

4—2．2 文件的存取方式21

4—2．2．1 顺序存取方式22

4—2．2．2 随机存取方式22

4—2．2．3 动态存取方式22

4—2．3 文件控制段22

4—2．3．1 SELECT子句22

4—2．3．2 OPTIONAL子句26

4—2．3．3 ASSIGN子句26

4—2．3．4 RESERVE子句27

4—2．3．5 ORGANIZATION子句28

4—2．3．6 ACCESS MODE子句28

4—2．3．7 FILE STATUS 子句和INFOS STATUS子句29

4—2．3．8 PARITY子句30

4—2．3．9 ALLOW SUB-INDEX子句和LEVELS子句30

4—2．3．10 COMPRESSION子句30

4—2．3．11 INDEX SIZE子句31

4—2．3．12 SELECT子句例子31

4—3 I—O—CONTROL段31

第五章 数据部份33

5—1 结构33

5—2 文件节34

5—2．1 文件描述体34

5—2．1．1 EXTERNAL子句37

5—2．1．2 块、节点和记录的大小37

5—2．1．3 RECORDING MODE子句38

5—2．1．4 LABEL RECORDS子句39

5—2．1．5 VALUE OF子句39

5—2．1．6 DATA RECORD子句40

5—2．1．7 LINAGE子句40

5—2．1．8 CODE-SET子句41

5—2．1．9 FEEDBACK子句42

5—2．1．10 PAD子句42

5—2．1．11 MERIT子句42

5—2．1．12 PARTIAL RECORD子句42

5—3 工作单元节43

5—4 虚拟存贮单元节43

5—5 子模式节43

5—6 链接节43

5—7 屏幕节44

5—7．1 DISPLAY和ACCEPT命令44

5—7．1．1 DISPLAY44

5—7．1．2 ACCEPT45

5—7．1．3 句法46

5—8 数据类型51

5—8．1 数值数据51

5—9 数据描述体53

5—9．1 层号54

5—9．1．1 REDEFINES子句55

5—9．2 EXTERNAL子句56

5—9．3 OCCURS子句57

5—9．3．1 数组说明例子58

5—9．4 PICTURE子句59

5—9．4．1 定义字母数据项59

5—9．4．2 定义字母数字数据项59

5—9．4．3 定义编辑字母数字数据项59

5—9．4．4 定义数值数据项59

5—9．4．5 定义编辑数值数据项61

5—9．4．6 例子61

5—9．4．7 数据编辑61

5—9．5 USAGE子句65

5—9．6 SIGN子句65

5—9．7 SYNCHRONIZED子句66

5—9．8 JUSTIFIED子句66

5—9．9 BLANK WHEN ZERO子句66

5—9．10 VALUE子句66

5—9．11 数据描述体例子66

5—10 RENAMES体67

5—11 条件名体69

第六章 过程部份70

6—1 结构与概念70

6—2 名字限定71

6—2．1 过程名限定71

6—2．2 数据名限定71

6—2．3 条件名限定72

6—2．4 数组名限定72

6—3 END—XXX短语73

6—4 运算处理73

6—4．1 公用算术短语75

6—4．1．1 ROUNDED短语75

6—4．1．2 SIZE ERROR短语75

6—4．1．3 CORRESPONDING短语76

6—5 算术表达式76

6—6 条件表达式77

6—6．1 简单表达式77

6—6．2 复合表达式79

6—7 子程序设计80

6—8 程序分段81

6—9 打印文件的格式编排81

6—10 索引文件记录选择83

6—10．1 位置短语83

6—10．2 相对位置选用项短语83

6—10．3 KEY系列短语84

6—11 索引文件记录选用项86

6—12 处理I／O异常条件86

6—12．1 AT END短语86

6—12．2 INVALID KEY短语86

8—12．3 说明节87

6—12．4 COBOL文件状态数据项87

6—12．5 INFOS Ⅱ状态数据项87

第七章 过程语句89

7—1 算术运算89

7—2 数据处理和编辑89

7—3 程序控制转移89

7—4 终端输入／输出89

7—5 文件管理90

7—6 排序／合并90

7—7 其它90

7—8 ACCEPT90

7—9 ACCEPT DATE／DAY／TIME／LINE NUMBER／ESCAPE KEY90

7—10 ADD92

7—11 CALL94

7—12 CALL PROGRAM97

7—13 CANCEL97

7—14 CLOSE98

7—15 COMPUTE98

7—16 DEFINE SUB-INDEX99

7—17 DELETE100

7—18 DELETE FILE101

7—19 DISPIAY102

7—20 DIVIDE102

7—21 EXIT103

7—22 EXIT PROGRAM104

7—23 EXPUNGE104

7—24 EXPUNGE SUR—INDEX104

7—25 GO105

7—26 IF106

7—27 INSPECT107

7—28 LINK SUB-INDEX111

7—29 MERGE112

7—30 MOYE115

7—31 MULTIPLY116

7—32 OPEN116

7—33 PERFORM118

7—34 READ for a Sequential File119

7—35 READ for a Relative File120

7—36 READ for an IndeXed File121

7—37 RELEASE122

7—38 RETRIEVE123

7—39 RETURN125

7—40 REWRITE for a Sequential File125

7—41 REWRITE for a Relative File126

7—42 REwRITE for an Indexed File127

7—43 SEARCH128

7—44 SEEK130

7—45 SET130

7—46 SET UP／DOWN130

7—47 SORT131

7—48 START for a sequential File134

7—49 START for a Relative File134

7—50 START for all Indexed File135

7—51 STOP136

7—52 STRING136

7—53 SUBTRACT139

7—54 TRUNCATE140

7—55 UNDELETE140

7—56 UNLOCK141

7—57 UNSTRING142

7—58 USE144

7—59 WRITE for a Sequential File145

7—60 WRITE for a Relative File146

7—61 WRITE for an Indexed File147

第八章 拷贝功能149

8—1 结构149

8—2 替换串150

第九章 调试COBOL程序151

第十章 数据通用公司／数据库管理系统（DG／DBMS）接口程序152

10—1 编译并把DG／DBMS与COBOL程序链接在一起152

10—2 在数据部份的DG／DBMS子模式152

10—2．1 SYSTEM记录型158

10—2．2 系型158

10—2．3 说明自由指针161

10—2．4 READY161

10—2．5 INITIATE162

10—2．6 FIND162

10—2．7 STORE、GET、MODIFY、ERASE、CONNECT、DISCONNECT、RECONNECT和ASSIGN子句162

10—2．8 COMMIT162

10—2．9 ROLLBACK162

10—2．10 FINISH162

10—3 数据库内的定位162

10—4 错误处理163

10—5 子程序164

10—6 过程部份DML语句概述164

10—7 DML 语句资料节166

10—7．1 打开和关闭一个子模式166

10—7．1．1 READY167

10—7．1．2 FINISH167

10—7．2 处理程序语句167

10—7．2．1 INITIATE167

10—7．2．2 COMMIT168

10—7．2．3 ROLLBACK168

10—7．3 系连接操纵168

10—7．3．1 CONNECT169

10—7．3．2 DISCONNECT169

10—7．3．3 RECONNECT169

10—7．4 记录值操纵170

10—7．4．1 STORE170

10—7．4．2 GET171

10—7．4．3 MODIFY171

10—7．4．3 ERASE172

10—7．5 条件检验172

10—7．5．1 IF173

10—7．5．2 CHECK173

10—7．6 找出一个记录值173

10一7．6．1 FIND（positional）174

10—7．6．2 FIND（using data items）174

10—7．6．3 FIND（duplicates）175

10—7．6．4 FIND （current）176

10—7．6．5 FIND （OWner）177

10—7．7 找出并传送记录值177

10—7．7．1 OBTAIN（positioonal）177

10—7．7．2 OBTAIN（using data items）180

10—7．7．3 OBTAIN（duplicates）180

10—7．7．4 OBTAIN （current）180

10—7．7．5 OBTAIN（owner）181

10—8 COBOL程序使用DG／DBMS示范182

第十一章 怎样在AOS／VS 下使用COBOL192

11—1 生成源文件192

11—2 编译COBOL程序192

11—2．1 命令行192

11—2．2 编译开关193

11—2．3 编译程序文件194

11一2．4 程序列表194

11—2．5 交叉访问表194

11—2．6 代码列表195

11—2．7 编译时诊断195

11—2．8 结束信息196

11—3 链接COBOL程序196

11—3．1 程序库197

11—4 执行COBOL程序197

11—4．1 在SWAT调试程序中执行197

11—4．2 运行时错误信息197

11—5 AOS／VS COBOL子程序198

11—6 汇编语言子程序201

11—7 AOS／VS通用文件206

附录A COBOL保留字207

附录B ASCII和EBCDIC字符集212

附录C 处理无标记磁带215

附录D 使用范围218