精通cobol－－9.2.2 下标的作用

  前面已经讲到，在表中，相似数据被指定为同一个名称，作为表的一个条目。那么，如何访问这些拥有同一个名称的不同数据？这里就要用到下标了。下标相当于表中各数据的编号，以此指定和访问表中定义的各项数据。

仍然通过上例进行讲解。对应上面定义的下标表，原始数据结构即在表的基本用途一节中“不使用表的情况”下的定义。代码如下。

01  ANNUAL-DEPOSIT-DATA.                                    

    05  JAN-DEPOSIT       PIC 9(5).                           

    05  FEB-DEPOSIT       PIC 9(5).                           

    05  MAR-DEPOSIT      PIC 9(5).                        

……                                                      

05  DEC-DEPOSIT       PIC 9(5)                           

当使用此前定义的下标表来访问上面定义的不同月份的存款额时，就需要用到下标了。访问不同月份存款额所对应的含有不同下标的条目依此如下。

q      访问JAN-DEPOSIT对应于DEPOSITS （1）

q