/****************************************************************/
/*                                                              */
/* The RACF Remove ID Utility (IRRRID00) was executed on        */
/* 1998-03-23 at 09:00:01.                                      */
/*                                                              */
/* This file contains RACF commands that can be used to         */
/* identify references to user IDs and group names. Residual    */
/* references on an access list are deleted with the PERMIT     */
/* command. For all other references, commands are created to   */
/* change the reference to another value. The default value     */
/* is ?id. This allows all references to a particular ID to     */
/* be easily changed to another value using a text editor.      */
/*                                                              */
/* Commands to alter ROLE definitions will be created within    */
/* comments for informational purposes, though the actual       */
/* updates should be made from Tivoli. The ROLE will not be     */
/* updated with a replacement value for a group name.           */
/****************************************************************/
                                                                  
/****************************************************************/
/* The INDD data set has been scanned for all names that do     */
/* not have a user or group name defined for them in INDD. This */
/* list of names has been formatted and sorted into the         */
/* SORTOUT data set.                                            */
/****************************************************************/
                                                                  
 CONNECT BILL   GROUP(RACFDEV )    OWNER(?ELVIS )                 
 ALTDSD  'DASDDEF.VCE313S' GENERIC OWNER(?JUNO  )                 
 PERMIT  D12*   CLASS(DASDVOL ) ID(MARK  ) DELETE                 
 PERMIT  111111 CLASS(DASDVOL ) ID(BRUCE ) DELETE                 
 PERMIT  222222 CLASS(DASDVOL ) ID(JUNO  ) DELETE                 
 RALTER  FACILITY IRR.LISTUSER NONOTIFY                           
 RALTER  FACILITY IRR.PASSWORD.RESET OWNER(?TERRY  )              
/* RALTER  ROLE DEVELOPMENT TME(DELGROUPS(RACFDEV ))            */
                                                                 
/****************************************************************/
/* The following commands delete profiles. You must review      */
/* these commands, editing them if necessary, and then remove   */
/* the EXIT statement to allow the execution of the commands.   */
/****************************************************************/
                                                                  
 EXIT                                                             
                                                                  
 RDELETE  TMEADMIN TERRY@TWINPEAKS.COM                            
 DELDSD   'D69A.BRUCE.TEXT' VOLUME(TSO018) NOSET                  
 DELDSD   'D69A.MARK.*'                                           
 DELUSER  BRUCE                                                   
 DELUSER  JUNO                                                    
 DELUSER  MARK                                                    
 DELGROUP RACFDEV                                                 
                                                                  
/****************************************************************/
/* IRRRID00 has successfully completed                          */
/****************************************************************/