RE: API to retrieve 'current user'?

Just a little word of warning - I believe the PSDS current user is
initialized on initial entry to the RPG program so there are a few
scenarios where you may still not get the user name you're after.

If you are currently user ABC and call RPG1 the PSDS will show the current
user as ABC.  If RPG1 returns without setting LR, you call Set Profile
Handle to swap to user DEF, and then call RPG1 again you will still show
ABC as the current user.  Setting LR in RPG1 would get around this.

If you are currently user ABC and call RPG2 the PSDS will show the current
user as ABC.  If RPG2 then calls Set Profile Handle to swap to user DEF
then current user will still be ABC when the Set Profile Handle API returns
to RPG2.

If you used the Retrieve Job Information API format JOBI0600 you would get
the "correct" current user in the above (plus other) scenarios.

Bruce Vining



                                                                           
             Rich Duzenbury                                                
             <rduz-midrange@we                                             
             sternmidrange.com                                          To 
             >                         Midrange Systems Technical          
             Sent by:                  Discussion                          
             midrange-l-bounce         <midrange-l@xxxxxxxxxxxx>           
             s@xxxxxxxxxxxx                                             cc 
                                                                           
                                                                   Subject 
             03/21/2005 02:46          RE: API to retrieve 'current user'? 
             PM                                                            
                                                                           
                                                                           
             Please respond to                                             
             Midrange Systems                                              
                 Technical                                                 
                Discussion                                                 
                                                                           
                                                                           




On Mon, 2005-03-21 at 11:39 -0800, Gary Monnier wrote:
> You can get the current user from the RPG program's status data
> structure positions 358 through 367.  Job initiator is in positions 254
> through 263.

Ahh, that's the ticket.  I was using the data in 254-263.

Thank you, Gary.
--
Regards,
Rich

Current Conditions in Des Moines, IA
Overcast
Temp 48.2F
Winds out of the East at 17, gusting to 23mph


--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
To post a message email: MIDRANGE-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/midrange-l.