Re: View/print authorities of all objects in a library

Obviously, the program needs to be run by a user profile which has
sufficient authority to the library and all of the objects contained in the
library being examined...

;-)

-sjl


"Mark S Waterbury" wrote in message
news:mailman.1507.1386282055.2717.midrange-l@xxxxxxxxxxxx...

Hi, Steve:

Oops -- nice catch! :-)

Mark

On 12/5/2013 5:12 PM, TheBorg wrote:
Mark/Paul:

There is no *ALL option for the object name parm on DSPOBJAUT;

Here is a sample program:

PGM PARM(&LIBRARY)
DCL VAR(&LIBRARY) TYPE(*CHAR) LEN(10)
DCLF FILE(QADSPOBJ)

DSPOBJD OBJ(&LIBRARY/*ALL) OBJTYPE(*ALL) +
OUTPUT(*OUTFILE) OUTFILE(QTEMP/QADSPOBJ)

OVRDBF FILE(QADSPOBJ) TOFILE(QTEMP/QADSPOBJ)

LOOP: RCVF
MONMSG MSGID(CPF0864) EXEC(DO)
GOTO CMDLBL(ENDPGM)
ENDDO


DSPOBJAUT OBJ(&ODLBNM/&ODOBNM) OBJTYPE(&ODOBTP) +
OUTPUT(*OUTFILE) OUTFILE(QTEMP/OBJAUT) +
OUTMBR(*FIRST *ADD) AUTTYPE(*OBJECT)

GOTO CMDLBL(LOOP)

ENDPGM: ENDPGM






"Mark S Waterbury" wrote in message
news:mailman.1501.1386280625.2717.midrange-l@xxxxxxxxxxxx...

Hi, Paul:

How about:
DSPOBJAUT OBJ(library/*ALL) OBJTYPE(*ALL) OUTPUT(*OUTFILE)
OUTFILE(QTEMP/DSPOBJAUT)

Then "roll your own" reports using that database, using Query/400, or
SQL, etc.?

Does that help?

Mark S. Waterbury

On 12/5/2013 4:49 PM, Steinmetz, Paul wrote:
Is there a command or tool that will allow you to view/print authorities
of all objects in a library.
Optionally, omitting the owner, and possibly selecting only public.

Thank You
_____
Paul Steinmetz
IBM i Systems Administrator

Pencor Services, Inc.
462 Delaware Ave
Palmerton Pa 18071

610-826-9117 work
610-826-9188 fax
610-349-0913 cell
610-377-6012 home

psteinmetz@xxxxxxxxxx
http://www.pencor.com/