CEVM installation process for applying PTFs RO93955, RO95234, and SO05848

Document ID : KB000125388
Last Modified Date : 29/01/2019
Show Technical Document Details
Issue:
Applying maintenance PTFs RO93955, RO95234, and SO05848 requires time and effort to review HOLDDATA and run multiple JCLs to ensure the PTFs apply properly.
Environment:
CEVM 6.0
 
Cause:
HOLDDATA restrictions
 
Resolution:
Use the following JCL to simplify the HOLDDATA instructions for application of PTFsRO93955, RO95234, and SO05848. This will accomplish:
  • RO93955 requires an unzip of the ACEMSAMP library if you are using the unified installation method.
  • RO95234 requires an increase to the number of directory blocks for the following product data sets: CEMHLQ.CEMMLQ.CCEMSENU and CEMHLQ.CEMMLQ.ACEMSENU. 
    Also, several DDDEFs must be added to the CSI.
  • SO05848 requires updates to the CSI so that it contains a DDDEF for the CSSLIB.
Note: If doing a new installation this job will perform all necessary tasks for published PTFs through January 24th, 2019 to satisfy the HOLDDATA. 


//HOLDDTA  JOB (<JOBACCT>),   SITE ACCOUNTING INFORMATION     
// 'HOLDDATA JOB',            DESCRIPTION OF JOB              
// CLASS=<JOBCLASS>,          SITE EXECUTION CLASS            
// MSGCLASS=<MSGCLASS>,       SITE MESSAGE CLASS              
// MSGLEVEL=(1,1),            PRINT ALL MESSAGES              
// NOTIFY=&SYSUID             NOTIFY THE JOB SUBMITTER        
//*                                                           
//*************************************************************
//*                                                           *
//*                CA COMPLIANCE EVENT MANAGER                *
//*                                                           *
//*        COPYRIGHT (C) 2019 CA. ALL RIGHTS RESERVED.        *
//*                                                           *
//*-----------------------------------------------------------*
//*                                                           *
//*     JOB NAME: CEMHLDTA                                    *
//*                                                           *
//*      PURPOSE: PERFORM ALL NECESSARY TASKS FOR PUBLISHED   *
//*               PTFS THROUGH JANUARY 24TH 2019              *
//*               TO SATISFY ANY JCL IN HOLDDATA.             *
//*                                                           *
//*  EXPECTED RC: 0                                           *
//*                                                           *
//*-----------------------------------------------------------*
//*                                                           *
//*  INSTRUCTIONS:                                            *
//*                                                           *
//*   1. MODIFY THE JOBCARD.                                  *
//*                                                           *
//*   2. EDIT THE FOLLOWING VALUES:                           *
//*                                                           *
//*    - <INSHLQ> - THE <INSHLQ> VALUE THAT WAS SPECIFIED IN  *
//*      THE UNZIPJCL JOB.                                    *
//*                                                           *
//*    - <INSMLQ> - THE <INSMLQ> VALUE THAT WAS SPECIFIED IN  *
//*      THE UNZIPJCL JOB.                                    *
//*                                                           *
//*    - <CEMPAXPATH> - THE <CEMPAXPATH> VALUE THAT WAS       *
//*      SPECIFIED IN THE UNZIPJCL JOB.                       *
//*                                                           *
//*      TO THE USS DIRECTORY PATH WHERE THE PAX FILE RESIDES.*
//*      THIS IS THE PATH THAT WAS SPECIFIED WHEN THE PAX FILE*
//*      WAS DOWNLOADED.                                      *
//*                                                           *
//*      SPECIFY THE ENTIRE PATH EXCEPT FOR THE TRAILING "/" .*
//*                                                           *
//*                                                           *
//*    - TO USE THE DEFAULT SMS CLASS FOR INTERIM FILES LEAVE *
//*      VOLUME="*" AS IS.                                    *
//*                                                           *
//*      TO USE A SPECIFIC VOLSER, CHANGE VOLUME="*" TO       *
//*      VOLUME="PACKNAME". THE FILES BEING DOWNLOADED ARE AN *
//*      ENTIRE SMP/E ENVIRONMENT, WE RECOMMEND THAT YOU      *
//*      SPECIFY A VOLUME FOR PERMANENT RETENTION OF THE      *
//*      SMP/E ENVIRONMENT.                                   *
//*                                                           *
//*      MODIFY AND ISSUE THE FOLLOWING CHANGE COMMAND:       *
//*                                                           *
//*      C ALL 'VOLUME="*"' 'VOLUME="PACKNAME"'               *
//*                                                           *
//*    - <UNIT> - UNIT USED FOR DATA SETS ALLOCATED IN        *
//*      THIS JOB.                                            *
//*                                                           *
//*    - UNCOMMENT THE SMPJHOME AND THE SMPCPATH DD STATEMENTS*
//*      ONLY IF YOUR SITE DOES NOT HAVE ICSF SERVICES        *
//*      INSTALLED. THE PATH NAMES ON THESE JAVA DD FILES     *
//*      MUST BE SET TO YOUR  SITES JAVA INSTALLATION NAMES.  *
//*                                                           *
//*      GIMUNZIP OPTIONALLY REQUIRES EITHER INTEGRATED       *
//*      CRYPTOGRAPHIC SERVICES FACILITY (ICSF) ONE-WAY HASH  *
//*      GENERATE CALLABLE SERVICE OR JAVA TO COMPUTE A SHA-1 *
//*      HASH VALUE.                                          *
//*                                                           *
//*      WE SUGGEST THAT YOU EXECUTE THIS JCL WITH THESE DD   *
//*      NAMES COMMENTED OUT AND SEE IF IT EXECUTES           *
//*      SUCCESSFULLY BEFORE TRYING TO SET THESE DD NAMES.    *
//*                                                           *
//*      IF YOUR ENVIRONMENT REQUIRES THESE DD STATEMENTS,    *
//*      UNCOMMENT THE DD STATEMENTS AND ISSUE THE FOLLOWING  *
//*      COMMANDS TO SPECIFY THE APPROPRIATE VALUES:          *
//*                                                           *
//*      MODIFY AND ISSUE THE FOLLOWING FIND AND CHANGE       *
//*      COMMANDS:                                            *
//*                                                           *
//*      F ALL <JAVAHOME>                                     *
//*      C * JAVAHOME ALL                                     *
//*                                                           *
//*      F ALL <CLASSPATH>                                    *
//*      C * CLASSPATH ALL                                    *
//*                                                           *
//*      HASH=NO CAN BE SPECIFIED IN THE PARM FIELD WHICH WILL*
//*      REMOVE THE NEED FOR A SMPCPATH DD STATEMENT.         *
//*      IF HASH=NO IS SET THEN THERE WILL BE NO ADDITIONAL   *
//*      HASH VALUE CHECKING. WE ADVISE THAT YOU DO USE THE   *
//*      HASH=YES PARAMETER FOR AN ADDITIONAL VALIDATION CHECK*
//*                                                           *
//*    - THE JCL WILL FAIL WITH A RC=12 IF YOU UPPERCASE ANY  *
//*      OF THE GIMUNZIP COMMANDS.                            *
//*                                                           *
//*   3. REVIEW AND MODIFY THE DDDEF VALUES IN STEP UPDDDDEF  *
//*      IF NECESSARY.                                        *
//*                                                           *
//*************************************************************
//* UNZIP <INSHLQ>.<INSMLQ>.ACEMSAMP                           
//*************************************************************
//UNZIPSMP EXEC PGM=GIMUNZIP,REGION=0M,PARM='HASH=YES'         
//*                                                            
//SMPDIR   DD  PATH='<CEMPAXPATH>/CEM60U0',                    
//       PATHDISP=KEEP                                         
//*                                                            
//*SMPJHOME DD PATH='<JAVAHOME>'                               
//*SMPCPATH DD PATH='<CLASSPATH>',PATHDISP=KEEP                
//*                                                            
//SMPOUT   DD  SYSOUT=*                                        
//SYSPRINT DD  SYSOUT=*                                            
//SYSUT2   DD  UNIT=SYSALLDA,SPACE=(CYL,(200,20))                 
//SYSUT3   DD  UNIT=SYSALLDA,SPACE=(CYL,(50,10))                  
//SYSUT4   DD  UNIT=SYSALLDA,SPACE=(CYL,(25,5))                   
//SYSIN    DD  *                                                   
<GIMUNZIP>                                                        
<ARCHDEF ARCHID="ACEMSAMP"                                        
         NEWNAME="<INSHLQ>.<INSMLQ>.ACEMSAMP"                     
         VOLUME="*"                                                
