2009年8月12日 星期三

How to know the list of RACF profiles

(1) You can run program IRRDBU00 against the RACF database which unloads it into a sequential dataset.

Code:

//STEP010 EXEC PGM=IRRDBU00,REGION=48M,PARM=NOLOCKINPUT

//SYSPRINT DD SYSOUT=*

//INDD1 DD DISP=SHR,

// DSN=SYS1.RACFDS

//OUTDD DD DSN=IBMUSER.SYS1.RACFDS.DUMP,

// DISP=(NEW,CATLG,DELETE),

// UNIT=SYSDA,SPACE=(CYL,(20,5),RLSE),

// DCB=(RECFM=VB,LRECL=4096,BLKSIZE=20480)


(2) The output file will contain a variety of record types. The 0404 will contain dataset profiles with the RACF groups or RACF users that can reference them:

Code:

//ST0404 EXEC PGM=SORT

//SORTIN DD DSN=IBMUSER.SYS1.RACFDS.DUMP,DISP=SHR

//SORTOUT DD DSN=IBMUSER.SYS1.RACFDS.DUMP.C404DSPA,

// DISP=(NEW,CATLG,DELETE),

// UNIT=SYSDA,SPACE=(TRK,(15,15),RLSE),

// DCB=(RECFM=VB,LRECL=4096,BLKSIZE=20480)

//SYSOUT DD SYSOUT=*

//SYSIN DD *

SORT FIELDS=COPY

INCLUDE COND=(5,4,CH,EQ,C'0404')

/*

沒有留言:

張貼留言