234 Converting to DFSMSrmm from ASG-ZARA or AutoMedia
the EDGUX100 load module added to the LINKLIB target library.
Example 6-1 shows a sample USERMOD.
Example 6-1 Sample USERMOD
++USERMOD (VMRMM01) REWORK(1998066) .
++VER (Z038) FMID(JDZ11B4) PRE(UW19315) .
++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=TERRI.SAMPLIB
//AEDGMOD1 DD DISP=SHR,DSN=SYS1.AEDGMOD1
//SYSPRINT DD SYSOUT=*
//SYSLIN DD *
INCLUDE AEDGMOD1(EDGUX100)
ENTRY EDGUX100
NAME EDGUX100(R)
//UXTABLE EXEC PGM=IEWL,PARM='LET,NCAL,LIST,XREF'
//SYSLMOD DD DISP=SHR,DSN=SYS1.LINKLIB
//SRCLIB DD DISP=SHR,DSN=TERRI.SAMPLIB
//AEDGMOD1 DD DISP=SHR,DSN=SYS1.AEDGMOD1
//SYSPRINT DD SYSOUT=*
//SYSLIN DD *
INCLUDE AEDGMOD1(UXTABLE)
NAME UXTABLE(R)
++SRC(UXTABLE) TXLIB(SRCLIB) DISTLIB(ASAMPLIB) .
++SRC(EDGUX100) TXLIB(SRCLIB) DISTLIB(ASAMPLIB) .
++SAMP(EDGUX100) TXLIB(SRCLIB) DISTLIB(ASAMPLIB) .
5. Receive and apply the USERMOD.
6. Your new exit is now ready for use on your system.
The same process is applicable to the EDGUX200 exit if necessary.
For more information about DFSMSrmm exits refer to the DFSMSrmm
Implementation and Customization Guide, SC26-7405.
6.2.8 Data set overwrite
AutoMedia/ASG-ZARA supports four volume statuses:
ACTIVE The volume contains valid data.
SCRATCH The volume can be used for scratch output requests.
DAMAGED Volume is deleted.
DELETED The volume can be used for scratch output requests.
In a DFSMSrmm environment you have three different volume statuses:
MASTER A private volume that contains data.

Get Converting to DFSMSrmm from ASG-ZARA or AutoMedia now with O’Reilly online learning.

O’Reilly members experience live online training, plus books, videos, and digital content from 200+ publishers.