5 pts.
 Need a CL to enable vendors userids on the AS/400
We have a robot job the disables vendor userids at 18:00 and 06:00 respectivley. Would like to write a CL to enter in a list of ids that need to be enabled and run the job. Instead of enabling each id each morning. Sometiimes there can be quite a few on 4 different systems. Please help.

Software/Hardware used:
ASKED: April 1, 2009  6:50 AM
UPDATED: April 1, 2009  1:07 PM

Answer Wiki:
Hi, I think your best option would be to create a data file with a list of the user IDs that need to be re-enabled, then read the data file in a CL program (using DCLF & RCVF). For each of the User ID's that you read do a CHGUSRPRF *ENABLE. PGM DCLF USERIDS READ: RCVF MONMSG MSGID(CPF0864) EXEC(GOTO ENDPGM) CHGUSRPRF USRPRF(&USERID) STATUS(*ENABLED) GOTO READ ENDPGM: ENDPGM This assumes that you have a field called USERID in a file called USERIDS. Regards, Martin Gilbert.
Last Wiki Answer Submitted:  April 1, 2009  9:04 am  by  Gilly400   23,625 pts.
All Answer Wiki Contributors:  Gilly400   23,625 pts.
To see all answers submitted to the Answer Wiki: View Answer History.


Discuss This Question:
_ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _