Perform these actions to update or replace the default exit module:

1. Build and install an SMP/E USERMOD to apply the updated source code for the EDGUX100 exit module. Include the necessary JCLIN statements to get the EDGUX100 load module added to the LINKLIB target library.

   You can apply the exit using an SMP/E USERMOD as shown in Figure 1. Modify the FMID and PRE to reflect the release you are running.

   1. Allocate a user SAMPLIB data set. In Figure 1 the user SAMPLIB data set is defined as MY.RMM.SRCLIB and allocated to DD card SRCLIB.
   2. Copy the EDGUX100 source from SAMPLIB to the user SAMPLIB, and copy EDGAPISR from SMPSTS to the user SAMPLIB and modify them, as needed, for your installation.
   3. SMP/E RECEIVE the USERMOD.
   4. SMP/E APPLY the USERMOD. Ensure that a DD card exists for the user SAMPLIB in the APPLY job, or as a DDDEF to SMP/E in the target zone.
   After performing these steps, the modified version of the EDGUX100 exit module resides in both the user SAMPLIB and SYS1.SAMPLIB. IBM's original copy is only in the distribution libraries at this point. If you accept the USERMOD, only the modified version of the exit module exists. The SMP/E target zone reflects RMID indicators of VMRMM01 for all of these records:

   SAMP EDGUX100 RMID=VMRMM01 SYSLIB=SAMPLIB
   SRC  EDGUX100 RMID=VMRMM01 SYSLIB=SAMPLIB
   MOD  EDGUX100 RMID=VMRMM01 LMOD=EDGUX100
   SRC  EDGAPISR RMID=VMRMM01 SYSLIB=SMPSTS
   MOD  EDGAPISR RMID=VMRMM01 LMOD=EDGUX100, CBRUXVNL, CBRUXEJC, CBRUXENT
   LMOD EDGUX100              SYSLIB=LINKLIB

   The RMID of VMRMM01 for the SAMP record prevents IBM service from being installed. This results in an ID search and notification to you that IBM is the servicing exit.

   Figure 1. Building an SMP/E USERMOD to apply the updated EDGUX100 exit module

   /* RECEIVE Step  */
   //RMMEXAM  JOB  ,'EDGUX100',MSGCLASS=H,MSGLEVEL=(1,1)
   //SMPE     EXEC PGM=GIMSMP,
   //         PARM='PROCESS=WAIT',
   //         DYNAMNBR=120
   //SMPCSI   DD DISP=SHR,DSN=your.CSI.dataset
   //SMPHOLD  DD DISP=SHR,DSN=your.HOLDDATA.dataset
   //SMPCNTL  DD *
    SET BDY(GLOBAL) .
    RECEIVE .
   /*
   //SMPPTFIN  DD   DATA,DLM=##
   ++USERMOD (VMRMM01) REWORK(2008082) .
   ++VER (Z038) FMID(HDZ1190) .
   ++JCLIN .
   //EDGUX100  EXEC PGM=IEWL,PARM='LET,NCAL,RENT,REUS,REFR,LIST,XREF'
   //SYSLMOD   DD   DISP=SHR,DSN=SYS1.LINKLIB
   //SRCLIB    DD   DISP=SHR,DSN=MY.RMM.SRCLIB
   //AEDGMOD1  DD   DISP=SHR,DSN=SYS1.AEDGMOD1
   //SYSPRINT  DD   SYSOUT=*
   //SYSLIN    DD   *
     INCLUDE AEDGMOD1(EDGUX100)
     INCLUDE AEDGMOD1(EDGAPISR)
     ENTRY   EDGUX100
     NAME    EDGUX100(R)
   ++SRC(EDGUX100) TXLIB(SRCLIB) DISTLIB(ASAMPLIB) .
   ++SRC(EDGAPISR) TXLIB(SRCLIB) DISTLIB(AEDGSRC1) .
   ++SAMP(EDGUX100) TXLIB(SRCLIB) DISTLIB(ASAMPLIB) .
   ##
   /*
   /* APPLY Step  */
   //SMPAPPLC  JOB ('T,H,IOM,,',SYSPROG),'***IBMUSER***',
   //             MSGLEVEL=(1,1),MSGCLASS=X,CLASS=A,REGION=0M,
   //             NOTIFY=&SYSUID
   //S1       EXEC PGM=GIMSMP,
   //         PARM='PROCESS=WAIT',
   //         DYNAMNBR=120
   //SMPCSI   DD DISP=SHR,DSN=MAZRMM3.GLOBAL.CSI
   //SRCLIB   DD DISP=SHR,DSN=RMMTST.MAZ.SOURCE
   //SMPCNTL  DD *
     SET    BOUNDARY (MVSTZN)
                     .
     APPLY
            JCLINREPORT
            SELECT (VMRMM01)
                   .

2. Copy the new exit load module into the LNKLST library.
3. Refresh LLA.
4. Refresh the exit module by using MVS operator commands.

   If DFSMSrmm is running in a shared environment, you must repeat this step on each system.

When you use the default exit module, EDGUX100, for the installation exit EDG_EXIT100, it is loaded and activated as an exit routine, if it is not already active, by DFSMSrmm when DFSMSrmm is started and stays loaded and active for the life of the IPL. It can be refreshed or deleted at any time by using one of the MVS system operator commands.

You can use any load module name for your exit module, because you use PROGxx in z/OS parmlib, SETPROG, or CSVDYNEX macro to associate the exit module with the exit. Therefore, you do not have to use EDGUX100 as the load module name. However, using the default exit module name simplifies your implementation, because DFSMSrmm itself ensures that the exit module is loaded and activated.