Path: utzoo!utgpu!water!watmath!clyde!att!osu-cis!tut.cis.ohio-state.edu!bloom-beacon!husc6!bbn!uwmcsd1!ig!agate!ucbvax!MITRE-BEDFORD.ARPA!mhg
From: mhg@MITRE-BEDFORD.ARPA (Mark H. Granoff)
Newsgroups: comp.os.vms
Subject: CTL$GB_MSGMASK Process Message Mask (was CLI$DCL_PARSE...)
Message-ID: <8806151302.AA18495@mitre-bedford.ARPA>
Date: 15 Jun 88 13:02:27 GMT
Sender: daemon@ucbvax.BERKELEY.EDU
Organization: The MITRE Corporation, Bedford, Mass.
Lines: 38

Recently I posted a message about surpressing the error output from
CLI$DCL_PARSE.  I mentioned that if a SET MESS/NOFAC/NO... command is
issued before running the program, the error output does not display.

I did get a response from Mike Marques; he suggested using
LIB$ESTABLISH to set up a condition handler that does nothing.  A good
idea in theory, but the manual recommends not using this service in
high level languages (like BASIC) that already have condition handlers
set up.  I am using BASIC (stop laughing), and being curious, I tried
it out.  My results were something less than successful.  A condition
handler is overkill for my application anyway.

I did a little poking around in my "new and improved" Version 4.4
VAX/VMS Internals book ($75 from DEC, order #EY-8264E-DP) and found a
symbol for the process message mask.  The symbol, CTL$GB_MSGMASK, is a
byte and definately is affected if a SET MESSAGE command is issued.
So, I have two questions:

     1. Which bits in this byte represent which MESSAGE parts (i.e.
     facility, severity, ident, text).

     2. How can I easily access/modify this mask.  Code examples are
     always welcome, even MACRO-32. :-)  Any other relevant tidbits of
     information on this topic are also welcome.

Thanks in advance for any help.

+--------------------------------------------------------------------+
| Mark H. Granoff                      Member of the Technical Staff |
+--------------------------------------------------------------------+
| USMAIL: The MITRE Corporation  | ARPAnet: mhg @ mitre-bedford.ARPA |
|         Burlington Rd.         | UUCP   : linus!mbunix!mhg         |
|         M/S B015               |-----------------------------------|
|         Bedford, MA 01730      | A T & T: (617) 271 - 7506         |
+--------------------------- Disclaimer -----------------------------+ 
|   The views expressed herein are my own and do not necessarily     |
|                    reflect those of my employer.                   |
+--------------------------------------------------------------------+