****************************************************************
      *                                                              *
      * API:  QSYLATLO                                               *
      * Format:  ATLO0100                                            *
      *                                                              *
      ****************************************************************
       01 ATLO0100-INPUT.
           05 I-AUTH-LIST                    PIC X(10).
 
       01 ATLO0100-HEADER.
           05 H-AUTH-LIST.
              10 H-LIST-NAME                 PIC X(10).
              10 H-LIST-LIBRARY              PIC X(10).
           05 H-LIST-OWNER                   PIC X(10).
 
       01 ATLO0100-LIST.
           05 L-OBJECT.
              10 L-OBJECT-NAME               PIC X(10).
              10 L-OBJECT-LIBRARY            PIC X(10).
           05 L-OBJECT-TYPE                  PIC X(10).
           05 L-AUTH-HOLDER                  PIC X(1).
      ****************************************************************

     IINPUT       DS
     I                                        1  10 AUTLST
     IHEADER      DS
     I                                        1  20 LSNMLB
     I                                        1  10 LSTNAM
     I                                       11  20 LSTLIB
     I                                       21  30 LSTOWN
     ILIST        DS
     I                                        1  20 OBNMLB
     I                                        1  10 OBJNAM
     I                                       11  20 OBJLIB
     I                                       21  30 OBJTYP
     I                                       31  31 AUTHLR
 
      ****************************************************************
      *                                                              *
      * API:  QSYLATLO                                               *
      * Format:  ATLO0200                                            *
      *                                                              *
      ****************************************************************
       01 ATLO0200-INPUT.
           05 I-AUTH-LIST                    PIC X(10).

 
       01 ATLO0200-HEADER.
           05 H-AUTH-LIST.
              10 H-LIST-NAME                 PIC X(10).
              10 H-LIST-LIBRARY              PIC X(10).
           05 H-LIST-OWNER                   PIC X(10).
 
       01 ATLO0200-LIST.
           05 L-OBJECT.
              10 L-OBJECT-NAME               PIC X(10).
              10 L-OBJECT-LIBRARY            PIC X(10).
           05 L-OBJECT-TYPE                  PIC X(10).
           05 L-AUTH-HOLDER                  PIC X(1).
           05 L-OBJECT-OWNER                 PIC X(10).
           05 L-OBJECT-ATTRIBUTE             PIC X(10).
           05 L-OBJECT-TEXT                  PIC X(50).
      ****************************************************************
     IINPUT       DS
     I                                        1  10 AUTLST
     IHEADER      DS
     I                                        1  20 LSNMLB
     I                                        1  10 LSTNAM

     I                                       11  20 LSTLIB
     I                                       21  30 LSTOWN
     ILIST        DS
     I                                        1  20 OBNMLB
     I                                        1  10 OBJNAM
     I                                       11  20 OBJLIB
     I                                       21  30 OBJTYP
     I                                       31  31 AUTHLR
     I                                       32  41 OBJOWN
     I                                       42  51 OBJATR
     I                                       52 101 OBJTXT