RSS COBOL
哪吒推荐该订阅
简介:最新cobol专著《精通cobol——大型机商业编程技术详解 》
原站:http://blog.csdn.net/COBOL_OS/
指数:
点击立即订阅,“COBOL”的内容有更新,哪吒第一时间提醒您
“COBOL”的内容更新
累计:10 篇(自 2009-10-28 起)
更新:约4篇/年,最后更新842 天前
COBOL
在本小节最后,来比较一下perform varying语句和之前学习过的perform语句。通过比较,加深对于perform varying语句的理解。同时,也可以此作为对于perform语句的一个简单回顾。在上面用到的的工资管理系统模型中,使用perform varying语句计算全年总工资的代码如下。perform 200-add-to-total varying salary-sub from 1 by 1 until salary-sub > 12……200-add-to-total. add salari... (307 天前)
COBOL
在实际应用中,perform varying语句不仅仅用于计算表中所有数据的总和。下面,仍然结合工资管理系统的模型,通过几个例子讲解perform varying语句的灵活应用。(1)计算单号月份的工资总和。这里实际上是要计算1、3、5、7、9、11这6个月的工资总和。可以看出,相邻两个月之间都相隔1个月,是有规律的。实际上,具体到代码实现,也就是表中的下标每次增量要求为2。代码如下。perform 2... (307 天前)
COBOL
上面谈到了perform varying语句的基本处理流程。那么,如何使用perform varying语句处理表中数据呢?下面仍然结合具体实例进行讲解。以员工工资管理系统为例,首先进行简化模型提取。提取模型只包括一个员工一年12个月的工资,即只含有12个数据项。将这12个数据定义为下标表结构如下。01 annual-salary-table. 05 salaries pic 9(5) occurs 12 times.05 salary-sub pic 99 usage is c... (307 天前)
COBOL
perform varying语句的基本格式如下所示。perform …varying …from …by…until …其中,“…”部分则是相应的变量,根据具体的不同情况而有所不同。q statement变量:指进行处理过程的名称。q item-sub变量:通常为表中数据对应的下标。q x1变量:通常指从表中的哪一个下标开始处理。q x2变量:通常指每次处理后对于下标的增量。q x3变量:通常指下标经过増量处理后达到的上限值。使... (307 天前)
COBOL
上一小节中讲到的occurs语句是在表的定义中需要使用到的。本节将主要讲解在表的操作中经常用到的一个语句,即perform varying语句。... (307 天前)
COBOL
这里需要说明的是,使用occurs语句只是避免了重复书写相类似的定义代码。occurs语句并没有压缩定义数据的存储空间。数据的存储空间大小和不使用occurs语句时,定义数据的存储空间大小是相同的。通过下面的图解可以更直观的说明这一点。首先,使用occurs语句定义一个普通结构的表,代码如下。01 test-table-two 05 test-row occurs 3 times. 10 test-item-one pic x (1). 10 test-item... (307 天前)
COBOL
occurs语句的语法格式如下。occurs n times.其中,“n”为一个整型数据类型,指明了重复的次数。“times”是该语句固定格式的一部分内容,不可任意指定。occurs语句用于在数据部的工作存储节定义表,并且occurs不能出现在01级数据类型后。例如,以下代码就错误地使用了occurs语句。01 test-table-one occurs 5 times. ← 错误的用法 05 test-item-one pic x (3). 05 test-item-two pi... (307 天前)
订阅者 ( 1 )
amy5731987
相关订阅源
RSS StanMedley.com

for classic animations

指数 | 2人订阅  

RSS Sports Warehouse Discount Center

swdc blog.com - sporting goods superstore

指数 | 1人订阅  

我要反馈