//TOMCRUDS JOB ('ESRF DEVELOPMENT'),'TOM.CARNEAL', // CLASS=A,MSGCLASS=X,MSGLEVEL=(0,0), // NOTIFY=&SYSUID //* //******************************************************************** //* * //* ESRF RACF SYSTEM ACCESS ANALYSIS. * //* * //*------------------------------------------------------------------* //* * //* RUN USERIDOWNER DATASET REPORT - EKCRRUDS * //* * //******************************************************************** //* //EKCRRUDS EXEC PGM=EKCRRUDS,REGION=0K //STEPLIB DD DSN=TEST.ESRF210.ESRFLOAD,DISP=SHR //DSNAMES DD DSN=TOMC.RACF.PDSNS,DISP=SHR (FROM RPSD) //IRACFDB DD DSN=TOMC.AA.VSAM,DISP=SHR //SYSPRINT DD DSN=&&SYSPRINT,DISP=(NEW,PASS), // UNIT=VIO,SPACE=(CYL,(1,1)) //SYSUDUMP DD SYSOUT=* //SYSIN DD * TITLE(RACF USERID DATASET ACCESS) * SUMMARY MAXDSNS(U) SELECT(USERID,**) USERFIELDS(OWNERID,ACC-DATE) INDEX(**) COMPRESS(G0000V00) //* //* CONVERT PRINT OUTPUT TO HTML. //* //HTML EXEC PGM=ESRFHTML //STEPLIB DD DSN=TEST.ESRF210.ESRFLOAD,DISP=SHR //PRINTIN DD DSN=&&SYSPRINT,DISP=(OLD,DELETE) //HTMLOUT DD DSN=TOMC.ESRF.HTML(RRUDS),DISP=SHR //SYSPRINT DD SYSOUT=* //SYSUDUMP DD SYSOUT=* //SYSIN DD * TITLE=EKCRRUDS -- (CREATE USERIDOWNER DATASET REPORT)