SET(MESSAGE_FLAGS)

  Specifies the message flags for your process , according to the $PUTMSG
  system service, to include or suppress items of a message.

  Syntax

     SET (MESSAGE_FLAGS, integer)

  Parameters

     integer    A bit-encoded value for one of the message flags.  The value
                must be less than or equal to 15:

                Bit  Value    Meaning
                ------------------------------------------
                0    1        Include text of message.
                     0        Suppress text of message.

                1    1        Include message identifier.
                     0        Suppress message identifier.

                2    1        Include severity level.
                     0        Suppress severity level.

                3    1        Include facility name.
                     0        Suppress facility name.

  Comments

  If you do not set message flags, the default message flags for your
  process are used.  Setting the message flags to 0 does NOT turn off the
  message text.  It causes TPU to use the default message flags for your
  process.  To turn off all message text, use the DCL command SET MESSAGE.

  Examples

  1.  SET (MESSAGE_FLAGS, 2);

      Specifies that the message identifier is the only item to be included
      in a TPU message.  (Integer 2 sets bit 1.)

  2.  SET (MESSAGE_FLAGS, 5);

      Specifies that message text (bit 0=1) and the severity level (bit 2=4)
      are to be included in TPU messages.  (Integer 5 sets bits 2 and 0.)

  Related topics

     MESSAGE   SET(FACILITY_NAME)   SET(INFORMATIONAL)   SET(SUCCESS)