How to install PTFs using the CAUNZIP process
search cancel

How to install PTFs using the CAUNZIP process

book

Article ID: 106966

calendar_today

Updated On:

Products

PanAudit Plus Easytrieve Report Generator PAN/SQL

Issue/Introduction

This document describes the CAUNZIP z/OS process for Easytrieve Report Generator.
It is using a scart0.zip file created via 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

Easytrieve Report Generator, release 11.6.

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.