> </ARCHDEF>                                                      
</GIMUNZIP>                                                       
//*                                                               
//*************************************************************   
//* THE FOLLOWING 5 STEPS WILL REALLOCATE THE ACEMSENU AND        
//* CCEMSENU DATA SETS TO INCREASE THE DIRECTORY BLOCKS.          
//*                                                               
//* RNAMSENU - RENAME EXISTING DATA SETS                          
//* ALLOCACE - ALLOCATE NEW ACEMSENU DATA SET                     
//* ALLOCCCE - ALLOCATE NEW CCEMSENU DATA SET                      
//* COPYACEM - COPY ACEMSENU MEMBERS TO NEW DATA SET              
//* COPYCCEM - COPY CCEMSENU MEMBERS TO NEW DATA SET              
//*                                                               
//*************************************************************   
//*************************************************************   
//* RENAME ACEMSENU AND CCEMSENU                                  
//*************************************************************   
//RNAMSENU EXEC PGM=IDCAMS                                        
//SYSPRINT DD SYSOUT=*                                            
//SYSIN    DD *                                                   
 ALTER <INSHLQ>.<INSMLQ>.ACEMSENU -                               
        NEWNAME(<INSHLQ>.<INSMLQ>.ACEMSENU.OLD)                   
 ALTER <INSHLQ>.<INSMLQ>.CCEMSENU -                               
        NEWNAME(<INSHLQ>.<INSMLQ>.CCEMSENU.OLD)                   
//*                                                                
//*************************************************************   
//* ALLOCATE NEW ACEMSENU WITH INCREASED DIRECTORY BLOCKS         
//*************************************************************   
//ALLOCACE EXEC PGM=IEFBR14                                        
//CEMASTAT DD DSN=<INSHLQ>.<INSMLQ>.ACEMSENU,                    
//             DISP=(NEW,CATLG),                                 
//             UNIT=<UNIT>,                                      
//             VOL=SER=STG100,                                   
//             SPACE=(TRK,(100,100,100)),                        
//             DCB=(RECFM=FB,LRECL=80,BLKSIZE=27920,DSORG=PO)    
//*                                                               
//*************************************************************  
//* ALLOCATE NEW CCEMSENU WITH INCREASED DIRECTORY BLOCKS        
//*************************************************************  
//ALLOCCCE EXEC PGM=IEFBR14                                       
//CEMASTAT DD DSN=<INSHLQ>.<INSMLQ>.CCEMSENU,                    
//             DISP=(NEW,CATLG),                                 
//             UNIT=<UNIT>,                                      
//             VOL=SER=STG100,                                    
//             SPACE=(TRK,(100,100,100)),                        
//             DCB=(RECFM=FB,LRECL=80,BLKSIZE=27920,DSORG=PO)    
//*                                                              
//*************************************************************  
//* COPY ACEMSENU MEMBERS FROM OLD TO NEW DATA SET               
//*************************************************************  
//COPYACEM EXEC PGM=IEBCOPY,REGION=1M                            
//SYSPRINT DD SYSOUT=*                                           
//*                                                              
//INDD1    DD DISP=SHR,DSN=<INSHLQ>.<INSMLQ>.ACEMSENU.OLD        
//*                                                               
//OUTDD1   DD DISP=SHR,                                          
//         DSN=<INSHLQ>.<INSMLQ>.ACEMSENU                        
//SYSUT3   DD UNIT=SYSDA,SPACE=(TRK,(1,1))                       
//SYSUT4   DD UNIT=SYSDA,SPACE=(TRK,(1,1))                        
//*                                                              
//SYSIN    DD *                                                  
 COPY INDD=INDD1,OUTDD=OUTDD1                                    
//*                                                              
//*************************************************************  
//* COPY CCEMSENU MEMBERS FROM OLD TO NEW DATA SET               
//*************************************************************  
//COPYCCEM EXEC PGM=IEBCOPY,REGION=1M                            
//SYSPRINT DD SYSOUT=*                                            
//*                                                               
//INDD1    DD DISP=SHR,DSN=<INSHLQ>.<INSMLQ>.CCEMSENU.OLD         
//*                                                               
//OUTDD1   DD DISP=SHR,                                           
//         DSN=<INSHLQ>.<INSMLQ>.CCEMSENU                         
//SYSUT3   DD UNIT=SYSDA,SPACE=(TRK,(1,1))                        
//SYSUT4   DD UNIT=SYSDA,SPACE=(TRK,(1,1))                        
//*                                                               
//SYSIN    DD *                                                   
 COPY INDD=INDD1,OUTDD=OUTDD1                                     
