*COMDECK  MAST3FD 
       FD  MAST3
           LABEL RECORDS ARE OMITTED
           RECORD CONTAINS 3195 CHARACTERS
           DATA RECORDS ARE CTL-RECORD-1 CTL-RECORD-2 
           CTL-RECORD-3 CTL-RECORD-4 CTL-RECORD-5.
       01  CTL-RECORD-1.
           03  CTL-HEADER.
               05  CTL-NAME              PICTURE X(27). 
               05  CTL-ADDRESS           PICTURE X(27). 
               05  CTL-REV-NUM           PICTURE S9(5). 
               05  CTL-DATE-UPD          PICTURE X(8).
               05  CTL-DATE-RES          PICTURE X(8).
               05  CTL-NUM-RES           PICTURE S9(5). 
               05  CTL-DEVICE            PICTURE X. 
               05  CTL-HMB               PICTURE 9(5).
               05  CTL-CUR-ENT           PICTURE S9(5). 
               05  CTL-AVL-TRK           PICTURE S9(5). 
               05  CTL-PRIME-NUM         PICTURE S9(5). 
               05  CTL-SYN-NUM           PICTURE S9(5). 
               05  CTL-LINES             PICTURE S99. 
               05  CTL-EOP-MSG           PICTURE X(54). 
               05  CTL-NUM-DEL           PICTURE S9(5). 
               05  CTL-NUM-INS           PICTURE S9(5). 
               05  CTL-NUM-UPD           PICTURE S9(5). 
               05  FILLER                PICTURE XX.
               05  CTL-PRIME-NUM-REL     PICTURE S9(5). 
               05  CTL-REL-LIMIT         PICTURE 99.
               05  CTL-DATA-REC-SIZE     PICTURE S9(5). 
               05  CTL-DBMS              PICTURE X. 
               05  CTL-DC-RELEASE        PICTURE X(6).
            03 FILLER                    PICTURE X(2997). 
  
        01  CTL-RECORD-2. 
            03 FILLER                    PICTURE X(3195). 
  
        01  CTL-RECORD-3. 
           03  CTL-ENTRY OCCURS 17 TIMES. 
               05  CTL-ENTRY-NAME        PICTURE X(15). 
               05  CTL-ENTRY-ID          PICTURE X(2).
           03  CTL-DIR OCCURS 126 TIMES.
               05  CTL-DIR-ID            PICTURE XX.
               05  CTL-DIR-CAT           PICTURE XXX. 
               05  CTL-DIR-START         PICTURE XXX. 
           03  FILLER                    PICTURE X(1898). 
  
        01  CTL-RECORD-4. 
           03  CTL-CATEGORY OCCURS 31 TIMES.
               05  CTL-CAT-NAME          PICTURE X(15). 
               05  CTL-CAT-ID            PICTURE X(3).
               05  CTL-CAT-LOC OCCURS 17 TIMES. 
                   07  CTL-CAT-ENTRY     PICTURE 99.
                   07  CTL-CAT-LENGTH    PICTURE 999. 
           03  FILLER                    PICTURE XX.
  
       01  CTL-RECORD-5.
           03  CTL-FLD-KEY. 
               05  CTL-FLD-ENTRY-TYPE    PICTURE X(2).
               05  CTL-FLD-CATEGORY      PICTURE X(3).
           03  CTL-FLD-ENTRY OCCURS 30 TIMES. 
               05  CTL-FLD-NAME.
                   07  CTL-FLD-NAME-3    PICTURE XXX. 
                   07  FILLER            PICTURE X(5).
               05  CTL-FLD-ID            PICTURE X(2).
               05  CTL-FLD-START         PICTURE 999. 
               05  CTL-FLD-LENGTH        PICTURE 999. 
               05  CTL-FLD-FORMAT        PICTURE X. 
               05  CTL-FLD-REV           PICTURE X. 
               05  CTL-FLD-STD           PICTURE X. 
           03  FILLER                    PICTURE X(2620). 
