IBM Provided an UDTF (User Defined Function) named USERS(), located within
the QSYS2 library.
You easily can access this UDTF with (embedded) SQL:
Exec SQL Select ODOBTX into :HostVariable
from Table(Qsys2.Users()) x
Where ODOBNM = :HostUsrPrf;
Mit freundlichen Grüßen / Best regards
Birgitta Hauser
"Shoot for the moon, even if you miss, you'll land among the stars." (Les
Brown)
"If you think education is expensive, try ignorance." (Derek Bok)
"What is worse than training your staff and losing them? Not training them
and keeping them!"
-----Ursprüngliche Nachricht-----
Von: RPG400-L [mailto:rpg400-l-bounces@xxxxxxxxxxxx] Im Auftrag von Booth
Martin
Gesendet: Thursday, 08.10 2015 06:24
An: RPG programming on the IBM i / System i
Betreff: Retrieve a user's full name (not the User ID)
Is there a way to programmatically retrieve a user's name from his profile?
That is, the "user description field" in the user profile.
--
Booth Martin
www.martinvt.com
(802)461-5349
Slime is the agony of water. -- Jean-Paul Sartre
--
This is the RPG programming on the IBM i (AS/400 and iSeries) (RPG400-L)
mailing list To post a message email: RPG400-L@xxxxxxxxxxxx To subscribe,
unsubscribe, or change list options,
visit:
http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives at
http://archive.midrange.com/rpg400-l.
midrange.com
