How to convert the RACF IWNRACF4 job to Top Secret Commands.
Related IBM Copy Services Manager for z/OS Articles:
136788 Top Secret Converting the RACF IWNRACFC job commands for IBM CSM
136782 Top Secret Converting the RACF IWNRACF2 job commands for IBM CSM
136783 Top Secret Converting the RACF IWNRACF3 job commands for IBM CSM
136785 Top Secret Converting the RACF IWNRACF4 job commands for IBM CSM
136786 Top Secret Converting the RACF IWNRACF5 job commands for IBM CSM
Release : 16.0
Component : CA Top Secret for z/OS
//IWNRACF4 JOB <job parameters>
//*********************************************************************
//* LICENSED MATERIALS - PROPERTY OF IBM *
//* THIS PRODUCT CONTAINS "RESTRICTED MATERIALS OF IBM" *
//* (C) COPYRIGHT IBM CORPORATION 1999, 2016. *
//* ALL RIGHTS RESERVED. *
//* *
//* IBM Copy Services Manager for z/OS *
//* *
//* CAUTION: This is neither a JCL procedure nor a complete job. *
//* Before you use this job step, make the following modifications: *
//* *
//* This job defines the user ID that is associated with the *
//* HyperSwap Sockets Server address space - BHIHSRV. *
//* *
//* *
//* 1) Change the job card to meet your system requirements. *
//* 2) Replace the following variables: *
//* #user_id - User ID for the HyperSwap Sockets Server *
//* address space. *
//* - It is suggested that you use "BHIHSRV" *
//* as the user ID. *
//* #group_name - Group name for the HyperSwap address *
//* space. *
//* #gid - Group ID number. *
//* #uid - User ID number. *
//* *
//*********************************************************************
/*
//BHIHSRV EXEC PGM=IKJEFT01
//SYSLBC DD DSN=SYS1.BRODCAST,DISP=SHR
//SYSTSPRT DD SYSOUT=*
//SYSTSIN DD *
/* Define the HyperSwap Sockets Server address space */
/* user ID and group. */
ADDGROUP #group_name OMVS(GID(#gid))
ADDUSER #user_id DFLTGRP(#group_name) OMVS(UID(#uid) +
HOME('/') +
PROGRAM(/bin/sh)) +
NAME('HyperSwap Sockets Server') +
NOPASSWORD
TSS CRE(#user_id) TYPE(USER) NAME('HyperSwap Sockets') PASS(XXXX,0) DEPT(dept_acid)
TSS CRE(#group_name) TYPE(GROUP) NAME('#group_name') DEPT(dept_acid)
TSS ADD(#group_name) GID(xx)
TSS ADD(#user_id) UID(XX)
TSS ADD(#user_id) GROUP(#group_name) DFLTGRP(#group_name) HOME(/) OMVSPGM(/bin/sh)
/* Define the started profile. */
RDEF STARTED BHIHSRV.* UACC(NONE) STDATA(USER(#user_id) +
GROUP(#group_name) PRIVILEGED(NO) TRUSTED(NO) TRACE(YES))
SETROPTS RACLIST(STARTED) GENERIC(STARTED) REFRESH
TSS ADD(#user_id) FAC(STC)
TSS ADD(STC) PROCNAME(BHIHSRV*) ACID(#user_id)
/* Permit access to ANT.REPLICATIONMANAGER. */
RDEFINE FACILITY ANT.REPLICATIONMANAGER UACC(NONE)
PERMIT ANT.REPLICATIONMANAGER CLASS(FACILITY) +
ID(#user_id) ACCESS(CONTROL)
SETROPTS RACLIST(FACILITY) REFRESH
TSS ADD(owning_dept) IBMFAC(ANT.)....unless already owned
TSS PER(#user_id) IBMFAC(ANT.REPLICATIONMANAGER) ACC(CONTROL)
/*