精通cobol－－9.12.1 使用SET语句对索引赋值

前面讲过，不能按照通常的方式，使用MOVE语句对索引变量赋值。对索引变量赋值，必须使用SET语句。下面结合几个小例子，具体谈谈如何使用SET语句进行赋值操作。

（1）求取索引为3所对应的进货商品编号和名称。此处可以首先将索引变量STORE-NDX置为3。然后，再通过该索引变量引用所求数据，并将结果存入相应位置。代码如下。