TITLE 'IEEMB828 - SMF WRITER MESSAGE MODULE                   *00001000
                        '                                               00002000
IEEMB828 CSECT                                                          00003000
*END IEEMB828                                                   01S0008 00004000
*/* THE FOLLOWING INCLUDE STATEMENTS WERE FOUND IN THIS PROGRAM.      * 00005000
*/*%INCLUDE SYSLIB  (B828SPEC)                                        * 00006000
*;                                                              01S0008 00007000
@DATA    DS    0H                                                       00008000
         DS    0F                                                       00009000
         DS    0F                                                       00010000
         DS    0D                                                       00011000
IEE360I  DS    CL70                                                     00012000
         ORG   IEE360I                                                  00013000
@NM00001 DC    H'66'                                                    00014000
@NM00002 DC    X'8000'                                                  00015000
@NM00003 DC    CL8'IEE360I '                                            00016000
@NM00004 DC    CL54'SMF NOW RECORDING ON SYS1.MAN  ON AAAAAA TIME=XX:XXC00017000
               :XX'                                                     00018000
@NM00005 DC    X'1000'                                                  00019000
@NM00006 DC    X'4000'                                                  00020000
         ORG   IEE360I+70                                               00021000
IEE361I  DS    CL69                                                     00022000
         ORG   IEE361I                                                  00023000
@NM00007 DC    H'65'                                                    00024000
@NM00008 DC    X'8000'                                                  00025000
@NM00009 DC    CL8'IEE361I '                                            00026000
@NM00010 DC    CL53'SMF DATA LOST - SYS1.MAN  NOT AVAILABLE TIME=XX:XX:C00027000
               XX'                                                      00028000
@NM00011 DC    X'1000'                                                  00029000
@NM00012 DC    X'4000'                                                  00030000
         ORG   IEE361I+69                                               00031000
         DS    CL1                                                      00032000
IEE362A  DS    CL54                                                     00033000
         ORG   IEE362A                                                  00034000
@NM00013 DC    H'50'                                                    00035000
@NM00014 DC    X'8000'                                                  00036000
@NM00015 DC    CL8'IEE362A '                                            00037000
@NM00016 DC    CL38'SMF ENTER DUMP FOR SYS1.MAN  ON AAAAAA'             00038000
@NM00017 DC    X'4000'                                                  00039000
@NM00018 DC    X'8000'                                                  00040000
         ORG   IEE362A+54                                               00041000
IEE364I  DS    CL39                                                     00042000
         ORG   IEE364I                                                  00043000
@NM00019 DC    H'35'                                                    00044000
@NM00020 DC    X'8000'                                                  00045000
@NM00021 DC    CL8'IEE364I '                                            00046000
@NM00022 DC    CL23'SMF I/O ERROR ON AAAAAA'                            00047000
@NM00023 DC    X'1000'                                                  00048000
@NM00024 DC    X'4000'                                                  00049000
         ORG   IEE364I+39                                               00050000
         DS    CL1                                                      00051000
IEE480I  DS    CL38                                                     00052000
         ORG   IEE480I                                                  00053000
@NM00025 DC    H'34'                                                    00054000
@NM00026 DC    X'8000'                                                  00055000
@NM00027 DC    CL8'IEE480I '                                            00056000
@NM00028 DC    CL22'SMF FAILED, TERMINATED'                             00057000
@NM00029 DC    X'1000'                                                  00058000
@NM00030 DC    X'4000'                                                  00059000
         ORG   IEE480I+38                                               00060000
@00      EQU   00                      EQUATES FOR REGISTERS 0-15       00061000
@01      EQU   01                                                       00062000
@02      EQU   02                                                       00063000
@03      EQU   03                                                       00064000
@04      EQU   04                                                       00065000
@05      EQU   05                                                       00066000
@06      EQU   06                                                       00067000
@07      EQU   07                                                       00068000
@08      EQU   08                                                       00069000
@09      EQU   09                                                       00070000
@10      EQU   10                                                       00071000
@11      EQU   11                                                       00072000
@12      EQU   12                                                       00073000
@13      EQU   13                                                       00074000
@14      EQU   14                                                       00075000
@15      EQU   15                                                       00076000
         ENTRY IEE480I                                                  00077000
         ENTRY IEE364I                                                  00078000
         ENTRY IEE362A                                                  00079000
         ENTRY IEE361I                                                  00080000
         ENTRY IEE360I                                                  00081000
@ENDDATA EQU   *                                                        00082000
         END   IEEMB828,(C'PLS0806',0603,74250)                         00083000