How to install PTFs using the CAUNZIP process

Products

• PanAudit Plus
• Easytrieve Report Generator
• PAN/SQL

Issue/Introduction

This document describes the CAUNZIP z/OS process for CA Easytrieve.
It is using a scart0.zip file created via CA Support Online - Download - Solutions.
The scart0.zip file could include more PTFs/APARs than required - because SMP/E would only RECEIVE required solutions.
Please check every line carefully and customize all the job cards and DSNs etc. before submitting these jobs.

Environment

Release:
Component: EZTPLS

Resolution

1. ftp the "scart0.zip" file, from CA ftp server to the z/OS USS.

This could be done by a z/OS batch job like:
...
//jobcard...
//ZIPCOPY EXEC PGM=FTP,REGION=0K                
//SYSPRINT DD SYSOUT=*                          
//OUTPUT   DD SYSOUT=*                          
//INPUT    DD *                                 
supportftp.ca.com                                   
[email protected] your_ca_support_online_password
cd 0nnnnnn/nnnnnnn-01/files_from_ca             
bin                                              
get scart0.zip /your/uss/path/scart0.zip      
quit                                            
//

 

1. get ++HOLD data from Support Online 

...
//jobcard...
//GETHOLD EXEC PGM=FTP,REGION=0M                      
//SYSPRINT DD SYSOUT=*                                
//OUTPUT DD SYSOUT=*                                  
//INPUT DD *                                          
ftp.ca.com 21                                         
anonymous                                             
[email protected]
cd /pub/HoldData/                                     
dir                                                   
asc                                                    
locsite LR=80 REC=FB BLOCKSI=0                        
locsite PRI=20 SEC=10 CY STORCLAS=TSO                 
get ALL-HOLDDATA.TXT +                                
    'YOUR.EZTP.CAUNZIP.D#date#.PTFHOLD' (REPLACE  
quit                                                  
//
   

1. run CAUNZIP     

...
//jobcard...
//OUTCLASS SET OUTCLASS='*'                                   
//*                                                           
//CAUNZIP EXEC PGM=IKJEFT01,DYNAMNBR=10,REGION=0M             
//ZIPRPT   DD SYSOUT=&OUTCLASS,RECFM=FBA                      
//SYSTSPRT DD SYSOUT=&OUTCLASS                                
//SYSPRINT DD SYSOUT=&OUTCLASS                                
//STDOUT   DD SYSOUT=&OUTCLASS                                
//STDERR   DD SYSOUT=&OUTCLASS                                
//SYSTSIN  DD *                                               
CAUNZIP ZIPPATH(/your/uss/path/scart) ZIPFILE(scart0.zip) -       
JAVAPATH(/usr/lpp/java/J6.0_64)                               
//
 
See https://support.ca.com/irj/portal/phpdocs?filePath=7/common/CA_UNZIP_Utility_Quick_Reference.pdf for more details about CAUNZIP please.
 
 

1. SMP/E RECEIVE                                        

...
//jobcard...
//S010   EXEC PGM=GIMSMP,PARM='PROCESS=WAIT',DYNAMNBR=120       
//SMPCSI   DD DISP=SHR,DSN=YOUR.EZTP.CAUNZIP.CSI           
//SMPHOLD  DD DISP=SHR,DSN=YOUR.EZTP.CAUNZIP.D#date#.PTFHOLD
//SMPOUT   DD SYSOUT=*                                          
//SMPRPT   DD SYSOUT=*                                          
//SYSPRINT DD SYSOUT=*                                          
//SMPJHOME DD PATHDISP=KEEP,                                    
//   PATH='/usr/lpp/java/J6.0_64/'                              
//SMPNTS   DD PATHDISP=KEEP,                                    
//   PATH='/your/uss/path/scart/scart0/'                            
//SMPCNTL  DD *                                                 
   SET BOUNDARY(GLOBAL) .                                       
   RECEIVE FROMNTS(SMPNTS)                                      
      SYSMODS                                                    
      .                                                         
/*
//                                                                                                                         
 
 

1. check ++HOLD - see SMP/E RECEIVE output

 
                                                                             

1. SMP/E APPLY                                       

...
//jobcard...
//APPLY   EXEC PGM=GIMSMP,PARM='DATE=U',REGION=0M        
//SMPCSI  DD   DISP=SHR,DSN=YOUR.EZTP.CAUNZIP.CSI   
//SMPCNTL DD   *                                         
SET BOUNDARY (CAITGT) .                                   
APPLY                                                    
  FORFMID (                                              
    CA03B60             
    CBAAB60            
    CCL2B60            
          )                                              
GROUPEXTEND                                              
BYPASS(HOLDSYSTEM).                                      
//
 
Done.