I think it depends on what method IBM uses to produce the message. I do not think you can capture a TPUT message and suppress it.
Lizette > -----Original Message----- > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On > Behalf Of Hardee, Chuck > Sent: Friday, September 18, 2015 4:55 AM > To: IBM-MAIN@LISTSERV.UA.EDU > Subject: IPCS BLS18028I message suppression > > Hello Listers! > > Has anyone figured out how to suppress the BLS18028I message. > This is the message issued as a result of a FIND command when the object of the > FIND command was not found: > > "BLS18028I Argument not found, searched to end of FINDAREA" > > I am writing a REXX EXEC that issues various IPCS commands and I can suppress > and/or capture most of them and then spit back the ones I'm interested in and > handle the results of the others via the return code from the command. However, no > matter what combination of (NO)PRINT, (NO)TERMINAL, FLAG() and (NO)VERIFY I > try, none of them seem to work for me. > > For example, one would think, based upon the description of the FIND command and > the SETDEF operands discussion, that NOPRINT TERMINAL on the IPCS command > and then wrapping the IPCS command with an OUTTRAP("msg.") and > OUTTRAP("OFF") would allow the report to be clean and my REXX to know whether > or not I found something via the return code. > > It doesn't. The REXX is made aware of the success or failure of the FIND via the > return code, but when the FIND finds nothing, I always get the BLS18028I message. > > It's more frustrating than technical, but I'm trying to produce a custom report from > the dump and this message gets in the way of the report's information. > > Thanks for taking the time. > > Chuck > > Charles (Chuck) Hardee<mailto:chuck.har...@thermofisher.com> > Senior Systems Engineer/Database Administration EAS Information Technology > > Thermo Fisher Scientific > 300 Industry Drive | Pittsburgh, PA 15275 Phone +1 (724) 517-2633 | Mobile +1 (412) > 877-2809 | FAX: +1 (412) 490-9230 > chuck.har...@thermofisher.com<mailto:chuck.har...@thermofisher.com> | > www.thermofisher.com ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN