Assuming that the environment is TSO, the OPERATOR(2) operand means do a WTO with routing code 2. My recollection is that the WTO always has the userid appended so the operator can tell where the message came from.
-- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 ________________________________________ From: IBM Mainframe Discussion List <[email protected]> on behalf of Lizette Koehler <[email protected]> Sent: Wednesday, October 10, 2018 5:44 PM To: [email protected] Subject: Re: REXX question So the first think is to run a trace. I like the command Trace I That will show what things look like before and after. Then if that does not help, and you have Serena Contract, I might contact them for assistance. With Chgman, you need to know REXX/CLIST/ISPF processing. Also when viewing this member - make sure you turn on HILITE for REXX. Enter HILTE on the command line Select option for REXX, then on the right side - 3 and / in the next two fields This may show what is a miss Lizette > -----Original Message----- > From: IBM Mainframe Discussion List <[email protected]> On Behalf Of > Lopez, Sharon > Sent: Wednesday, October 10, 2018 12:06 PM > To: [email protected] > Subject: Re: REXX question > > This is some of the code; I did not write it and I do not know how to code in > REXX. > > WHEN (SUBSYS = 'A') & ((APPID <> 'VI01') | (APPID <> 'VI02')) > THEN DO > "SEND 'CMNNEWCO F "CicsName",CEMT SET PROG("member")", > "PH' OPERATOR(2)" > END > > -----Original Message----- > From: IBM Mainframe Discussion List [mailto:[email protected]] On > Behalf Of Paul Gilmartin > Sent: Wednesday, October 10, 2018 2:48 PM > To: [email protected] > Subject: Re: REXX question > > On Wed, 10 Oct 2018 18:26:51 +0000, Lopez, Sharon wrote: > > >We have a CHANGEMAN REXX exec that issues this: > > > >+CMNNEWCO F PRODAORB,CEMT SET PROG(DPLDB2IR) PH > > > >but now it is appending the userid to the end: > > > >+CMNNEWCO F PRODAORB,CEMT SET PROG(DPLDB2IR) PH CMNBATCH > > > >Has anyone seen anything like this before? The REXX hasn't changed. > > > Is this terminal log? Or TRACE output? Can you post (some of) the Rexx > code? > > Are you quoting all your strings? Is SIGNAL ON NOVALUE in effect > (recommended). > > Do I see extreme abbreviations? It's easier for an outsider to read > unabbreviated. > > -- gil > > ---------------------------------------------------------------------- > For IBM-MAIN subscribe / signoff / archive access instructions, send email to > [email protected] with the message: INFO IBM-MAIN > > > The information in this transmission may contain proprietary and non-public > information of BB&T or its affiliates and may be subject to protection under > the law. The message is intended for the sole use of the individual or entity > to which it is addressed. If you are not the intended recipient, you are > notified that any use, distribution or copying of the message is strictly > prohibited. If you received this message in error, please delete the material > from your system without reading the content and notify the sender > immediately of the inadvertent transmission. > > ---------------------------------------------------------------------- > For IBM-MAIN subscribe / signoff / archive access instructions, send email to > [email protected] with the message: INFO IBM-MAIN ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
