《COBOL语言与中文系统》求取 ⇩

第一章观念入门1

1.1 概览：WANG 2200 VS COBOL语言1

1.2 2200 VS硬体配置2

1.3 2200 VS COBOL程式之键入与编译2

1.4 LOG ON系统与键入COBOL原始程式3

图1-1 USE I.D.及通行码画面4

图1-2 处理控制画面5

图1-3 程式执行画面6

图1-4 输入定义画面7

图1-5 原始程式编辑特别画面8

图1-6原始程式编辑功能画面9

1.5 编译COBOL原始程式10

图1-7 原始程式CREATE选择画面11

图1-8编辑选择画面12

1.5.3 输出定义（OUTPUT Definition）13

1.5.2 输入定义（INPUT Defintion）13

1.5.1 选择（Options）13

图1-9 利用COBOL编译程式直接编译的执行画面14

图1-10 目的程式输出定义画面15

图1-11 副程式的连接画面16

图1-12 程式模组连接画面17

图1-13 连接输出画面18

图1-14连接选择画面19

1.5.5 由EDITOR直接编译原始程式20

1.5.4 连接副程式的方法20

图1-15 以EDITOR执行COBOL编译时的画面21

图1-16显示回覆码时之画面22

1.6 执行COBOL目的程式23

1.8 COBOL语言结论24

1.7 2200 VS之档案型别24

1.9 格式与标记（Format ant Notation）25

1.10.1 字元串（Character-String）与隔离符号（Separator）27

1.10 COBOL语言使用之字元集27

1.10.2 标点所使用之字元29

1.10.3 编辑所使用之字元29

1.10.4 算术运算字元30

1.10.5 关系及条件字元30

1.11 COBOL语辞与名称31

1.11.1 COBOL语辞与自定语辞（User-Defined Word）31

1.11.2 阶层号数33

1.11.3 保留字33

1.11.5 常数（Constants）34

1.11.4 名称（NAMES）34

1.12 COBOL语言参考格式（Reference Format）之应用38

图1-17COBOL语言的COD ING FORM39

1.12.1 秩序号码（Sequence Number）40

1.12.2 A区与B区40

1.12.3 连续线（Line of Continuation）42

1.12.4 空白列（Blank Lines）43

1.12.5 宣告与注释列（Declarative and Comment Lines）43

第二章档案结构与存取方式45

2.1 简介45

2.1.1 开档与关档（Opening And Closing a File）46

2.1.2 输入输出状态47

2.1.3 CURSOR POSITION47

2.2 档案结构47

2.2.1 循序档47

2.2.2 索引档48

2.3 录的型式（Record Type）49

2.3.1 固定长度的录49

2.3.2 变动长度的录50

2.3.3 压缩的录（Compressed Record）51

2.4 COBOL档案处理环境51

2 4.1 档案处理所需的FILE-CONTROL子句52

2.4.2 档案处理所需的FD资料53

2.4.3 建档54

2.4.4 利用VALUE OF子句设定档案位置54

2.4.5 启始空间的设定（Specifying Initial Space Allocation）55

2.5 COBOL循序档的处理56

2.5.1 COBOL循序档的循序存取方式56

2.5.2 COBOL循序档的随机存取方式58

2.5.3 COBOL循序档的动态存取方式59

2.6 COBOL索引档的处理60

2.7 COBOL交替索引档的处理62

2.8 共用档（SHARED FILES）64

2.8.1 共用索引档65

2.8.2 共用循序档66

2.9 COBOL档案执行绩效的选择67

2.9.2 索引档案的缓冲区68

2.9.1 循序档案的大缓冲器68

2.9.3 设定索引及资料组合密度71

2.10 COBOL档案有关错误的处理72

2.11 列表档的处理（Print File Processing）76

2.11.1 定义COBOL列表档76

2.11.2 利用BEFORE/AFTER ADVANCING子句控制列表机77

2.11.3 利用象徵常数控制列表机78

2.12.2 利用LABEL RECORDS子句处理磁带标记80

2.12.1 磁带标记的处理（Tape Label Processing）80

2.12 磁带档的处理80

3.1 概论83

第三章识别部83

3.2 结构（ORGANI ZAT ION）83

3.2.1 程式识别段（PROGRAM-ID PARAGRAPH）84

PROGRAM-ID Paragraph84

3.2.2可以取舍的段（OPTIONAL PARAGRAPH）85

Comment-entry Paragraphs85

3.2.3编译日期段（DATE-COMPILED PARAGRAPH）86

4.1 概说87

第四章设备部87

4.2 结构88

OBJECT-COMPUTER Paragraph90

SOURCE-COMPUTER Paragraph90

4.2.1组态节90

SPECIAL-NAMES Paragraph91

EIGURATIVE-CONSTANS Paragraph92

