TITLE 'IEFTB720 - JOB/STEP TERMINATION MESSAGE MODULE         *00001000
                        '                                               00002000
IEFTB720 CSECT                                                          00003000
         MODID BRANCH=NO                                                00004000
*END IEFTB720                                                   01S0007 00005000
*/* THE FOLLOWING INCLUDE STATEMENTS WERE FOUND IN THIS PROGRAM.      * 00006000
*/*%INCLUDE SYSLIB  (B720SPEC)                                        * 00007000
*;                                                              01S0007 00008000
@DATA    DS    0H                                                       00009000
         DS    0F                                                       00010000
         DS    0F                                                       00011000
         DS    0D                                                       00012000
IEF373I  DS    CL48                                                     00013000
         ORG   IEF373I                                                  00014000
@NM00001 DC    H'44'                                                    00015000
@NM00002 DC    X'8000'                                                  00016000
@NM00003 DC    CL8'IEF373I '                                            00017000
@NM00004 DC    CL32'STEP /XXXXXXXX/ START YYDDD.HHMM'                   00018000
@NM00005 DC    X'0000'                                                  00019000
@NM00006 DC    X'0020'                                                  00020000
         ORG   IEF373I+48                                               00021000
IEF374I  DS    CL113                                                    00022000
         ORG   IEF374I                                                  00023000
@NM00007 DC    H'109'                                                   00024000
@NM00008 DC    X'8000'                                                  00025000
@NM00009 DC    CL8'IEF374I '                                            00026000
@NM00010 DC    CL45'STEP /XXXXXXXX/ STOP  YYDDD.HHMM CPU XXXXMIN '      00027000
@NM00011 DC    CL52'XX.XXSEC SRB XXXXMIN XX.XXSEC REAL XXXXXK SYS XXXXXC00028000
               K'                                                       00029000
@NM00012 DC    X'0000'                                                  00030000
@NM00013 DC    X'0020'                                                  00031000
         ORG   IEF374I+113                                              00032000
         DS    CL1                                                      00033000
IEF375I  DS    CL48                                                     00034000
         ORG   IEF375I                                                  00035000
@NM00014 DC    H'44'                                                    00036000
@NM00015 DC    X'8000'                                                  00037000
@NM00016 DC    CL8'IEF375I '                                            00038000
@NM00017 DC    CL32' JOB /XXXXXXXX/ START YYDDD.HHMM'                   00039000
@NM00018 DC    X'0000'                                                  00040000
@NM00019 DC    X'0020'                                                  00041000
         ORG   IEF375I+48                                               00042000
IEF376I  DS    CL90                                                     00043000
         ORG   IEF376I                                                  00044000
@NM00020 DC    H'86'                                                    00045000
@NM00021 DC    X'8000'                                                  00046000
@NM00022 DC    CL8'IEF376I '                                            00047000
@NM00023 DC    CL74' JOB /XXXXXXXX/ STOP  YYDDD.HHMM CPU XXXXMIN XX.XXSC00048000
               EC SRB XXXXMIN XX.XXSEC'                                 00049000
@NM00024 DC    X'0000'                                                  00050000
@NM00025 DC    X'0020'                                                  00051000
         ORG   IEF376I+90                                               00052000
@00      EQU   00                      EQUATES FOR REGISTERS 0-15       00053000
@01      EQU   01                                                       00054000
@02      EQU   02                                                       00055000
@03      EQU   03                                                       00056000
@04      EQU   04                                                       00057000
@05      EQU   05                                                       00058000
@06      EQU   06                                                       00059000
@07      EQU   07                                                       00060000
@08      EQU   08                                                       00061000
@09      EQU   09                                                       00062000
@10      EQU   10                                                       00063000
@11      EQU   11                                                       00064000
@12      EQU   12                                                       00065000
@13      EQU   13                                                       00066000
@14      EQU   14                                                       00067000
@15      EQU   15                                                       00068000
         ENTRY IEF376I                                                  00069000
         ENTRY IEF375I                                                  00070000
         ENTRY IEF374I                                                  00071000
         ENTRY IEF373I                                                  00072000
@ENDDATA EQU   *                                                        00073000
         END   IEFTB720,(C'PLS0205',0701,76087)                         00074000