From: CSBVAX::MRGATE!info-vax-RELAY@KL.SRI.COM@SMTP 19-JUN-1988 05:35 To: ARISIA::EVERHART Subj: CTL$GB_MSGMASK Process Message Mask (was CLI$DCL_PARSE...) Received: from mitre-bedford.ARPA by KL.SRI.COM with TCP; Wed, 15 Jun 88 06:02:34 PDT Full-Name: Granoff Message-Id: <8806151302.AA18495@mitre-bedford.ARPA> Posted-From: The MITRE Corp., Bedford, MA To: info-vax@kl.sri.com Organization: The MITRE Corporation, Bedford, Mass. Phone: (617) 271-7506 Subject: CTL$GB_MSGMASK Process Message Mask (was CLI$DCL_PARSE...) Date: Wed, 15 Jun 88 09:02:27 EDT From: Mark H. Granoff 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. | +--------------------------------------------------------------------+