Re: Current User Job Attribute and Current User in Program Status Data Structure

[Luis Rodriguez <luisro58@xxxxxxxxx>]

Birgitta,

Just wrote a small program with:

D PgmSts         Sds                  Qualified
D  CurJob                       10a   Overlay( PgmSts: 244 )
D  UsrPrf                       10a   Overlay( PgmSts: 254 )
D  JobNbr                        6a   Overlay( PgmSts: 264 )
D  CurUsr                       10a   Overlay( PgmSts: 358 )

And it had the same values for UsrPrf and CurUsr even when it ran with
adopted authority.

HTH,

Luis Rodriguez
IBM Certified Systems Expert — eServer i5 iSeries
--



On Wed, Dec 15, 2010 at 9:15 AM, Luis Rodriguez <luisro58@xxxxxxxxx> wrote:

> Birgitta,
>
> I think that the manual is quite clear on that: 358 --> 367 Current user
> profile name. Nevertheless, I find interesting that it also states that
> position 254 has the "User name from the user profile", just between Job
> name (pos 244) and Job Number (pos 264).
>
> HTH,
>
> Luis Rodriguez
> IBM Certified Systems Expert — eServer i5 iSeries
> --
>
>
>
>
> On Wed, Dec 15, 2010 at 9:03 AM, Birgitta Hauser <Hauser@xxxxxxxxxxxxxxx>wrote:
>
> > Hi,
> >
> >
> >
> > Can someone enlighten me! We have some discussions.
> >
> > I used the current user out of the program status data structure (position
> > 358) instead of calling a CL Program that does nothing else than RTVJOBA
> > CURUSER(&X).
> >
> > My colleague insists I have to call this CL program because it is not the
> > same.
> >
> >
> >
> > Can someone enlighten me? Is the current user (job attribute) the same as
> > the current user within the PGMSDS or not?
> >
> >
> >
> > 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!"
> >
> >
> >
> > --
> > This is the RPG programming on the IBM i / System i (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.