Re: Force ENDSBS and/or VARYOFF

[Buck Calabro/commsoft<mcalabro@xxxxxxxxxxxx>]

On 02/03/99 02:16:19 PM Kathreen Kruse  wrote:

>>I *think* if you do the ENDSBS first, the lines get freed up so you can
>>vary them off.  Do an RTVCFGSTS before you try the vary off to see if the
>>jobs are ended or not.
>
>       I know the problem is caused because there are unended jobs in the
>subsystems.  I was just (lazily) hoping there was a quick fix without
>having to write a new routine to locate and cancel the active jobs and
>end the printers.

ENDSBS *IMMED should kill all the jobs that are running in the subsystem, 
and ENDWTR *ALL should end all the printer jobs.  Al posted a program you 
can take a peek at to see how IBM quiesces the system to restricted state.  
Do a RTVCLSRC on QMNSAVE in QSYS...

Buck Calabro
CommSoft, Albany, NY
mailto:mcalabro@commsoft.net
+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---