I deleted several profiles and recycled the TPX task. The sessions no longer appear on our clients TPX menus but the profiles that I deleted still appear in the TPX User Maintenance Detail Table for these static users.
Deleting the profile will not remove that profile name from the individual user records.
Since these are static users, you can use TPX batch command DELETE USERPROFILE to delete a profile from a user.
See Additional Information for a sample job. The general steps are:
//BATCHADM EXEC TPXPROC,VNODE='*BATCH*'
//EXTFIL1 DD UNIT=SYSDA,SPACE=(CYL,(1,1)),DISP=(MOD)
//RPTFIL1 DD SYSOUT=*
//EXTFIL2 DD UNIT=SYSDA,SPACE=(CYL,(1,1)),DISP=(MOD)
//RPTFIL2 DD SYSOUT=*
//EXTFIL3 DD UNIT=SYSDA,SPACE=(CYL,(1,1)),DISP=(MOD)
//RPTFIL3 DD SYSOUT=*
//SYSIN DD *
C
C Delete specific profiles from static users
C
C ...can limit further by userid (UIDXNAME)
C and/or assigned profile (VUSRPROF)
C
EXTRACT GIVING(EXTFIL1) USER AND NO SESSIONS (
UIDXSTIC(Y)
UIDXNAME(GVT-----)
)
C
SET RTITLE1
' Static users: <<< BEFORE delete >>> max 5 profiles in report'
SET RTITLE2
' USERID 1ST PROF 2ND PROF 3RD PROF 4TH PROF 5TH PROF'
SET RTITLE3
' ======== ======== ======== ======== ======== ========'
REPORT GIVING(RPTFIL1) USING(EXTFIL1)
(( '0&UIDXNAME' '&VUSR$PRF '))
C //
C //
C //
C //* COMMENT out the above // after your first run. (Change // to C //)
C //* This will allow you to first see how many users will be affected
C //* before making any actual updates.
C
C Update extracted users: Delete listed user profiles
C
DELETE USERPROFILE USING(EXTFIL1) ( ADDCICS )
DELETE USERPROFILE USING(EXTFIL1) ( ADDCICSD )
DELETE USERPROFILE USING(EXTFIL1) ( ADDCICSE )
DELETE USERPROFILE USING(EXTFIL1) ( ADDCICSP )
DELETE USERPROFILE USING(EXTFIL1) ( ADDCICST )
DELETE USERPROFILE USING(EXTFIL1) ( ADDCIST2 )
DELETE USERPROFILE USING(EXTFIL1) ( ADDCICSQ )
DELETE USERPROFILE USING(EXTFIL1) ( AZCICSE )
DELETE USERPROFILE USING(EXTFIL1) ( AZCICSP )
DELETE USERPROFILE USING(EXTFIL1) ( AZCICST )
DELETE USERPROFILE USING(EXTFIL1) ( CICSCLAS )
DELETE USERPROFILE USING(EXTFIL1) ( CICSMSGT )
DELETE USERPROFILE USING(EXTFIL1) ( CICSPROD )
DELETE USERPROFILE USING(EXTFIL1) ( CICSSTAG )
DELETE USERPROFILE USING(EXTFIL1) ( ADDAZCICS )
C
C
C
C Extract and report again after deletion.
C
C
EXTRACT GIVING(EXTFIL2) USER AND NO SESSIONS (
UIDXSTIC(Y)
UIDXNAME(GVT-----)
)
C
SET RTITLE1
' Static users: <<< AFTER delete >>> max 5 profiles in report'
SET RTITLE2
' USERID 1ST PROF 2ND PROF 3RD PROF 4TH PROF 5TH PROF'
SET RTITLE3
' ======== ======== ======== ======== ======== ========'
REPORT GIVING(RPTFIL2) USING(EXTFIL2)
(( '0&UIDXNAME' '&VUSR$PRF '))