With RACF
Modify your configuration as follows.
- Add the following entry to -RHILEV-.RLSPARM(KLVINNAM):
CLASSES=dynaplstwhere dynaplst is a member in -RHILEV-.RLSPARM.
- Define dynaplst in -RHILEV-.RLSPARM to contain:
VGWAPLST EXTERNAL=APPLNote: Use the IBM supplied resource class of APPL, as in the previous example or modify your site's resource class with the same definition.
Your RACF administrator must also make the following changes to RACF:
- Issue the RDEFINE command using APPL as the class. The resource
names are applids and/or session IDs. For more information, see Session types. The session ID corresponds
to the ENTITY parameter on the RACHECK (FRACHECK) macro.
The following example gives universal access to the class APPL:
READYRDEFINE APPL sessionid UACC(READ)Note: The sessionid value must be in uppercase.Issue the RDEFINE command for each application that is defined within CL/SuperSession.
The following RACF commands illustrate how to set up more restricted access to an application.
READYRDEFINE APPL sessionid UACC(NONE)PERMIT sessionid CLASS(APPL) ID(userid) - Issue the following command:
READY SETROPTS CLASSACT(APPL)
If, at any time, definitions in RACF are modified, added, or deleted, they can be reflected immediately by issuing a NAM RACLIST command from the operator facility. For more information on the NAM RACLIST command, see the IBM CL/SuperSession Operator's Guide.
VTAM network name (APPLID). Refer to Using administrator functions. Managing applications based on groups of users
You can use the RACF CONNECT command to manage applications based on user groups as follows:
- Define the ICHERCDE macro as described in the chapter about Network Access Manager in the IBM CL/SuperSession for z/OS V2.1 Customization Guide. This example uses a class named $SESSMAN.
- Define a group to RACF:
Addgroup GROUP1 SUPGROUP(SUPGRPNM) - Issue RACF PERMIT commands to permit the application to the group,
rather than to the user:
PErmit TSO CLASS($SESSMAN) ID(GROUP1) ACC(READ)PErmit HELPDESK CLASS($SESSMAN) ID(GROUP1) ACC(READ) - Connect the user to the group:
CONNECT userid GROUP(GROUP1)
SETROPTS RACLIST ($SESSMAN) REFRESH NAM RACLIST