Re: Deleting client access 'auto-created' display devices.

[Luis Rodriguez <luisro58@xxxxxxxxx>]

John,

Well, if you can be sure that you one to delete all your varied off QPADEV*
entries, you could write a small CL program that process a file with all
your QPADEV devices and try to delete them. Those that are active get
a CPF2616 error message. Something like this:

DSPOBJD OBJ(QPADEV*)
        OBJTYPE(*DEVD)
        OUTPUT(*OUTFILE)
        OUTFILE(QTEMP/LISTQPADEV)

(CL)
PGM
   DCLF  QTEMP/LISTQPADEV

LOOP:  RCVF
            MONMSG CPF0864 EXEC(GOTO EOJ)
            DLTDEVD &ODOBNM
            MONMSG CPF2616
            GOTO LOOP
EOJ:    ENDPGM


This is from memory, as we did this some years ago with a "cleanup" of a
customer's system. As always, please make sure your backups are up to date
before any mass delete of objects :-)

HTH,

Luis Rodriguez
IBM Certified Systems Expert — eServer i5 iSeries
--



On Fri, Dec 17, 2010 at 12:47 PM, John Rusling <jrusling@xxxxxxxxxxxxxxxxxxx
> wrote:

> When our sys admin does the following command
>
> WRKCFGSTS *DEV IS*
>
> she sees a bunch of devices and she would like to
> delete the ones with a status of 'VARIED OFF'.
>
> In order to keep things cleaned up.
>
> Is there an easy way to do this?
> (other than by hand, ie taking option 8 then option 4)
>
> tiafah,
>
> John B
> --
> This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
> To post a message email: MIDRANGE-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/midrange-l
> or email: MIDRANGE-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/midrange-l.