Thanks Roger. I'd actually just discovered for myself that I could see the information I need in the DMPOBJ spooled file, but thanks for taking the trouble to reply.


"CRPence" <CRPbottle@xxxxxxxxx> wrote in message news:mailman.1975.1331319132.14575.midrange-l@xxxxxxxxxxxx...
Whenever [and ever so seldom] I wanted to look at those values, I would just collect a DMPOBJ of the object, display the QPSRVDMP spool file, then position to [with F16=Find] the '.SERVICE-' portion of the OIR DATA. At offset 000080 is the LODID and offset x/84 is the product OPTION.

Never had a need to get them from an API [and only rarely had the need via the internal OS system programming interfaces] so never looked elsewhere to see if there was an equivalent /key/ request for those attributes from a /retrieve/ feature to correlate to the /change/ API. I recall discussions long ago on the MI email list, about accessing the OIR Space and index of the library object... if that were necessary; of course those should all be system domain objects.

Regards, Chuck

On 09-Mar-2012 08:57 , Peter Clifford wrote:
I would like to be able to retrieve the product option load ID and
product option ID attributes of an object.

I can use the Change Object Description (QLICOBJD) API to change
these object attributes:

Key Type Field
12 CHAR(4) Product option load ID
13 CHAR(4) Product option ID

But so far I've not found an API which will allow me to retrieve
these attributes for an object. I can't see this information in any
format returned by Retrieve Object Description (QUSROBJD) API or List
Objects (QUSLOBJ) API.

The Retrieve Product Information (QSZRTVPR) API will tell me what
objects belong to which product options and loads, but that doesn't
seem to give me exactly what I need. I think it tells me which
objects the product load *PRDLOD object should be associated with the
product load, which is not quite the same thing.

Any MI-savvy people out there know if there might be an MI
instruction that would give me these?

This thread ...

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

This mailing list archive is Copyright 1997-2020 by 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].