Ituriel,
You may want to include the processing of 0205 User Group Connect Detail
Records. By relying solely on 0102 records, you will miss any connections to
Global groups.
Perhaps what you could do is process the 0205 records first to create the
group connects followed by the 0102 records to modify the connects with any
AUTHORITY of other than USE.
Regards, Bob
------------------------------------------------------------------------
Robert S. Hansel | 2008 RACF Training (January - July)
Lead RACF Specialist | > Intro & Basic Admin - Boston - APR 29 - MAY 1
RSH Consulting, Inc. | > Audit for Results - Boston - MAY 20-22
www.rshconsulting.com |
617-969-8211 | Visit our website for registration & details
------------------------------------------------------------------------
-----Original Message-----
Date: Mon, 24 Mar 2008 15:17:00 -0300
From: ITURIEL DO NASCIMENTO NETO <[EMAIL PROTECTED]>
Subject: RES: Cloning a RACF user profile
As suggested by someone, you can use SORT to generate the appropriate
commands.
I've build the following JCL, which you can use as a starting point to
your needs.
... (snip)
//SORTOF4 DD DSN=SO.S1.RACF.REG102,DISP=(,CATLG),
// UNIT=(3390),SPACE=(CYL,(1,10),RLSE)
...
OUTFIL INCLUDE=(005,4,CH,EQ,C'0102',AND,
019,8,CH,EQ,C'USERID'),FILES=4,
CONVERT,OUTREC=(5,300),VLFILL=C' '
...
//CONNECT EXEC PGM=SORT
//SYSOUT DD SYSOUT=*
//SORTIN DD DSN=SO.S1.RACF.REG102,DISP=SHR
//SORTOUT DD SYSOUT=*
//SYSIN DD *
SORT FIELDS=COPY
OUTREC FIELDS=(C' CONNECT ',
15,8,C'GROUP(',06,8,C') ',
C'OWNER(',06,8,C') ',
C'AUTHORITY(',24,8,C') ')
END
...
Atenciosamente / Regards / Saludos
Ituriel do Nascimento Neto
Banco Bradesco S/A
4254/DPCD Alphaville
Engenharia de Software - Sistemas Operacionais Mainframes
Tel: 55 11 4197-2021 Fax: 55 11 4197-2814
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
