哪吒机器人提醒:

提醒:COBOL
【标题】精通cobol--9.4.3 PERFORM VARYING语句的一些灵活应用
【摘要】在实际应用中,perform varying语句不仅仅用于计算表中所有数据的总和。下面,仍然结合工资管理系统的模型,通过几个例子讲解perform varying语句的灵活应用。(1)计算单号月份的工资总和。这里实际上是要计算1、3、5、7、9、11这6个月的工资总和。可以看出,相邻两个月之间都相隔1个月,是有规律的。实际上,具体到代码实现,也就是表中的下标每次增量要求为2。代码如下。perform 200-add-to-total varying salary-sub from 1 by 2 until salary-sub > 11(2)计算第四季度的工资总和。这里是要计算10月份,11月份,12月份这3个月的工资总和。因此,就不能再从1月份开始计算起了。代码如下。perform 200-add-to-total varying salary-sub from 10 by 1 un... (04-16 22:57)