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

[Mark S Waterbury <mark.s.waterbury@xxxxxxxxxxxxx>]

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/