//         JOB
//*
//SMPPROC  PROC
//SMP      EXEC PGM=GIMSMP,REGION=0M
//*------- SYSOUT data sets -------------------------------------------
//SMPOUT   DD SYSOUT=*
//SMPRPT   DD SYSOUT=*
//SMPLIST  DD SYSOUT=*
//SMPPUNCH DD SYSOUT=*
//SMPSNAP  DD SYSOUT=*
//SMPDEBUG DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//*------- Master CSI -------------------------------------------------
//SMPCSI   DD DISP=SHR,DSN=SMPE.SMPCSI.CSI
//*------- SMP/E permanent data sets ----------------------------------
//SMPLOG   DD DISP=MOD,DSN=SMPE.SMPGLOG
//SMPLOGA  DD DISP=MOD,DSN=SMPE.SMPGLOGA
//SMPLTS   DD DISP=SHR,DSN=SMPE.MVST100.SMPLTS
//SMPMTS   DD DISP=SHR,DSN=SMPE.MVST100.SMPMTS
//SMPSTS   DD DISP=SHR,DSN=SMPE.MVST100.SMPSTS
//*------- SMP/E temporary data sets-----------------------------------
//SMPWRK1  DD UNIT=SYSDA,SPACE=(CYL,(2,1,5)),DCB=BLKSIZE=6160
//SMPWRK2  DD UNIT=SYSDA,SPACE=(CYL,(2,1,5)),DCB=BLKSIZE=6160
//SMPWRK3  DD UNIT=SYSDA,SPACE=(CYL,(2,1,5)),DCB=BLKSIZE=3120
//SMPWRK4  DD UNIT=SYSDA,SPACE=(CYL,(2,1,5)),DCB=BLKSIZE=3120
//SMPWRK6  DD UNIT=SYSDA,SPACE=(CYL,(2,1,5)),DCB=BLKSIZE=6160
//*------- Utility data sets ------------------------------------------
//SYSUT1   DD UNIT=SYSDA,SPACE=(CYL,(2,1)),DISP=(,DELETE)
//SYSUT2   DD UNIT=SYSDA,SPACE=(CYL,(2,1)),DISP=(,DELETE)
//SYSUT3   DD UNIT=SYSDA,SPACE=(CYL,(2,1)),DISP=(,DELETE)
//SYSUT4   DD UNIT=SYSDA,SPACE=(TRK,(2,1)),DISP=(,DELETE)
//*------- Target libraries -------------------------------------------
//*------- Distribution libraries -------------------------------------
//         PEND
//*
//SMPSTEP1 EXEC SMPPROC
//SYSLIB   DD DISP=SHR,DSN=SYS1.MACLIB
//         DD DISP=SHR,DSN=SYS1.MODGEN
//UMODSRC  DD DISP=SHR,DSN=USR1.UMODSRC
//UMODLIB  DD DISP=SHR,DSN=USR1.UMODLIB
//SMPCNTL  DD *
SET BDY(GLOBAL).
RECEIVE SYSMOD.
SET BDY(MVST100).
APPLY SELECT(TUX0100).
LIST SYSMOD(TUX0100).
//*
//SMPPTFIN DD DATA,DLM=##
++USERMOD(TUX0100)
  DESC(SMF JOB/STEP TERMINATION USER EXIT ROUTINE).
++VER(Z038) FMID(HBB7750).
++SRC(IEFACTRT) TXLIB(UMODSRC) DISTLIB(AUMODSRC).
++JCLIN.
//COPY     EXEC PGM=IEBCOPY
//AUMODLIB DD DISP=SHR,DSN=USR1.AUMODLIB
//UMODLIB  DD DISP=SHR,DSN=USR1.UMODLIB
//SYSIN    DD *
  COPY INDD=AUMODLIB,OUTDD=UMODLIB TYPE=MOD
  SELECT MEMBER=IEFACTRT
//LKED     EXEC PGM=IEWL,             /* LKED OPTION FOR TLIB */
//         PARM='LIST,LET,MAP,XREF,NCAL,RENT'
//SYSLMOD  DD DISP=SHR,DSN=USR1.UMODLIB
//SYSLIN   DD *
  NAME IEFACTRT(R)
##
//