cobol学习之一开发环境及简单程序
cobol学习之一开发环境及简单程序
指尖残雪 发表于2年前
cobol学习之一开发环境及简单程序
  • 发表于 2年前
  • 阅读 2
  • 收藏 0
  • 点赞 2
  • 评论 0

腾讯云 新注册用户 域名抢购1元起>>>   

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.


共有 人打赏支持
粉丝 8
博文 73
码字总数 0
×
指尖残雪
如果觉得我的文章对您有用,请随意打赏。您的支持将鼓励我继续创作!
* 金额(元)
¥1 ¥5 ¥10 ¥20 其他金额
打赏人
留言
* 支付类型
微信扫码支付
打赏金额:
已支付成功
打赏金额: