Setting up parallel processing using SMP/E

Create and install an SMP/E USERMOD as shown in Figure 1 to set up parallel running capability.

Figure 1. Sample USERMOD for setting up running exits in parallel

//RMMSTUFF  JOB  ,'SLIP IT IN',MSGCLASS=H,MSGLEVEL=(1,1)
//STEP1     EXEC PGM=GIMSMP,REGION=6120K
//SMPCNTL   DD   *
   SET BDY(GLOBAL) .
   RECEIVE .
/*
//SMPPTFIN  DD   DATA,DLM=##
++USERMOD (VMRMM03) REWORK(2000287) .
++VER (Z038) FMID(HDZ11D0) PRE(UWxxxxx) /*
     Change FMID as needed.
     Edit PRE as needed or use the BYPASS(PRE)
     operand on the APPLY command       */ .
++SRC(CBRUXENT) TXLIB(AEDGSRC1) DISTLIB(AEDGSRC1) /*
     AEDGSRC1 points to latest source level
     assumption is that PTFs are already accepted
     if not, use SMPSTS as the TXLIB             */ .
++SRC(CBRUXEJC) TXLIB(AEDGSRC1) DISTLIB(AEDGSRC1) .
++SRC(IGXMSGEX) TXLIB(AEDGSRC1) DISTLIB(AEDGSRC1) .
##
//STEP2     EXEC PGM=GIMSMP,REGION=6120K
//SMPCNTL   DD   *
   SET BDY(GLOBAL) .
   UCLIN .
   ADD UTILITY(ASMSYSP) NAME(ASMA90)
   PARM(XREF(FULL),NOOBJECT,DECK,RENT,SYSPARM(YES)) .
   ADD OPTIONS(ASMSYSP)
             ASM(ASMSYSP)  .
   ENDUCL .
/*
//STEP3     EXEC PGM=GIMSMP,REGION=6120K
//SMPCNTL   DD   *
   SET BDY(TGT1) OPTIONS(ASMSYSP) .
   APPLY SELECT(VMRMM03) .
/*

To set up parallel processing using SMP/E:

Copy the DFSMSrmm-supplied IGXMSGEX exit to a source library and modify the exit if necessary
Copy the source of the IGXMSGEX exit from your existing tape management system after the end of the DFSMSrmm-supplied source and change the name of the CSECT to ANOMSGEX or any other meaningful name.
Install the SMP/E USERMOD. You install both the DFSMSrmm-supplied exit and your exit from your existing tape management system.
To implement changes to the CBRUXENT exit and the CBRUXEJC exit, you do not need to IPL. You can copy the updated load modules into LINKLIB and refresh LLA.
To implement changes to the IGXMSGEX exit, you must copy IGX00030 into LPALIB and re-IPL with CLPA.
Recommendation: Because you might not want to IPL at the time you switch DFSMSrmm to production, careful planning of the change to IGX00030 is required. Replace the parallel running IGXMSGEX exit while you continue running in parallel when you are sure that DFSMSrmm is providing the expected scratch pooling support. DFSMSrmm should be running in warning mode and should not issue any error messages about volumes from incorrect scratch pools.
When you no longer need to run both exits, remove the USERMOD and install the standard load modules again.

To edit the source code to set your own selected alternate exit load module names, copy the latest DFSMSrmm source code from either SMPSTS or AEDGSRC1, and alter the TXTLIB to point to your source library that contains your modified source code.