Re: Break handling program

[rob@xxxxxxxxx]

Would this break message then go to a program and not break into the users 
interactive job?  I've always HATED break messages. 

Rob Berendt
-- 
Group Dekko Services, LLC
Dept 01.073
PO Box 2000
Dock 108
6928N 400E
Kendallville, IN 46755
http://www.dekko.com





Scott Klement <midrange-l@xxxxxxxxxxxxxxxx> 
Sent by: midrange-l-bounces+rob=dekko.com@xxxxxxxxxxxx
08/27/2004 02:26 AM
Please respond to
Midrange Systems Technical Discussion <midrange-l@xxxxxxxxxxxx>


To
Midrange Systems Technical Discussion <midrange-l@xxxxxxxxxxxx>
cc

Fax to

Subject
Re: Break handling program







Hi,

> How might I have a new job run a command without changing the initial
> program?

How about setting up a routing entry to make the first program called be a
CL that changes the message queues?

Something like:

ADDRTGE SBSD(QINTER) SEQNBR(5) CMPVAL(QCMDI) PGM(MYLIB/MYPGM)

Then have MYLIB/MYPGM look something like this:

PGM

   CHGMSGQ MSGQ(*USRPRF) DLVRY(*BREAK) PGM(MYBRKPGM)
   TFRCTL PGM(QCMD)

ENDPGM


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