Re: retrieve service program list of procedures

vhamberg@xxxxxxxxxxx wrote:

I would not use the QUSRTVUS program - I'd use pointers. First, have a DS for

the generic header - based on a pointer, which will be the address of the user
space - there is an API to get that address (Retrieve Pointer to User Space
(QUSPTRUS)). Have a DS defined to match the MODL0100 format - there should be
one in QSYSINC/QRPGLESRC that you can model after - and base it on a pointer.
Set the entry pointer to the address of the user space you retrieved, plus the
offset to the list as found in the generic header.

Thanks for the clarification on that point Vern. It's been a while
since I've used the user space APIs, and I forgot that QUSPTRUS was the
way to get a pointer to the user space, rather than QUSRTVUS. I'll have
to look in to QUSRTVUS so that I have an idea about this alternate
method of accessing user spaces.
--
This is the RPG programming on the AS400 / iSeries (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.