The SRTT must contain one or more entries to enable the external security of RESTYPE=ACTI. For example:
#SECRTT TYPE=ENTRY,RESTYPE=ACTI, SECBY=EXTERNAL, EXTCLS='CA@IDMS',EXTNAME=(SYST,ACTIVITY)
Update the source for IDMSCTAB as needed.
This example #CTABGEN entry secures the DCMT commands listed in the check and assigns a task number to each:
CTAB TITLE 'GENERATE DCMT SECURITY TABLE'
#CTABGEN LOGIN=YES, X
(A,1,B,2,C,3,D,4,E,5,F,6,G,7,H,8,I,9), X
(N022,A), DCMT DISPLAY MEMORY X
(N046001,B), DCMT VARY DYNAMIC PROGRAM X
(N046002,C), DCMT VARY DYNAMIC TASK X
(N050,D), DCMT VARY LOADLIB X
(N033,E), DCMT VARY MEMORY X
(N063,F), DCMT VARY NUCLEUS X
(N025,G), DCMT VARY PROGRAM X
(N073,H), DCMT VARY RUN UNIT X
(N095,I) DCMT VARY SYSGEN
END
The ACTIVITY passed to the ESM will be the first up to five bytes of the application name followed by the three-byte activity number or, using the above example, DCMT009 for a DCMT VARY SYSGEN command.
After making the above changes, IDMSCTAB and RHDCSRTT must be reassembled and relinked. To implement the new SRTT and IDMSCTAB, either recycle any CVs that use the SRTT or issue these commands:
DCMT VARY NUCLEUS MODULE RHDCSRTT NEW COPY
DCMT VARY NUCLEUS MODULE IDMSCTAB NEW COPY
DCMT VARY NUCLEUS RELOAD
Also verify the ESM gives access to the appropriate users. Here are Top Secret commands based on the above information. Assume that the SYSTEM ID in SYSGEN is TEST001:
TSS PER(user_id) CA@IDMS(TEST001.DCMT001)