FILE-CONTROL Entry-for Consecutive Files94

4.2.2输入输出节94

FILE-CONTROL Paragraph94

FILE-CONTROL Entry-for Indexed Files95

I/O-CONTROL Paragraph102

第五章资料部103

5.1 与电算机型式独立的资料描述（Computer Independent Data Description）103

Logical and Physical Records103

5.1.1逻辑录与档案概念（Logical Record and File Concept）103

Concept of Levels104

5.1.2阶层的观念（Concepts of Levels）104

5.2 资料部结构105

File Description Entry105

5.2.1档案节（FILE SECTION）106

BLOCK CONTAINS Clause107

DATA RECORDS Clause108

LABEL RECORDS Clause109

RECORD CONTA INS Clause109

VALUE OF Clause110

5.2.2工作储存节（WORKING-STORAGE SECTION）113

5.2.3 资料描述项（The Data Discription Entry）115

LEVEL-NUMBER Clause116

DATA-NAME or FILLER Clause118

PICTURE Clause119

REDEF INES Clause120

SIGN Clause122

USAGE Clause124

SYNCHRONIZED Clause124

VALUE Clause126

5.2.4联系节（LINKAGE SECTION）128

Linkage Section128

第六章资料类别及资料之移送131

6.1 资料类别与移送时之关系131

6.2 资料类别（Class of Data）131

Classes of Data131

Algebraic Signs132

Character Representation and Radix132

6.3字元表示法与语根132

6.4 算术符号（Algebraic Signs）132

6.5 标准排列规则133

Standard Alignment Rules133

BLANK WHEN ZERO Clause146

6.6非标准排列规则146

6.7 大量资料处理147

JUSTIFIED Clause147

OCCURS Clause148

6.8.1合格名称与注标（Qualification And Subscripting）150

6.8 资料参照方法（Methods of Data Refererce）150

Qualification and Subscripting150

6.8.2指标（Indexing）151

Indexing151

6.8.3条件名称（Condition-Name）152

Condition Names152

6.8.4识别号（Identifier）153

Identifiers153

第七章 程序部155

Procedure Division Header155

7.2结构155

7.1 概说155

Procedure Division Body.156

Statements and Sentences156

7.2.2指令与句子（Statements and Sentences）156

7.2.1 程序体（PROCEDURE DIVISION BODY）156

USE Statement159

7.3程序部宣告159

7.4 基本动作叙述指令161

OPEN Statement-for Consecutive Files161

图7-1 CONSEC程式第一个显示之画面165

图7-2 CONSEC程式所显示的第二个画面166

图7-3 CONSEC程式所显示的第三个画面167

OPEN Statement-for Indexed Files168

图7-4 NAMEADDR档案中的最终资料，仅有一笔170

READ Statement-for Consecutive Files171

READ Statement-for Indexed Files176

PERFORM Statement179

EXIT Statement183

SET Statement184

SEARCH Statement186

MOVE Statement189

WRITE Statement-for Consecutive Files193

WRITE Statement-for Indexed Files200

CLOSE Statement-for Consecutive Files203

CLOSE Statement-for Indexed Files204

STOP Statement204

ACCEPT Statement207

8.2少数资料输出入指令207

8.1 少数资料输出入的方式207

第八章 少数资料之输入与输出207

DI SPLAY Statement209

9.1算术表示式（Arithmetic Expressions）213

第九章算术表示式213

9.2 算术运算子（Arithmetic Operators）213

9.3 排列与定数值规则（Formation and Evaluation Rules）214

ROUNDED Phrase215

SIZE ERROR Phrase215

9.4算术指令215

ALTER Statement216

ADD Statement216

SUBTRACT Statement217

MULTIPLY Statement219

DIVIDE Statement220

COMPUTE Statement222

第十章与IF指令有关的条件225

10.1 程序逻辑类别225

IF Statement226

10.2决定分岐点之指令226

10.3.1 简单条件（Simple Conditions）229

10.3 条件（Conditions）229

Simple Conditions229

Complex Conditions233

10.3.3负简单条件（Negated Simple Conditions）233

10.3.2 复合条件（Complex Conditions）233

10.3.4 组合与负组合条件（Combined and Negated Combined Conditions）234

Condition Evaluation Rules235

10.4定值规则（Evaluation Rules）235

10.5 缩写的组合关系条件（Abbreviated Combined Relation Conditions）236

11.1 前言239

COPY Statement239

第十一章档案控制指令239

11.2 便利程式撰写之指令239

ENTER Statement240

11.3消除档案内RECORD的指令241

DELETE Statement241

REWRITE Statement-for Consecutive Files242

11.4修改档案内RECORD的指令242

REWRITE Statement-for Indexed Files245

11.5控制档案的指令246

