COBOL简易教.doc

COBOL简易教程 主要内容 1.COBOL语言的基本概念及程序的结构 一个例子 COBOL程序的结构 COBOL源程序的书写格式 2.COBOL数据表示 常量 层次的概念 PICTURE语句 数据在内存中的各种形式 3.算术运算 变量赋值 (MOVE, MOVE CORR) 算术运算(ADD, SUB, MUL, DIV, COMPUTE等) 内部函数 4.字符串处理 合并、分离、取子串、替换等 5.程序逻辑控制 条件的分类 IF、EVALUATE PERFORM 6.表处理 定义、赋值、引用、查询 7.读、写多格式记录文件 8.常用语句小结 9.子程序 1.关于COBOL的初步知识 COBOL是Common Business Oriented Language (通用商业语言，或称管理语言)的缩写 最适用于数据处理 比较接近于自然语言（英语） COBOL的结构严谨，层次性强 COBOL的缺点是比较烦琐。 1.1 一个例子： **************************************************************** * * * COBOL TRAINING PROGRAM * * VERSION 2.1.0 COPYRIGHT (C) 2004 * * WISTRON DALIAN SOFTWARE CO., LTD. * * ALL RIGHTS RESERVED. * * * **************************************************************** IDENTIFICATION DIVISION. PROGRAM-ID. EXERCIS6. AUTHOR. QXLU (WISTRON DALIAN). DATE-WRITTEN. 04-06-23. DATE-COMPILED. 04-06-23. ** * COMMENT : * * * ** ENVIRONMENT DIVISION. CONFIGURATION SECTION. SOURCE-COMPUTER. IBM-3084. OBJECT-COMPUTER. IBM-3084. INPUT-OUTPUT SECTION. FILE-CONTROL. SELECT DDI01 ASSIGN TO DDI01. SELECT DDO01 ASSIGN TO DDO01. * DATA DIVISION. FILE SECTION. * FD DDI01 LABEL RECORD IS STANDARD DATA RECORD ARE IN-AREA0, IN-AREA1. 01 IN-AREA0. 05 IN-YEAR-NUM PIC 9(2). 05 IN-PRINCIPAL PIC 9(4)V99. 05 FILLER