Summary:
The client downloaded four CA SymDump for CICS fixes (FIX-NUMBER.BIN) to their desk top into a directory from the CA support web site. Then they did a binary transfer of each fix to the mainframe into a Z/OS PDS with a DCB of RECFM=FB, LRECL=80, BLKSIZ=3120 as individual members. The client would like sample SMP/E JCL to receive and apply the fixes.
Answer:
The following JCL can be used to receive the four fixes in question which are located in PDS SYMDUMP91.PTFS.
//RECEIVE EXEC PGM=GIMSMP,
// PARM='CSI=SYMDUMP.CSI',
// REGION=0M
//SMPPTFIN DD DSN=SYMDUMP91.PTFS(RO#####),DISP=SHR
// DD DSN=SYMDUMP91.PTFS(RO#####),DISP=SHR
// DD DSN=SYMDUMP91.PTFS,(RO#####), DISP=SHR
// DD DSN=SYMDUMP91.PTFS(RO#####),DISP=SHR
//SMPCNTL DD *
SET BDY(GLOBAL).
RECEIVE SELECT(
RO#####
RO#####
RO#####
RO#####
)
SYSMODS .
The following JCL can be used to apply the fixes. An apply CHECK should be done first. Once the apply CHECK is successful the check can be removed and the fixes can be applied. The BYPASS(HOLDSYSTEM) can be used if any of the fixes contain ++HOLD actions.
The SET BDY(CAIT0) is the default target zone (CAIT0) shipped with the base product. If the default target zone (CAIT0) was changed during the install it will have to be adjusted to reflect the new name.
//APPLY EXEC PGM=GIMSMP,
// REGION=0M,
// PARM='CSI=SYMDUMP.CSI',
//SMPCNTL DD *
SET BDY(CAIT0).
APPLY SELECT(
RO#####
RO#####
RO#####
RO#####
)
CHECK
BYPASS(HOLDSYSTEM).