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
- COBOL-74: upto 3 levels
- COBOL-85: upto 7 levels