To define data structures in COBOL format

Restriction: This topic applies only when the AppMaster Builder AddPack has been installed, and applies only to Windows platforms.

In the Program Painter, type 01 in columns 4 and 5.
Type your 01-level data item starting in column 12.

To define elementary data items, skip a line and type them starting in column 12, as shown below. We recommend that you indent each new level of elementary data items four columns. For example:

   01      WS-STRUCT-IN-COBOL-FORMAT.
           05  MY-WS-FIELD-1                   PIC X(8).
           05  MY-WS-FIELD-2.
               10  MY-WS-FIELD-3               PIC X(8).
               10  MY-WS-FIELD-4               PIC X(3).

Generated AMB source:

      01  WS-STRUCT-IN-COBOL-FORMAT.
          05  MY-WS-FIELD-1                   PIC X(8).
          05  MY-WS-FIELD-2.
              10  MY-WS-FIELD-3               PIC X(8).
              10  MY-WS-FIELD-4               PIC X(3).