您的位置:首页 > 其它

精通cobol--9.12 处理索引语句SET

2008-04-28 10:24 309 查看

  前面已经讲到,对于索引表中的索引变量而言,是不能将其视作通常的变量进行处理的。如果要对索引变量进行操作,必须使用SET语句。使用SET语句对索引变量进行操作,大体上可以分为两大类型的操作。其中一种类型的操作是对其进行赋值操作,另一种是对其进行算术运算操作。
下面结合一个实例分别对二者进行详细讲解。首先,以超市管理系统为基本模型。定义相应的索引表如下。
01 MARKET-TABLE.
05 STORE-ITEM OCCURS 10 TIMES
INDEXED BY STORE-NDX.
10 STORE-ITEM-NUM PIC 9(9).
10 STORE-ITEM-NAME PIC X(10).
05 SALE-ITEM OCCURS 10 TIMES
INDEXED BY SALE-NDX.
10 SALE-ITEM-NUM PIC 9(9).
10 SALE-ITEM-NAME PIC X(10).
这里有两类数据,分别为超市进货数据和超市售出商品数据。其中,以STORE开头的数据对应进货数据,以SALE开头的数据对应售出商品数据。此外,以NUM结尾的数据表示商品编号,以NAME结尾的数据表示商品名称。
该表中的索引变量相应也有两个,分别为STORE-NDX和SALE-NDX。以下将重点对这两个索引变量进行讨论。
内容来自用户分享和网络整理,不保证内容的准确性,如有侵权内容,可联系管理员处理 点击这里给我发消息
标签: