I was able to get it to work using the provided sample code, slightly
modified definitions and the provided instructions. It helps if you know
COBOL.
Ernest Roberts
IT - Sr Sys Prog
MBUSA, LLC
----- Forwarded by Ernest Roberts/171/DCAG/DCX on 02/11/2004 04:59 PM -----
"Awerbuch, David"
<[EMAIL PROTECTED] To: [EMAIL PROTECTED]
ERICAS.COM> cc:
Sent by: MQSeries Subject: Re: Batch Trigger Monitor
List
<[EMAIL PROTECTED]
C.AT>
02/11/2004 02:55 PM
Please respond to
MQSeries List
Bruce,
With respect to your question, I don't feel I know you well enough to say
whether or not you probably are hallucinating, so that might be a topic for
another discussion ....
As to your statement, Mainframe week provides this sample:
http://www.mainframeweek.com/code/showcode.php/0002/mw02mq1.txt
I hope this helps you.
Dave A.
P.S. I will not be out of the office tomorrow! Make The Magic Happen!
========================================================================
Modifying and setting up a batch trigger monitor
Batch Trigger Monitor PROC
// PROC
//*
//**********************************************************************
//* REVISION:TSSPEEG # 0001 04 JUNE 1998 (NEW PROC) *
//**********************************************************************
//* IBM MQSeries for MVS/ESA *
//* STARTED TASK PROCEDURE FOR THE BATCH TRIGGER MONITOR *
//**********************************************************************
//*
//PROCSTEP EXEC PGM=MQMMON,
// PARM='MCP1,BATCH.MONITOR.INITQ'
//STEPLIB DD DISP=SHR,DSN=SYSMQS.SUPA.LOAD
// DD DISP=SHR,DSN=SYSMQS.MCP1.AUTH
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
- MQSeries definitions
DEFINE NOREPLACE
QLOCAL('BATCH.MONITOR.INITQ')
STGCLASS('SYSTEM')
DESCR('Batch Trigger Monitor Initiation Queue')
PUT(ENABLED)
DEFPRTY(5)
DEFPSIST(NO)
MAXDEPTH(100)
PROCESS(' ')
NOTRIGGER
MAXMSGL(1000)
BOTHRESH(0)
BOQNAME(' ')
INITQ(' ')
USAGE(NORMAL)
SHARE
DEFSOPT(EXCL)
MSGDLVSQ(FIFO)
RETINTVL(999999999)
TRIGTYPE(NONE)
TRIGDPTH(1)
TRIGMPRI(0)
TRIGDATA(' ')
NOHARDENBO
GET(ENABLED)
QDEPTHHI(80)
QDEPTHLO(40)
QDPMAXEV(ENABLED)
QDPHIEV(DISABLED)
QDPLOEV(DISABLED)
QSVCINT(999999999)
QSVCIEV(NONE)
DEFINE NOREPLACE
PROCESS('BATCH.MONITOR.PROC')
DESCR('Process for starting Scheduled Batch Production Jobs')
APPLTYPE('MVS')
APPLICID(' ')
USERDATA(' ')
ENVRDATA(' ')
Scott Morningstar
Computer Systems Officer
CN (Canada) c Xephon
******************* Mainframe Week ********************
This code is derived from Mainframe Week, a free technical
journal for mainframe professionals, published on-line.
http://www.mainframeweek.com
***************************************************************
-----Original Message-----
From: Bruce Baxter [mailto:[EMAIL PROTECTED]
Sent: Wednesday, February 11, 2004 2:21 PM
To: [EMAIL PROTECTED]
Subject: Batch Trigger Monitor
I remember reading somehwhere (I think) that there was a sample or some
sort of paper from IBM that documented how to do a batch trigger monitor
for MQ Series. I can't find anything on the support site for MQ. Am I
hallucinating?
Instructions for managing your mailing list subscription are provided in
the Listserv General Users Guide available at http://www.lsoft.com
Archive: http://vm.akh-wien.ac.at/MQSeries.archive
*** Credit Lyonnais ****************************************************
This e-mail contains confidential information or information
belonging to Credit Lyonnais and is intended solely for the
addressees. The unauthorized disclosure, use, dissemination
or copying (either whole or partial) of this e-mail, or any information
it contains, is prohibited. E-mails are susceptible to alteration and
their integrity cannot be guaranteed. Credit Lyonnais shall not
be liable for this e-mail if modified or falsified. If you are not the
intended recipient of this e-mail, please delete it immediately
from your system and notify the sender of the wrong delivery
and the mail deletion.
Credit Lyonnais in the Americas:
Credit Lyonnais Bank New York Branch,
Credit Lyonnais Americas Services Inc.,
Credit Lyonnais Rouse (USA) Ltd., and
Credit Lyonnais Securities (USA) Inc.
*** Credit Lyonnais ****************************************************
Instructions for managing your mailing list subscription are provided in
the Listserv General Users Guide available at http://www.lsoft.com
Archive: http://vm.akh-wien.ac.at/MQSeries.archive
Instructions for managing your mailing list subscription are provided in
the Listserv General Users Guide available at http://www.lsoft.com
Archive: http://vm.akh-wien.ac.at/MQSeries.archive
