Can you do with a command? That can be executed with qsys2.qcmdexc() using SQL, example from manual below. Using existing query to get the once to change and then build command to change.
CALL QSYS2.QCMDEXC('ADDLIBLE PRODLIB2');
Scott Mildenberger | Software Developer | Washington Companies IT Services | 101 International Drive | Missoula, MT | Office: 406-523-1536 | www.washingtoncompanies.com
-----Original Message-----
From: RPG400-L <rpg400-l-bounces@xxxxxxxxxxxxxxxxxx> On Behalf Of Greg Wilburn
Sent: Tuesday, March 03, 2020 12:22 PM
To: RPG programming on IBM i <rpg400-l@xxxxxxxxxxxxxxxxxx>
Subject: Mass change a group of user profiles
First of all, this is not really an RPG specific question (unless I have to write a program to do it).
I have large group of users (100+) where I need to change LMTDEVSSN to *YES. The commonality is that all of the user names END with "RF".
WRKUSRPRF wont' get that for me.
A select over QSYS2.USER_INFO will allow me to get the users I want to change, but it's an SQL view so I can't simply update it.
I would appreciate any ideas.
Thanks,
Greg
--
This is the RPG programming on IBM i (RPG400-L) mailing list To post a message email: RPG400-L@xxxxxxxxxxxxxxxxxx To subscribe, unsubscribe, or change list options,
visit:
https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives at
https://archive.midrange.com/rpg400-l.
Please contact support@xxxxxxxxxxxx for any subscription related questions.
Help support midrange.com by shopping at amazon.com with our affiliate link:
https://amazon.midrange.com
This email has been scanned by Washington Corporations using Message Labs Spam Filtering Technology. If this e-mail is SPAM that you no longer want to receive, please refer to the Spam or Junk Email Handling Process (
https://washcorp.service-now.com/kb_view.do?sysparm_article=KB0011399). If you are experiencing any other e-mail problems, please call the IT Service Center at 855-WC-IT-NOW or x1212 from any office phone.
midrange.com
