Displaying IDMS SYSTEM PROFILE information

Products

• IDMS

Issue/Introduction

When GRANTing SIGNON access to a SYSTEM, the name of a SYSTEM PROFILE can be provided.

GRANT SIGNON ON SYSTEM SYSTEM01 PROFILE PROF1 TO ANDREW;

How can this information be displayed again in OCF?

Environment

Release : All supported releases.
Component : IDMS

Resolution

The following statement can be used:

DISPLAY PRIVILEGES ON RESOURCE SYSTEM SYSTEM01;

However it displays all of the GRANTs on that SYSTEM.

For more granularity, SQL SELECTs against the IDMSSECS.USERDATA table with TYPE='P' can be used.

CONNECT TO SYSTEM;                                       
*+ Status = 0        SQLSTATE = 00000                    
SELECT AUTHID, SYSTEM, PROFILENAME FROM IDMSSECS.USERDATA
 WHERE TYPE='P';                                         
*+                                                       
*+ AUTHID              SYSTEM    PROFILENAME             
*+ ------              ------    -----------             
*+ U1                  TEST1     PROF1                   
*+ U2                  TEST1     PROF1                   
*+ ANDREW              SYSTEM01  PROF1                   
*+                                                       
*+ 3 rows processed                                      
SELECT AUTHID, SYSTEM, PROFILENAME FROM IDMSSECS.USERDATA
 WHERE TYPE='P' AND AUTHID='IAN';                        
*+                                                       
*+ AUTHID              SYSTEM    PROFILENAME             
*+ ------              ------    -----------             
*+ ANDREW              SYSTEM01  PROF1                   
*+                                                       
*+ 1 row processed                                       
SELECT AUTHID, SYSTEM, PROFILENAME FROM IDMSSECS.USERDATA
 WHERE TYPE='P' AND SYSTEM='SYSTEM01';                   
*+                                                       
*+ AUTHID              SYSTEM    PROFILENAME             
*+ ------              ------    -----------             
*+ ANDREW              SYSTEM01  PROF1                   
*+                                                       
*+ 1 row processed                                       
SELECT AUTHID, SYSTEM, PROFILENAME FROM IDMSSECS.USERDATA
 WHERE TYPE='P' AND PROFILENAME='PROF1';                 
*+                                                       
*+ AUTHID              SYSTEM    PROFILENAME             
*+ ------              ------    -----------             
*+ U1                  TEST1     PROF1                   
*+ U2                  TEST1     PROF1                   
*+ ANDREW              SYSTEM01  PROF1                   
*+                                                       
*+ 3 rows processed