Ch 12_3. 2 Dimensional Arrays


Vector: One Dimensional Array with elementary items

01 VECTOR.
   03 A  OCCURS   5   TIMES   PIC 99.





01 A  OCCURS   5   TIMES   PIC 99.   <----- X

cf.: One Dimensional Array with Group Items

01 STU-TAB.
    03 STU-REC OCCURS 12 TIMES.
       05 NAME    PIC   X(10).
         ...
       05 GRADE   PIC   XX.

Table: Two Dimensional Array with Elementary Items

01 TABLE.
   03 ROW       OCCURS    3    TIMES.
      05 COL    OCCURS    5    TIMES.
         07 AA  PIC       99.












How to access

  - AA (2, 3)
  - ROW (1)
  - COL (1)
  - What's wrong? AA(4,1)       COL ( 2 ): RM/COBOL-85 accepts

Limitations