RE: Break handling program

>How about setting up a routing entry ...

>  TFRCTL PGM(QCMD)

My only problem with that is you don't let other people use the same
hook. I would look to use the RRTJOB command instead and send the job
back through the routing process. The only caveat is that you'll either
have to use different routing data for your initial pass, or for your
subsequent pass.

-Walden
 


------------
Walden H Leverich III
President & CEO
Tech Software
(516) 627-3800 x11
WaldenL@xxxxxxxxxxxxxxx
http://www.TechSoftInc.com 

Quiquid latine dictum sit altum viditur.
(Whatever is said in Latin seems profound.)
 
-----Original Message-----
From: midrange-l-bounces+waldenl=techsoftinc.com@xxxxxxxxxxxx
[mailto:midrange-l-bounces+waldenl=techsoftinc.com@xxxxxxxxxxxx] On
Behalf Of Scott Klement
Sent: Friday, August 27, 2004 3:27 AM
To: Midrange Systems Technical Discussion
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.