cobol入门课件下载地址:http://download.csdn.net/detail/bq1073100909/8116273
cobol安装文件:http://download.csdn.net/detail/bq1073100909/8116289
cobol安装文件只能安装在winxp的环境中。
每一个程序都应包括以下四大部分:
IDENTIFICATION DIVISION (标识部)
ENVIRONMENT DIVISION(环境部)
DATA DIVISION(数据部)
PROCEDURE DIVISION(过程部)
过程部程序的结构如下:
部(Division) —部可包括若干节
节(Section) —节可包括若干段
段(Paragraph) —段可包括若干句子
句子(Senrence) —句子可包括若干语句
语句(Statement) —指定计算机完成一定的操作
子句(Clause) —指定完成某一方面的特定功能
cobol代码结构:
COBOL源程序的书写格式有两种:
(一) 美国国家标准COBOL参考格式ANSI(American National Standard COBOL reference format) 。
ANSI(American National Standard COBOL reference format)格式
1.1~6列,为“标号区”。可以填写6个数字。编译器会忽略它们。
2.第7列,是“续行标志区”。写上连接符“-”和注释符“*”。以“*”开头的行将被视为注释行,编译器同样会忽略它们。
3.第8~11列,称为“A区”,第8列称“A区边界”。 如部头,节头,段头,层号01,层号77以及文件描述物FD等应从A区开始书写
4.12~72列,称“B区”。写程序中的正文部分。
5.73~80列,为“注释区”。
(二) 终端格式。
1.每行可输256列,满屏后继续输入,直至输完本行。
2. A区占1-4列。第一列做续行标志区(“-”),或注释区(“*”)。
3. B区占5-256列。
数据项的定义:
以层号区分不同的数据定义层次。
01层是最高层,49层是最低层。
77层为独立数据项,常用于定义临时变量。
66层是为特殊描述符项目保留的,可以更名现有的数据项或组,或以原定义未允许的方式组合。
88层是对特殊数据项目条件名保留的
代码案例:
<span style="white-space:pre"> </span>000010 IDENTIFICATION DIVISION.
000020 PROGRAM-ID. SAMPLE01-2.
000030 ENVIRONMENT DIVISION.
000040 DATA DIVISION.
000050 WORKING-STORAGE SECTION.
000060 77 A PIC 9(3).
000070 77 B PIC 9(3).
000080 PROCEDURE DIVISION.
000090 S. ACCEPT A
000100 ACCEPT B
000110 ADD A TO B
000120 DISPLAY 'A=' A "A" ' B=' B.
000130 STOP RUN.