Sample JCL to receive and apply CA SymDump CICS r 9.0 fixes.

Products

• SymDump for CICS
• SymDump Batch

Issue/Introduction

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).

 

 

Environment

Release:
Component: SYMDUM