//*                                                               
//*************************************************************   
//* REQUIRED: UPDATE CAAXMAC AND AAAXMAC DDDEFS TO PROPER          
//* <INSHLQ>.<INSMLQ> DESIGNATION.                                
//*                                                               
//* OPTIONAL: UPDATE DDDEFS FOR SYS1, CEE, AND TCPIP DATA SETS    
//* IF NECESSARY.                                                  
//*                                                               
//*************************************************************   
//*                                                               
//UPDDDDEF EXEC PGM=GIMSMP,COND=(0,NE),REGION=0M,                 
//      PARM='CSI=<INSHLQ>.<INSMLQ>.CSI,PROCESS=END'              
//*                                                               
//SMPLOG    DD SYSOUT=*                                           
//SMPPTS    DD DSN=<INSHLQ>.<INSMLQ>.SMPPTS,DISP=SHR              
//*                                                               
//SMPCNTL   DD *                                                  
 SET BDY(CAID01).                                                  
 UCLIN .                                                          
                                                                  
    /*****************************************************/       
    /* DISTRIBUTION ZONE DDDEF FOR CEM                   */       
    /*****************************************************/       
                                                                  
 REP DDDEF(MACLIB)                                                
       DA(SYS1.MACLIB) .                                          
                                                                  
 ADD DDDEF(CSSLIB)                                           
       DA(SYS1.CSSLIB) SHR .                                 
                                                              
 ENDUCL .                                                    
                                                             
 SET BDY(CAID02).                                            
 UCLIN .                                                      
                                                             
    /*****************************************************/  
    /* DISTRIBUTION ZONE DDDEF FOR DATACOM               */  
    /*****************************************************/  
                                                             
 REP DDDEF(AAVQSRC)                                          
       DA(<INSHLQ>.<INSMLQ>.AAAXMAC) .                       
                                                              
 REP DDDEF(CAVQSRC)                                          
       DA(<INSHLQ>.<INSMLQ>.CAAXMAC) .                       
                                                             
 REP DDDEF(CSSLIB)                                           
       DA(SYS1.CSSLIB) .                                     
                                                             
 REP DDDEF(SCEELKED)                                         
       DA(CEE.SCEELKED) .                                    
                                                             
 REP DDDEF(SCEESPC)                                          
       DA(CEE.SCEESPC) .                                     
                                                              
 REP DDDEF(SYS1MAC)                                          
       DA(SYS1.MACLIB) .                                     
                                                             
 REP DDDEF(TCPIP)                                             
       DA(TCPIP.SEZATCP) .                                   
                                                             
 ENDUCL .                                                    
                                                              
 SET BDY(CAIT01).                                            
 UCLIN .                                                     
                                                             
    /*****************************************************/   
    /* TARGET ZONE DDDEF FOR CEM                         */   
    /*****************************************************/   
                                                              
 REP DDDEF(MACLIB)                                            
       DA(SYS1.MACLIB) .                                      
                                                              
 REP DDDEF(SCEELKED)                                          
       DA(CEE.SCEELKED) .                                     
                                                              
 ADD DDDEF(CSSLIB)                                            
       DA(SYS1.CSSLIB) SHR .                                  
                                                              
 ENDUCL .                                                     
                                                              
 SET BDY(CAIT02).                                             
 UCLIN .                                                      
                                                              
    /*****************************************************/   
    /* TARGET ZONE DDDEF FOR DATACOM                     */   
    /*****************************************************/   
                                                              
 REP DDDEF(AAVQSRC)                                           
       DA(<INSHLQ>.<INSMLQ>.AAAXMAC) .                        
                                                              
 REP DDDEF(CAVQSRC)                                           
       DA(<INSHLQ>.<INSMLQ>.CAAXMAC) .                        
                                                              
 REP DDDEF(CSSLIB)                                            
       DA(SYS1.CSSLIB) .                                      
                                                              
 REP DDDEF(SCEELKED)                                          
       DA(CEE.SCEELKED) .                                     
                                                              
 REP DDDEF(SCEESPC)                                           
       DA(CEE.SCEESPC) .                                      
                                                              
 REP DDDEF(SYS1MAC)                                           
       DA(SYS1.MACLIB) .              
                                      
 REP DDDEF(TCPIP)                     
       DA(TCPIP.SEZATCP) .            
                                      
 ENDUCL .                             
/*