RE: System Information

["Njål Fisketjøn" <n.f@xxxxxxx>]

Gord Royle wrote:

> We have a program that is using a formatted User ID to determine which
> Country a user is in and set defaults accoudingly. It basically substrings
> the User code returned by *Proc and acts accordingly. The problem is that
> someone decided that they would no longer use a formatted user ID. 
> 
> 0003.00 D Pgm               *Proc              
> 0009.00 D  User                 254    263     
> 
> The only piece of information that will now tell me what I need to know is
> the Accounting Code in the User profile. My question is "How do I 
> grab this
> Accounting Code in an RPGIV program?".
> 

You can use the QSYRUSRI (format USRI0300) to retrieve the accounting code.

I would however recommend setting the country parameter (and perhaps language)
for the user profile. Those parameters can be retrieved using the same API.


+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---