Another thought, is the batch jobname that runs the REXX CMNBATCH? Just looking for hints.. Doug
On Oct 10, 2018, at 20:26, Doug Shupe <[email protected]> wrote: Just a guess, the REXX issues a SEND to the Operator(2) (the default from the send command), next you will need to check if some automation product pulls in the console message and then issues the REAL modify command to do the new copy. Sounds to me like something changed in the parsing of the message that was sent to the console . Possibly, you might get lucky and find a automaton rule named CMNNEWCO.. Doug On Oct 10, 2018, at 18:05, Seymour J Metz <[email protected]> wrote: 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 ---------------------------------------------------------------------- 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
