Sorry Gil, missed your subject change, agree it is a good idea to be specific.
Makes searching the archives better..
Doug

On Oct 10, 2018, at 15:22, Paul Gilmartin 
<[email protected]> wrote:

(Subject: made more specific.  Always a good idea.)

> On Wed, 10 Oct 2018 19:06:29 +0000, Lopez, Sharon wrote:
> 
> 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
> 
Thanks.

Is the command environment "TSO"?  I'm not very good at TSO.  Since
"... OPERATOR (2)" is quoted that will be issued literally (to TSO?)
This isn't specifically a Rexx question.  Something must have changed in
how TSO elaborates "OPERATOR(2)".

> -----Original Message-----
>> On Wed, 10 Oct 2018 12: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

-- gil

----------------------------------------------------------------------
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

Reply via email to