START Statement-for Consecutive Files246

START Statement-for Indexed Files247

第十二章主程式与副程式的连接251

12.1 主程式连接副程式之方式251

CALL Statement251

12.2副程式被主程式连接之方式252

EXIT PROGRAM Statement253

12.3COBOL主程式呼叫其他语言副程式之方法256

第十三章改变执行路程及结果的指令261

13.1 前言261

13.2 改变执行程序的指令 ALTER261

GO TO Statement262

13.3转移程序执行控制权的指令GO TO262

13.4 登录或代替资料项字元的指令INSPECT263

INSPECT Statement263

14.2.1资源（Resources）269

第十四章进阶共用环境269

14.1 进阶共用之需求269

14.2 进阶共用之观念269

14.2.3 事先声明（Preclaim）与需要时声明（Claim-as-needed）策略270

14.2.2 HOLD以供更新（Update）与读取（Retrieval）270

14.3.1 HOLD指令271

14.3 COBOL的进阶共用271

14.2.4 资源要求冲突的解决271

HOLD Statement271

14.3.2HOLD LIST指令275

14.3.3 HOLD EXTENSION-RIGHTS指令276

FREE Statement278

14.3.4FREE指令278

14.4 进阶共用撰写时的建议279

14.5.1 通用的EXTENSION-RIGHTS280

14.5.2 僵局的恢复280

14.5 COBOL进阶共用未来的改进280

15.1 简介281

15.2 WORKSTATION FILE281

第十五章工作终端机（WORKSTATION）的程式设计281

15.4 WORKTATION的写码（Coding）282

15.3 栏属性字元282

15.4.1 FAC与FIGURATIVE-CONSTANTS Paragraph282

15.4.2 FILE-CONTROL Paragraph283

15.5 CRT的控制284

15.5.1 方法一，利用特定的Compiler子句控制CRT284

图15-1 ACROSS程式执行时在CRT出现的画面288

ROW Clause289

COLUMN Clause289

RANGE Clause290

OBJECT Clause292

SOURCE or VALUE Clause292

OCCURS Clause294

图15-2 DOWNT程式执行时CRT所显现的画面296

图15-3 ACRSDOWN程式执行时所产生的画面297

图15-4 WSOCCUR程式执行时於CRT上所显现的画面301

DISPLAY AND READ Statement302

15.5.2方法二，经由WORKSTATION FILE控制CRT313

15.5.4 WRITE控制字元及ORDER AREA的说明320

15.5.3 DISPLAY AND READ与整个萤幕输出入的共存320

15.5.5 工作终端机操作者与电算机的连系330

16.2.1 三角编号法简介333

16.1 前言333

16.2 王安中文三角编号法333

第十六章三角号码（TCC）与中文档案结构333

16.2.2 三角编号法的优点和用途334

16.3 辅助「三角编号基本符号」记忆法336

16.4 三角编号法规则338

16.4.1 取角原则338

16.4.2 取形原则340

16.4.3 同号字、异体字的处理344

16.5 王安中文简易输入法345

16.5.1 简介345

16.5.2 基本符号345

16.5.3 输入法则345

16.5.4 基本符号之异体字（括弧中为举例字）347

图16-1 PARALLEL DIC的PATTERN的排列350

图16-2SERIAL DIC的PATTERN的排列351

16.6.2 档案结构352

16.6.3 档案名称及其所属之LI BRARY352

16.6.1 档案内容352

16.6 字典档案内容与结构352

16.7 中文系统公用程式353

图16-3 UPDICBO的输入档案画面354

图16-4 UPDICBO选择修改路径的画面355

图16-5 UPDICBO供修改的字型画面356

图16-6 执行RAMGEN时所产生的操作画面357

图16-7 PRTDICBO用以设定列表秩序及其相关资料之画面359

图16-8 PRTDICBO执行时所需的DIC档案输入画面360

图16-9 执行DISPDIC首先出现用以设定暂停时间的画面361

图16-10 CDATENTR的选择画面362

图16-11 定义资料档与CONTROL档的画面363

图16-12 执行PDISPLAY的输入画面364

图16-13 CREPORT的功能选择画面366

图16-14 CREPORT报表定义画面367

图16-15 CSORT功能选择画面369

图16-16 CSORT输入档案画面370

图16-17 CSORT定义中文SORT的位置，长度及秩序的画面371

图16-18 CSORT完成时的输出画面372

图16-19 IMENU的功能选择画面374

图16-20 IMENU设定功能键的画面375

图16-21 IMENU完成後的中文画面376

图16-22 PRINTUTY程式执行时供SPOOL档案转换的画面377

图16-23 CRTGEN的使用流程图378

图16-24 CRTGEN功能图379

图16-25 CVDMENU的选择画面381

图16-26 CVD2TO3V输入资料档案的画面383

图16-27 CVD2TO3V的转换位置及长度的输入画面384

图16-28 CVD2TO3F的转换位置与长度的输入画面385

图16-29 @GENDIC@维护字型档的选择画面386

图16-30 @GENDIC@的维护、修改、删除字型的画面387

图16-31 列印字型档所用的列表机的选择画面388

图16-32 DICPRUTY选择所要列印的字型档的选择画面389

图16-33 DICPRUTY列印字型档的秩序选择画面390

图16-34DICPRUTY所印出之中文字型391

17.2 2221 VC及2 261 VC列表机393

17.1 前言393

17.2.1 性能及限制393

第十七章中文报表之印刷393

17.2.2 程式控制码（Programming Control Code）394

17.2.3 PRINTER RECORD长度及其限制394

17.2.4 例题395

17.3 5521 Ⅰ及9263 Ⅵ列表机403

17.3.1 性能及限制403

17.3.2 输出控制404

17.3.3 中英文混合列印方法及其RECORD长度407

17.3.4 例题407

17.4 9563I与9580I列表机413

17.4.1 性能及限制413

17.4.2 输出控制413

17.4.3 例题417

第十八章工作终端机之中文画面程式设计431

18.1 前言431

18.2 2246 PI终端机431

18.2.1 性能及限制431

18.2.2 中文萤光幕区之Order Area及中文Cursor之控制431

18.2.3 例题433

图18-1CTYPING程序执行时，於英文萤幕上所显示之画面441

18.3.1 性能及限制442

18.3 2246 SI终端机442

18.3.2 Order Area及Cursor之控制443

图18-2IDISPLAY副程式执行时出现的GETPARM画面446

18.3.3 例题448

图18-3 程式PRGNAME於执行MENU段时召唤IACCEPT所出现之中文画面449

图18-4 程式PRGNAME於执行ADDR-1时召唤IACCEPT所产生的中文画面450

图18-5 程式PRGNAME於执行MCONT段时召唤IACCEPT所产生的中文画面451

图18-6 程式PRGNAME执行DISPLAY-MODSCREEN段时召唤IACCEPT所产生的中文画面452

图18-7程式PRGNAME执行DISPLAY-DELSCREEN时召唤IACCEPT所产生的中文画面453

18.4 5324 I终端机468

18.4.1 性能及限制468

18.4.2 萤幕输出入的控制468

18.4.3 例题471

图18-8 执行MENU段召唤TACCEPT所产生的画面472

图18-9 执行ADDR-1段召唤TACCEPT所产生的画面473

图18-10 程式REALCO执行MCONT段时召唤TACCEPT所产生的中文画面474

图18-11 程式REALCO执行DISPLAY-MODSCREEN段时召唤TACCEPT所产生的中文画面475

图18-12 程式REALCO执行DCONT段时召唤TACCEPT所产生之中文画面476

图18-13程式REALCO执行DISPLAY-DELSCREEN段时召唤TACCEPT所产生之中文画面477

18.5 2246SI与5324I终端机并存的技术487

18.5.1 Release 6.10的IACCEPT副程式487

18.5.2 2个Byte内码转换成3个Byte内码的副程式490

18.5.3 3个Byte内码转换成2个Byte内码的副程式490

18.5.4 例题491

第十九章2200 COBOL语言493

19.1 简介493

19.1.1 2200 COBOL语言特性493

19.1.2 磁碟管理系统（Disk Management System）493

19.1.3 列印录表（Print Spooling）494

19.2 VS COBOL程式於2200系统之执行494

19.2.1 不可用於2200 COBOL之述句495

19.2.2 可使用，但不同於VS COBOL之2200 COBOL述句496

19.3 2200 COBOL与VS COBOL之比较497

19.3.1 COBOL核心之差异（Difference Within the Nucleus of COBOL）497

19.3.2 循序输出入之差异（Difference Within Sequential I-O ）500

19.3.3 索引输出入之差异（Differences Within Indexed I-O）502

19.4 可用於2200 COBOL但不可使用於VS COBOL之叙句504

19.4.1 COBOL核心之差异（Differences Within the Nucleus of COBOL）504

19.4.2 循序输出入之差异（Differences Within Sequential I-O）507

19.4.3 相对输出入之差异（Differences Within Relative I-O）507

19.4.4 索引输出入之差异（Differences Within Indexed I-O）516

附录A 保留字（RESERVED WORDS）517

附录B ASCⅡ字元与其他系统之字元对照表521

附录C FILE STATUS的键值531

附录D Field Attribute Characters(FAC)537

附录E COBOL编译的选择539

附录F VS COBOL语法一般格式汇总545

附录G 2200 COBOL语言指南559

附录H 95801/92801列表机控制码577

参考书籍579