Re: CLP example of QSYLOBJA to change ownership

Jim Oberholtzer wrote:

Does anyone have an example of how to change the owner of all objects (in QSYS and in the IFS) using QSYLOBJA in a control language program? The system that has to have this code will not have the other compilers on it and I am not allowed to put any custom code that machine that would require them, hence the CLP example.

Jim:

I found an old test program from when I was trying to learn differences between the QSYS and IFS formats of the API. It is not significantly commented nor particularly highly developed, but it does more or less what you ask for. I'd expect it to be easily extendable for most things you might use it for.

If nothing else, it should give you a major start. It creates a *USRSPC, lists QSYS objects into the space, extracts the count, then lists IFS objects and extracts that count. It doesn't actually do anything with items listed; it could with a few more lines of code.

See:

http://code.midrange.com/32b5aff6d8.html

Hope it's good enough for basic illustration. I can't actually put time into much more.

Tom Liotta