× 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.




On 05/06/2008, at 1:02 AM, Jerry Adams wrote:

Thanks, Simon. I should have been clearer as regards my objective, which is to be able to quickly review profile settings on a listing, rather than going through each profile individually. But, alas, 'tis not to be it seems.

Never occurred to me at the time that someone might want to print (or outfile) the QM profile information and I guess it hasn't occurred to anyone since then (12+ years) or perhaps there is no funding for such?

A DCR is your long-term option.

QM stores this information in the *INTPRF object associated with a *USRPRF. This is just an index (x'0ec4'). Dump the object and search for SQL4QM. You'll see a number of entries. You could use the Independent Index MI instructions to retrieve the information and output it in a format you can use. You will need to set system-state on your program to access the *INTPRF object.

:aside.
I wrote a PL/MI macro to handle the profile options. I called it HOOVER and you would call it with HOOVER(*SUCK usrprf options) to get entries from the profile and HOOVER(*BLOW usrprf options) to put entries in the profile. I had to change the name and the control values to something more innocuous--didn't make it past the overlords. Spoilt all my fun!
:easide.

Regards,
Simon Coulter.
--------------------------------------------------------------------
FlyByNight Software OS/400, i5/OS Technical Specialists

http://www.flybynight.com.au/
Phone: +61 2 6657 8251 Mobile: +61 0411 091 400 /"\
Fax: +61 2 6657 8251 \ /
X
ASCII Ribbon campaign against HTML E-Mail / \
--------------------------------------------------------------------




As an Amazon Associate we earn from qualifying purchases.

This thread ...

Follow-Ups:
Replies:

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.