Re: deleting QPADEV* devices

(assuming you have a pretty vanilla system...)

there are objects (msgq and pgm and possibly outq).

don't do the pgm - they belong to ibm

I prefer a dltdevd, preceded by vrycfg *off - and monmsg for each or a
monitor cpf0000 - the dltdevd should also remove the msgq

any in use should fail the vrycfg - so skip that device..

You have not set security to stop new QPADEV devices from being created???
(this is not uncommon -

Jim Franz





On Tue, Mar 18, 2025 at 2:36 PM Steve McKay <samckay1@xxxxxxxxx> wrote:

No danger but your CL will probably failed if it runs into a QPADEV device
that IS varied on.

Thanks,

Steve McKay
(205) 585-8424
samckay1@xxxxxxxxx



On Tue, Mar 18, 2025 at 1:30 PM Jerry Draper <midrangel@xxxxxxxxxxxxx>
wrote:

We have thousands of QPADEVnnnn devices varied off.

Any danger in doing this?

Jerry

/* Loop thru list of *devd objects ODLBNM, ODOBNM, ODOBTP */

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

IF (%SST(&ODOBNM 1 6) *EQ 'QPADEV') THEN(DO)

SNDMSG MSG(&ODOBNM) TOUSR(JDRAPER)

/* DLTOBJ OBJ(&ODLBNM/&ODOBNM) OBJTYPE(*DEVD) */

ENDDO

/* Loop until end of file */

GOTO CMDLBL(LOOP)


--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing

list

To post a message email: MIDRANGE-L@xxxxxxxxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives
at https://archive.midrange.com/midrange-l.

Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription related
questions.

--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
To post a message email: MIDRANGE-L@xxxxxxxxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives
at https://archive.midrange.com/midrange-l.

Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription related
questions.