TITLE 'IEEMB826 - STAE EXIT MESSAGE MODULE                  '  00001000
IEEMB826 CSECT                                                          00002000
*END IEEMB826                                                   01.0005 00003000
*/* THE FOLLOWING INCLUDE STATEMENTS WERE FOUND IN THIS PROGRAM.      * 00004000
*/*%INCLUDE SYSLIB  (B826SPEC)                                        * 00005000
*;                                                              01.0005 00006000
@DATA    DS    0H                                                       00007000
         DS    0F                                                       00008000
         DS    0F                                                       00009000
         DS    0D                                                       00010000
SIEE050A DS    CL75                                                     00011000
         ORG   SIEE050A                                                 00012000
@NM00001 DC    F'0'                                                     00013000
@NM00002 DC    F'0'                                                     00014000
@NM00003 DC    H'63'                                                    00015000
@NM00004 DC    X'8000'                                                  00016000
@NM00005 DC    CL8'IEE050A '                                            00017000
@NM00006 DC    CL51'SMF OPTION CANCELED - REPLY U TO CONTINUE OR RE-IPLC00018000
               '                                                        00019000
@NM00007 DC    X'4000'                                                  00020000
@NM00008 DC    X'8000'                                                  00021000
         ORG   SIEE050A+75                                              00022000
         DS    CL1                                                      00023000
SIEE480I DS    CL49                                                     00024000
         ORG   SIEE480I                                                 00025000
@NM00009 DC    H'45'                                                    00026000
@NM00010 DC    X'8000'                                                  00027000
@NM00011 DC    CL8'IEE480I '                                            00028000
@NM00012 DC    CL33'SMF ABEND XXX, DUMPED, TERMINATED'                  00029000
@NM00013 DC    X'1000'                                                  00030000
@NM00014 DC    X'4000'                                                  00031000
         ORG   SIEE480I+49                                              00032000
@00      EQU   00                      EQUATES FOR REGISTERS 0-15       00033000
@01      EQU   01                                                       00034000
@02      EQU   02                                                       00035000
@03      EQU   03                                                       00036000
@04      EQU   04                                                       00037000
@05      EQU   05                                                       00038000
@06      EQU   06                                                       00039000
@07      EQU   07                                                       00040000
@08      EQU   08                                                       00041000
@09      EQU   09                                                       00042000
@10      EQU   10                                                       00043000
@11      EQU   11                                                       00044000
@12      EQU   12                                                       00045000
@13      EQU   13                                                       00046000
@14      EQU   14                                                       00047000
@15      EQU   15                                                       00048000
         ENTRY SIEE480I                                                 00049000
         ENTRY SIEE050A                                                 00050000
@ENDDATA EQU   *                                                        00051000
         END   IEEMB826                                                 00052000