cobol谭浩强版学习笔记

《cobol谭浩强版学习笔记》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、COBOL资料整理COBOL语言概述一．COBOL程序的结构1．部IDENTIFICATIONDIVISION标识部ENVIRONMENTDIVISION环境部DATADIVISION数据部PROCEDUREDIVISION过程部2．节（SECTION）和段（PARAGRAPH）（1）部-节-段（2）标识部下面不设节，直接设段（3）过程部可以设节，下面再设段，也可以直接设段3．句子、语句和子句每一段由若干句子（Sentence）组成，一个句子以句号加上一个以上的空格来结束。句子由语句（Statement）组成。语句中又可以包

2、含若干子句（clause），每一个子句也有一个动词（但这个动词往往是可以省略的），它指定某一方面的特定功能。二．COBOL源程序的书写格式1．1-6列：标号区2．第7列：续行标志区（“-”为续行，“*”为注解）3．8-11列：A区（部头，节头，段头，层号01、77，文件描述符FD等）4．12-72列：B区（正文）5．73-80列：注释区三．COBOL字符数字0-9，大写字母A-Z，小写字母a-z，专用字符15个{+-*/=,.;‘()<>$空格}四．常量1．数值常量（1）小数点不能多于一个，而且不能出现在常数最右边。（2）数

3、值常量的长度不能超过18位数字。（3）至少要有一个数字，不能有多于一个符号。（4）数字间不能有空格，空格是分界符。2．非数值常量（1）用’’把字符串包起来（2）假如要把’’放到非数值常量中，用QUOTE保留字，如MOVEQUOTE‘CHINA’QUOTETOA（3）长度不应超过120个字符。3．表意常量表意常量所表示的值ZERO/ZEROS/ZEROES表示一个或多个零字符SPACE/SPACES表示一个或多个空格字符HIGH-VALUE/HIGH-VALUES表示一个或多个具有“最高值”的字符（每个字符的二进制表示为111

4、11111）LOW-VALUE/LOW-VALUES表示一个或多个具有“最小值”的字符（每个字符的二进制表示为00000000）QUOTE/QUOTES表示一个或多个引号字符ALL常量表示由一个或多个该常量组成的字符串五．COBOL的数据关系文件记录1记录i记录n组合项1组合项i组合项n初等项组合项p组合项q初等项初等项初等项初等项过程部初步一．输入输出语句1．ACCEPT（接收语句）：直接从中断键盘或系统指定的输入设备上输入少量的数据。语法：ACCEPT标识符[FROM助忆名]2．READ（读语句）：从外部文件上读入数据输

5、到程序中的数据项中。语法：READ文件名RECORD[INTO标识符][；ATEND执行语句]3．WRITE（写语句）：将内存区中的数据输出到外部设备语法：WRITE记录名[FROM标识符1][BEFOREADVANCING标识符2/整数LINE/LINES]AFTER助忆名/PAEG4．OPEN（打开语句）：程序若要读和写文件，先要把文件打开语法：OPENINPUT/OUPUT文件名1[，文件名2……]5．CLOSE（关闭语句）：关闭文件。语法：CLOSE文件名1[，文件名2……]二．算术运算语句1．ADD（加法语句）举例

6、：ADDATOBA+BàBADD15TOC15+CàCADDA，BTOCA+B+CàCADD15，25TOC15+25+CàCADDA，BGIVINGCA+B--CADD15，25GIVINGT15+25àTADDA，BTOC，DA+B+CàC,A+B+DàD2．SUBTRACT（减法语句）举例：SUBTRACTBFROMAA-BàASUBTRACTB，CFROMAA-B-CàASUBTRACTB，CFROMA，TA-B-CàA,T-B-CàTSUBTRACTB，CFROMAGIVINGXA-B-CàX3．MULTIPLY（

7、乘法语句）举例：MULTIPLYABYBA*BàBMULTIPLY0.5BYB0.5*BàBMULTIPLYABYBGIVINGCA*BàCMULTIPLY1.5BY3GIVINGC,A1.5*3àC,1.5*3àAMULTIPLYABYB,CA*BàB,A*CàC4．DIVIDE（除法语句）举例：DIVIDEAINTOBB/AàBDIVIDEAINTOBGIVINGCB/AàCDIVIDEABYBGIVINGCA/BàC5．COMPUTE（计算语句）语法：COMPUTE标识符1[，标识符2]……=算术表达式举例：COMPU

8、TET=（A+B）*C/D注意：（1）所以运算符两侧应留一空格（2）括号外侧应留空格，内侧可不要留空格三．MOVE（传送语句）语法：MOVE标识符1/常量1TO标识符2[，标识符3]……四．GOTO（转移语句）语法：（1）GOTO过程名（2）GOTO过程名1[，过程名2]……过程名n，DE