Re: Force ENDSBS and/or VARYOFF

["Al Barsa, Jr." <barsa2@xxxxxxx>]

At 05:52 PM 2/2/99 -0500, you wrote:
>Hi, Kathreen:
>
>>My problem is, if I use MONMSG to capture the messages generated if the
>>subsystem can't end or if the vary fails, it just skips to the next
>>line.  What I really want to do is auto-answer the message with a "G" to
>>force the end/vary.
>>
>>I don't want to change the system reply list because of the inherent
>>dangers there.
>
>If you gain ownership of QSYSOPR message queue, you should be able to respond
>to those messages programatically.  There's a bit of setup in that, though.
>What message(s) are you trying to avoid?  Perhaps an ENDJOB or some such
>would do what you want?  Is it a timing issue maybe?
>
>
Capturing QSYSOPR will work, although may be problematical.  There is a
good example of coding for achieving a restricted state in the program
QMNSAVE in QSYS.  The program is done in CL, and is retrievable.  Caution:
This is not CL 101, it is a heavy program, but it shows excellent coding
technique.

Al




+--------------------------------------------------+
| Please do not send private mail to this address. |
| Private mail should go to barsa@ibm.net.         |
+--------------------------------------------------+

Al Barsa, Jr. - Account for Midrange-L
Barsa Consulting, LLC.  
400 > 390

Phone:  914-251-1234
Fax:    914-251-9406
http://www.barsaconsulting.com
http://www.taatool.com

+---
| 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
+---