How do I setup resource rules for IMS FastPath Online Utilities?
search cancel

How do I setup resource rules for IMS FastPath Online Utilities?

book

Article ID: 13596

calendar_today

Updated On:

Products

ACF2 ACF2 - DB2 Option ACF2 for zVM ACF2 - z/OS ACF2 - MISC PanApt PanAudit

Issue/Introduction



How do I setup resource rules for IMS FastPath Online Utilities?

Environment

Release:
Component: ACF2MS

Resolution

IMS FastPath Online Utilities validations are done for Resource Class IMSTxxx and Resource Name(Entity) imsid.dbname.areaname. IMSTxxx class where xxx can be equal to ODE, OAE, OER, OPC, ORE or ODM.

Resource CLASS(IMSTxxx) is used for IMS FastPath Online Utilities validations where the xxx portion of 'IMSTxxx' will have the following 6 different values:

ODE - Online Data Extract
OAE - Online Area Extender
OER - Online Expert Reorganization
OPC - Online Pointer Checker
ORE - Online Reorganization Expert
ODM - Online DMAC Print

The Resource name is in the format of imsid.dbname.areaname

The 'imsid' is the name of the specific IMS system. For example:

IMX1 = TST - allowed access to limited UID
IMX2 = TST - allowed access to limited UID
IMX3 = PRD - allowed access to limited UID
IMX4 = PRD - allowed access to limited UID
IMX5 = PRD - allowed access to limited UID

You can limit how many ACF rules you would need to setup for IMS FastPath Online Utilities by doing the following. 

You can setup GSO CLASMAP records for the six different values of IMSTxxx that map to the same TYPE code to simplify writing rules. For example: 

ACF
SET CONTROL(GSO)
INSERT CLASMAP.IMSTODE RESOURCE(IMST***) rsrctype(IMS)
F ACF2,REFRESH(CLASMAP) 

Then you can setup one resource rule for each specific IMS system. For example: 

ACF
SET RESOURCE(IMS)
RECKEY imsid ADD( - UID(userid1) SERVICE(UPDATE) ALLOW) 

Or if you want to use the same rule for multiple IMS systems, you could code a masked rule that will match mutliple IMS systems. For example: 

ACF
SET RESOURCE(IMS)
RECKEY IMX* ADD( - UID(userid1) SERVICE(UPDATE) ALLOW) 

  or 

RECKEY IMX* ADD( - UID(userid2) SERVICE(UPDATE) ALLOW) 

  or 

RECKEY IM** ADD( - UID(userid2) SERVICE(UPDATE) ALLOW)