Creating Different Dimension Tables in COBOL

As we saw single dimension table in my blog linked here . There are many other ways to use COBOL table.

Another Way of Single Dimension TABLE:

COBOL Declaration:

01  A1-TABLE.

      05 A2-TABLE OCCURS 100 TIMES

            15 P1-NO             PIC X(05).

            15 P1-NAME        PIC X(10).

             15 P1-TEL NO.

                   25   LAND-LINE  PIC 9(10).

                   25   MOBILE        PIC 9(11).

This declarlation will work in COBOL as table described below: