(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

Reply via email to