Re: Another Query Manager Question

[Simon Coulter <shc@xxxxxxxxxxxxxxxxx>]

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  / \
--------------------------------------------------------------------