If a TPX profile is no longer needed, the profile under the user needs to be deleted as well as the profile itself.
> Under User Maintenance, enter the Userid, then Option 5 'Maintain List of Profiles', these are the profiles from which the user is built.
> Initially these profiles are created under TPXADMIN, Option 2 Profile Maintenance.
Release : 5.4
Component : CA-TPX for OS/390
The profile associated with the user can be deleted using Batch Administration, here are a couple examples:
1. The following DELETE statement can be used to delete a profile from a user:
DELETE USERPROFILE (user profilename)
The statement can be repeated as needed.
//BATCHADM EXEC tpxproc,VNODE='*BATCH*'
//EXTFILE DD UNIT=SYSDA,SPACE=(CYL,(1,1))
//RPTFILE DD SYSOUT=*
//SYSIN DD *
DELETE USERPROFILE (userid profilename)
//
2. The following method uses an Extract statement with the VUSRPROF variable to filter the result, followed by a DELETE statement.
//SYSIN DD *
C
C DELETE A USERS PROFILE.
C (MAX OF 5 OR 7 PROFILES WITH THIS LAYOUT)
C
EXTRACT GIVING(EXTFILE) USER AND NO SESSIONS
(UIDXNAME(--------) VUSRPROF(TESTPROF)) <-------------- VUSRPROF is a special batch variable that extracts profiles for a user record. In this case we just want users that have the TESTPROF profile.
C
SET RTITLE1
' USERID 1ST PROF 2ND PROF 3RD PROF 4TH PROF 5TH PROF'
SET RTITLE2
' ======== ======== ======== ======== ======== ========'
REPORT GIVING(RPTFILE) USING(EXTFILE)
(( '0&UIDXNAME' '&VUSR$PRF '))
C
C DELETE the profile from the users
C
DELETE USERPROFILE USING(EXTFILE) (TESTPROF)
>> This will produce a report of all users who have a profile called TESTPROF, then delete the TESTPROF profile under the userids .