
|
**************************************************************** * * * API: QUSLMBR * * Format: MBRL0100 * * * **************************************************************** 01 MBRL0100-INPUT. 05 USER-SPACE PIC X(20). 05 FORMAT-SPECIFIED PIC X(08). 05 FILLIB-SPECIFIED. 10 FILE-NAME-SPECIFIED PIC X(10). 10 LIBRARY-SPECIFIED PIC X(10). 05 MEMBER-NAME-SPECIFIED PIC X(10). 05 OVERRIDE PIC X(01). 01 MBRL0100-HEADER. 05 FILE-NAME-RETURNED PIC X(10). 05 LIBRARY-RETURNED PIC X(10). 05 FILE-ATTRIBUTE PIC X(10). 05 FILE-TEXT PIC X(50). 05 NUMBER-MEMBERS PIC S9(9) COMP-4. 05 SOURCE-FILE PIC X(01). * V2R30 |
05 FILLER PIC X(03). 05 FILE-TEXT-CCSID PIC S9(9) COMP-4. 01 MBRL0100-LIST. 05 MEMBER-NAME PIC X(10). **************************************************************** IINPUT DS I 1 20 USRSPC I 1 10 SPCNAM I 11 20 SPCLIB I 21 28 FORMAT I 29 48 FILLII I 29 38 FILNAI I 39 48 LIBNAI I 49 58 MBRNAI I 59 59 OVRRID IHEADER DS I 1 20 FILLIH I 1 10 FILNAH I 11 20 LIBNAH I 21 30 FILATR I 31 80 TEXT I B 81 840MBRNAH |
I 85 85 SRCF * V2R30 I 86 88 RESER1 I B 89 920FCCSID ILIST DS I 1 10 MBRNAL **************************************************************** * * * API: QUSLMBR * * Format: MBRL0200 * * * **************************************************************** 01 MBRL0200-INPUT. 05 USER-SPACE PIC X(20). 05 FORMAT-SPECIFIED PIC X(08). 05 FILLIB-SPECIFIED. 10 FILE-NAME-SPECIFIED PIC X(10). 10 LIBRARY-SPECIFIED PIC X(10). 05 MEMBER-NAME-SPECIFIED PIC X(10). 05 OVERRIDE PIC X(01). 01 MBRL0200-HEADER. 05 FILE-NAME-RETURNED PIC X(10). |
05 LIBRARY-RETURNED PIC X(10). 05 FILE-ATTRIBUTE PIC X(10). 05 FILE-TEXT PIC X(50). 05 NUMBER-MEMBERS PIC S9(9) COMP-4. 05 SOURCE-FILE PIC X(01). * V2R30 05 FILLER PIC X(03). 05 FILE-TEXT-CCSID PIC S9(9) COMP-4. 01 MBRL0200-LIST. 05 MEMBER-NAME PIC X(10). 05 SOURCE-TYPE PIC X(10). 05 CREATION-DATE PIC X(13). 05 LAST-SOURCE-CHANGE-DATE PIC X(13). 05 MEMBER-TEXT PIC X(50). * V2R30 05 MEMBER-TEXT-CCSID PIC S9(9) COMP-4. **************************************************************** IINPUT DS I 1 20 USRSPC I 1 10 SPCNAM I 11 20 SPCLIB I 21 28 FORMAT |
I 29 48 FILLIB I 29 38 FILNAI I 39 48 LIBNAI I 49 58 MBRNAI I 59 59 OVRRID IHEADER DS I 1 10 FILNAH I 11 20 FILLIH I 21 30 FILATR I 31 80 TEXT I B 81 840MBRNAH I 85 85 SRCF * V2R30 I 86 88 RESER1 I B 89 920FCCSID ILIST DS I 1 10 MBRNAL I 11 20 SRCTYP I 21 33 CRTDAT I 34 46 LSTCHG I 47 96 MBRTXT * V2R30 |
I B 97 1000MCCSID |