RE: enable user profile

<<...>>

I created this command/CL program many moons ago to allow operators and mill supervisors to reenable a user profile/reset a password.  It simply does the following:  1) if the 'User profile reset option' is *ENABLE, the CL program does a CHGUSRPRF &usrprf STATUS(*ENABLED), 2) if the 'User profile reset option' is *PASSWORD, the CL program does a CHGUSRPRF &usrprf PASSWORD(&usrprf) and PWDEXP(*YES).  This changes the user's password to the same as their user profile name and sets their profile to expired so the next time they signon, they are forced to enter a new password, 3) if the 'User profile reset option' is *BOTH, then the program does both steps 1 and 2.  Additionally, the CL programs sends a message to QSYSOPR like the following:

From  . . . :   AMCS           03/07/00   13:15:23                       
Job 381066/AMCS/AITDPC17S1 enabled user profile AMCS.  The last succesfull
  signon for user AMCS was 03/07/00 at 08:01:49.  The number of invalid  
  signon attempts were 00000000000.
                                     
 

-----Original Message-----
From:   JGracetri@aol.com [SMTP:JGracetri@aol.com]
Sent:   Tuesday, March 07, 2000 11:23 AM
To:     MIDRANGE-L@midrange.com
Subject:        enable user profile

I need to enable user profiles.

Can I write a cl which will allow the operator to enable disabled profiles.

I have tried adopted auth, but I must be doing something wrong.

I get this message when the job runs

                         Additional Message Information

 Message ID . . . . . . :   CPF2228       Severity . . . . . . . :   40
 Message type . . . . . :   Escape
 Date sent  . . . . . . :   03/07/00      Time sent  . . . . . . :   11:07:33

 Message . . . . :   Not authorized to change user profile.
 Cause . . . . . :   Object management (*OBJMGT) and use (*USE) authority are
   required for each user profile being changed.
 Recovery  . . . :   Have the security officer give you the required authority
   to change the user profile.

the programs arer owned by a profile which can enable user profiles.




thanks jeff g.







                                                                        
Bottom
 Press Enter to continue.

 F3=Exit   F6=Print   F9=Display message details   F12=Cancel
 F21=Select assistance level
 
+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---