Try the MOVE MEDIA command. It allows you to select readonly volumes the chose 
whether or not to eject them from the library.

eg MOVE MEDIA * STGP=* ACCESS=READONLY REMOVE=YES


Trevor

> -----Original Message-----
> From: Valeriano Bassi [mailto:Bassi AT SSB DOT IT]
> Sent: Tuesday,21 December 1999 2:58
> To: ADSM-L AT VM.MARIST DOT EDU
> Subject: ATL 3494 and read-only 3590
>
>
> Hi there,
> how can I automate the discarding ( and subsequent eject from
> the library ) of
> Read-only tapes?
> Today, I'm doing this manually; I mean, I'm usually doing:
> Q V ACC=READO
> MOVE DATA
> DEL V
> of the interested volume, that it is then ejected from ATL (
> via LI E MVS
> command).
> Is there anyone that does have anything to do this automatically?
> Server is 3.1.2.20 on OS/390 V2R6
>
> Thanks in advance, your help will be very appreciated.
> Best regards.
>
> Valeriano Bassi          bassi AT ssb DOT it
>