× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.



Brad here is an example program to retrieve the info you need:

http://as400service.rochester.ibm.com/s_dir/slkbase.NSF/1ac66549a21402188625680b0002037e/06176cce7bd8d917862565c2007cc9b4?OpenDocument&Highlight=0,JOBI0600

Very basic program but the idea is there.


-------------------------
 Bryan Dietz
3X Corporation






                    Brad McDaniel
                    <BMCDANIEL@ABSBC.OR       To:     
"'midrange-l@midrange.com'" <midrange-l@midrange.com>
                    G>                        cc:
                    Sent by:                  Subject:     RE: Retrieve User 
Profile
                    midrange-l-admin@mi
                    drange.com


                    09/18/2001 01:02 PM
                    Please respond to
                    midrange-l






This message is in MIME format. Since your mail reader does not understand
this format, some or all of this message may not be legible.
--
[ Picked text/plain from multipart/alternative ]
That sounds great...but I'll have to show my level of experience here...do
you have any code examples of how to call that API?

-----Original Message-----
From: Carsten Flensburg [mailto:flensburg@novasol.dk]
Sent: Tuesday, September 18, 2001 11:51 AM
To: midrange-l@midrange.com
Subject: Re: Retrieve User Profile


Hello Brad,

The QUSRJOBI (Retrieve job information) API - format JOBI0600 - returns the
current user profile in position 92. Please note that in order to retrieve
other jobs' information the profile calling the API need to have *JOBCTL
special authority.

Best regards,
Carsten Flensburg


----- Original Message -----
From: <midrange-l-admin@midrange.com>
To: <midrange-l@midrange.com>
Sent: Tuesday, September 18, 2001 6:36 PM
Subject: Retrieve User Profile


>
>
> This message is in MIME format. Since your mail reader does not
understand
> this format, some or all of this message may not be legible.
> --
> [ Picked text/plain from multipart/alternative ]
> Hello All -
>
> Situation:
> 1.  We have a lot of pre-start jobs running (power builder GUI's).
> 2.  When I do a WRKACTJOB, they all look the same, like this:
>    Subsystem/Job  User        Type  CPU %  Function        Status
>   QZDASOINIT   QUSER       PJ       .0                   DEQW
>   QZDASOINIT   QUSER       PJ       .0                   DEQW
>   QZDASOINIT   QUSER       PJ       .0                   MSGW
>   QZDASOINIT   QUSER       PJ       .0                   DEQW
>   QZDASOINIT   QUSER       PJ       .0                   DEQW
>   QZDASOINIT   QUSER       PJ       .0                   DEQW
> 3.  But they are actually different users.  You can see this
interactively
> by doing a 5 (Work with job), then 1 (Display job status attributes), and
> looking at the Current User Profile.
>
> 4.  I would like to do this in a CL and have the CL react differently to
> different user profiles, but I CANNOT FIGURE OUT HOW TO DO THIS...and
it's
> driving me crazy.
>
> Things I've tried:
> TAATOOL/CVTWRKACT    -   doesn't bring back the user profile, only the
> user...in this case QUSER.
> RTVJOBA - Only brings back attributes of the job the CL is running in.
>
> Please help.
>
> Brad McDaniel
> Programmer Analyst
> Annuity Board, SBC
> 214-720-6546
>
>
> _______________________________________________
> This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing
list
> To post a message email: MIDRANGE-L@midrange.com
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/cgi-bin/listinfo/midrange-l
> or email: MIDRANGE-L-request@midrange.com
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/midrange-l.
>

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







As an Amazon Associate we earn from qualifying purchases.

This thread ...


Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.