STRIP is not allowed in NETVIEW REXX You can just do something like this: V = SUBSTR(MSGVAR(4),1,8) IF V = '*SP5145*' | V='*SP5146*' THEN R MSGVAR(1),NO EXIT EXIT
-----Original Message----- From: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> On Behalf Of Itschak Mugzach Sent: Monday, November 30, 2020 3:40 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Auto Reply on SDSF Console See SYS1.PARMLIB(AUTORxx) *| **Itschak Mugzach | Director | SecuriTeam Software **|** IronSphere Platform* *|* *Information Security Continuous Monitoring for Z/OS, zLinux and IBM I **| * *|* *Email**: i_mugz...@securiteam.co.il **|* *Mob**: +972 522 986404 **|* *Skype**: ItschakMugzach **|* *Web**: https://gcc02.safelinks.protection.outlook.com/?url=http%3A%2F%2Fwww.securiteam.co.il%2F&data=04%7C01%7Cebarkow%40doitt.nyc.gov%7C81c1ad985d0445fd8ddb08d8950ba0e8%7C73d61799c28440228d4154cc4f1929ef%7C0%7C0%7C637423224506873215%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C1000&sdata=2AQVh%2FozrTHV3zoGnFQrAux5punh39BwcagHjtpchog%3D&reserved=0 **|* On Mon, Nov 30, 2020 at 10:15 AM saurabh khandelwal < sourabhkhandelwal...@gmail.com> wrote: > Dear Group , > > > > We have requirement to automate below manual reply comes in console > every time, when we don’t find volume in our system and the standard > reply to these message is *Reply id, NO.* > > > 10.14.03 JOB09020 *29 *IEF455D* MOUNT *SP5145* ON 0FAA FOR CASPLPRO > SARBCH OR REPLY 'NO'l > > In this above message, whenever we get message id *IEF455D *on SDSF > console and on 4th place in this line, we get volume name* SP5145 or > SP5146 , SP5147, SP5149 *then immediately using automation we should > reply > > With* reply id, no.* > > > > In order to do this, we created > > > > IF MSGID = 'IEF455D' > THEN > > EXEC(CMD('AUTREXX')) NETLOG(Y) SYSLOG(Y); > > > > > > Then into *'AUTREXX'* REXX side, > > > > > > > > /* REXX */ > > trace r > > 'PIPE SAFE * | STEM MSG.' > > TOvolume = Word( Msg,4 ) > > MsgID = Word( Msg,1 ) > > MsgID1 = substr(MsgID,2,2) > > > > volume = 'SP5145 ' , > > 'SP5146 ' , > > 'SP5147 ' > > > > Do i = 1 to Words(volume) > > comp_vol = Word(volume,i) > > If Strip(comp_vol) = TOvolume Then > > > > But unable to complete this logic in to REXX. Can you please help in > building this REXX, which can help in replying on console once the > above mentioned criteria matches. > > > > *Regards* > > *Saurabh* > > ---------------------------------------------------------------------- > For IBM-MAIN subscribe / signoff / archive access instructions, send > email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN > ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN ________________________________ This e-mail, including any attachments, may be confidential, privileged or otherwise legally protected. It is intended only for the addressee. If you received this e-mail in error or from someone who was not authorized to send it to you, do not disseminate, copy or otherwise use this e-mail or its attachments. Please notify the sender immediately by reply e-mail and delete the e-mail from your system. ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
