Removing optional FMIDs that are in ACCEPT status

Products

• ACF2 - z/OS
• ACF2 - MISC
• ACF2

Issue/Introduction

When installing a product using z/OSMF portable software instances, there can be optional FMIDs associated with the product that are applied and accepted at the same time which may be undesirable depending on the environment. This article shows how to remove an optional FMID that is in ACCEPT status using ACF2 optional FMID CAX1G02 as an example.

 

Environment

Release : 16.0, 17.0

Resolution

The sample jobs remove an optional FMID that was installed with a product. The steps are: 

1. Define a dummy function SYSMOD (in this example DELFUNC). The dummy function deletes the optional FMID (in this example CAX1G02).
2. Receive, apply, and accept the dummy function DELFUNC, and run UCLIN to delete the SYSMOD entries for the deleted FMID CAX1G02 and for the dummy function DELFUNC.
3. Reject the HOLDDATA, product information, and FMIDs themselves.

In this example DELFUNC is the dummy SYSMOD and CAX1G02 is the optional FMID to be deleted.

//SMPDELJ1  JOB 9999999999,CLASS=A  
//*** Remove FMID JOB 1 ***                                 
//REJECT   EXEC PGM=GIMSMP,PARM='DATE=U',REGION=0M          
//SMPCSI    DD DISP=SHR,DSN=your.product.CSI  
//SMPPTFIN DD DATA,DLM=$$                                   
++FUNCTION(DELFUNC)     /* Any valid unique SYSMOD ID.    */.
++VER(Z038)             /* For SREL Z038 (MVS products).  */
DELETE(CAX1G02)         /* FMID to be removed.            */.
$$                                                          
//SMPHOLD   DD DUMMY                                        
//SMPCNTL   DD   *                                          
SET     BDY(GLOBAL)      /* Set to global zone.           */.
RECEIVE S(DELFUNC)       /* Receive the DELFUNC.          */.
SET     BDY(CAIT0)       /* Set to target lib.            */.
APPLY   S(DELFUNC)       /* Apply to delete function.     */.
SET     BDY(CAID0)       /* Set to dist lib.              */.
ACCEPT  S(DELFUNC)       /* Accept delete function.       */.
SET     BDY(CAIT0)       /* Set to target lib.            */.
UCLIN.                                                       
DEL     SYSMOD(DELFUNC)  /* Delete SYSMOD DELFUNC entries */.
DEL     SYSMOD(CAX1G02)  /* Delete SYSMOD for FMID.       */.
ENDUCL.                                                      
SET     BDY(CAID0)       /* Set to dist lib.              */.
UCLIN.                                                       
DEL     SYSMOD(DELFUNC)  /* Delete SYSMOD DELFUNC entries */.
DEL     SYSMOD(CAX1G02)  /* Delete SYSMOD for FMID.       */.
ENDUCL .                                                        
/*                                                              


//SMPDELJ2 JOB 9999999999,CLASS=A  
//*** Remove FMID JOB 2 ***                               
//********************************************************
//REJECT   EXEC PGM=GIMSMP,PARM='DATE=U',REGION=0M        
//SMPCSI    DD DISP=SHR,DSN=your.product.CSI
//SMPPTFIN  DD DUMMY                                      
//SMPHOLD   DD DUMMY                                      
//SMPCNTL   DD   *                                        
SET    BDY(GLOBAL)       /* Set to global zone. */.       
REJECT HOLDDATA NOFMID   /* Reject HOLDDATA,    */        
PRODUCT                  /* PRODUCT info for    */        
DELETEFMID               /* the deleted FMODs.  */        
(DELFUNC CAX1G02)        /* Delete the FMIDs.   */.       
/*              

Additional Information

For reference, the ACF2 FMIDs are:

ACF2 r16
CAX1G00 /*CA-ACF2-MVS               
CAX1G01 /*CA-ACF2-MVS JES2          
CAX1G02 /*CA-ACF2-MVS JES3       
CAX1G03 /*CA-ACF2-MVS CICS       
CAX1G04 /*CA-ACF2-MVS IMS        
CAX1G05 /*CA-ACF2-MVS DLI   

ACF2 r17
CAX1H00 /*ACF2 for z/OS            
CAX1H01 /*ACF2 for z/OS JES2       
CAX1H02 /*ACF2 for z/OS JES3PLUS
CAX1H03 /*ACF2 for z/OS CICS       
CAX1H04 /*ACF2 for z/OS IMS        
CAX1H05 /*ACF2 for z/OS DLI