Listing Ideal users and systems with the PERSYS program sample

Products

• Datacom
• Ideal

Issue/Introduction

PERSYS is an Ideal (formerly CA-IDEAL) program that will display and list all Ideal users, the systems they can access, and their authority level.

Resolution

Program PERSYS can be run in either online or batch mode. The report from the program will list all the Ideal users and the systems they have access to along with their authorizations.

These are the steps to use this tool.

1. Save the file that is attached to this article, and upload it to an 80-byte mainframe file.
2. Run the Ideal IMPORT command  (program IDUTSTRN) to load the programs and the report into the desired Ideal system.
3. Compile the DSFERR and PERSYS programs.
4. Run the PERSYS program as desired.

CA Ideal program PERSYS calls 2 programs: DDCALL, and DSFERR. It also uses 1 report called PERSYS. All components should be imported using the IMPORT ALL command as shown below. Be sure to note the version numbers of these entities.

Here is a JCL snippet for the import:
//SRCTRN   EXEC PGM=IDUTSTRN 
. . .                                         
//EXTSRC    DD DISP=SHR,DSN=Import file (PERSYS)          
//SRCLIST   DD SYSOUT=*                                             
//SYSIN     DD *                                                    
SIGNON PERSON uuuuu...                                           
SET ERROR CONTINUE                                                  
SET IMPORT DUPLICATE REPLACE                                        
SET IMPORT NEW SYSTEM xxx
IMPORT ALL                                                          
/*

Here is another JCL snippet for the compile:
//COMSTP EXEC PGM=IDBATCH,COND=(5,LT) 
. . .    
//SYSIN  DD *                          
SIGNON PERSON uuuuu...                   
SEL SYS xxx
COMPILE DSFERR   V 6                   
COMPILE PERSYS   V 7                   
/* 

Here is a JCL snippet to run the program:
//RUNSTP EXEC PGM=IDBATCH,COND=(5,LT)       
. . .      
//SYSIN  DD *                                   
SIGNON PERSON uuuuu...                              
SEL SYS xxx
RUN PERSYS   V 7                                
/*                                              
//PERSYS    DD SYSOUT=*

Additional Information

As always, please contact Broadcom support for Datacom if you have further questions.