| Hi Sunil,
I don't know if this will help, and it is definitely crude, but the following
script and command file will change a specified group of users.
Let's say the logical MYGROUP translates to "disk1:[mygroup.". The script
asks for the group directory to be changed and you would answer "MYGROUP:".
The script then asks what it should be changed to and you would answer
"DISK1:[MYGROUP.". You can add troubleshooting and change it to whatever
suits your needs.
HTH.
Cindy
! MODIFY_DIRECTORY.SCP
! changes from rooted logical
PROMPT "WHAT IS THE GROUP DIRECTORY TO BE CHANGED? "
GET #OLD_DIR=OA$PROMPT_TEXT
PROMPT "CHANGE IT TO? (EXAMPLE, DISK:[DEPART.) "
GET #NEW_DIR=OA$PROMPT_TEXT
FOR PROFIL WITH .DIRECT = #OLD_DIR DO -
GET #DIR=.DIRECT\\ -
GET #NDIR=#NEW_DIR\\ -
GET_SYMBOL #DIR,#PARSED_DIR,"["\\ -
WRITE CHANGE PROFIL USER=.USER,DIRECT=#NEW_DIR -
#DIR,DELETE_FROM=#NEW_DIR .VMSUSR "]"\\ -
GET_SYMBOL #NDIR,#PARSED_NEW_DIR,"["\\ -
COMMAND MODIFY_DIRECTORY
! end of script
$! MODIFY_DIRECTOYR.COM
$! CHANGE DEVICE & DIRECTORY FIELD IN AUTHORIZE
$ UAF = "$AUTHORIZE"
$ WRITE OAMAILBOX "OA GET .VMSUSR"
$ @DCLMAILBOX:
$ VMSUSER = RESULT
$ WRITE OAMAILBOX "OA GET #PARSED_NEW_DIR"
$ @DCLMAILBOX:
$ DEVICE = RESULT
$ WRITE OAMAILBOX "OA GET #NDIR"
$ @DCLMAILBOX:
$ GROUP_DIR = RESULT
$ SET DEF SYS$SYSTEM
$ UAF MOD 'VMSUSER'/DEV='DEVICE'/DIRECT=['GROUP_DIR''VMSUSER']
$ EXIT
|
| G'day Cindy,
Thanks for your suggestion I have been thinking about a script to make
the changes. All of this could be done from within the script and
there is not need to r authorize.
The new DSAB UAI$ can be used to update the users SYSUAF record. I
have suggested this to the customer. The topdown design would be as
follows :-)
1. Read profile and get details of the users directory specification
2. Translate the rooted logical for the user group directory ie
user_g_dir
3. change the directory spec to disk:[groupg.user.a1] in profile
4. change the directory spec in sysuaf making use of the dsab
ie uai$defdev[oa$profil_vmsusr] and uai$defdir[oa$profil_vmsusr]
Just an idea, the customer will investigate it
Sunil
|