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

Reply via email to