The Retrieve Message  Type Description command retrieves  a description
of the  2 digit codes  provided by the  RCVMSG RTNTYPE parameter.   The
MSGTYPE value required by SNDPGMMSG may also be retrieved.

A typical set of commands would be:

             DCL           &MSGTYPE *CHAR LEN(2)
             DCL           &MSGTYPD *CHAR LEN(40)
              .
             RCVMSG        ... RTNTYPE(&MSGTYPE)
             RTVMSGTYPD    MSGTYPE(&MSGTYPE) &MSGTYPD(&MSGTYPD)

The   &MSGTYPD   variable   would  contain   a   description   such  as
'Completion'

Only lower case English is supported.

Command parameters                                    *CMD
------------------

   MSGTYPE       The two  digit  value  returned by  a  RCVMSG  RTNTYPE
                 parameter.   Only the valid values  returned by RCVMSG
                 may be used.

   MSGTYPD       The  description of the  message type  returned.  This
                 is an optional return variable.   If used, it must  be
                 declared as *CHAR LEN(40).

   SNDTYP        The message  type (MSGTYPE)  required by  SNDPGMMSG is
                 returned.    For  example,  an  02  type  will  return
                 *DIAG.  Not  all message  types that  can be  received
                 are valid for SNDPGMMSG.   If the message type  is not
                 valid  on SNDPGMMSG,  blanks will  be returned.   This
                 is  an optional return variable.   If used, it must be
                 declared as *CHAR LEN(7).

Restrictions
------------

Because the command  returns a variable,  it may only  be used in  a CL
program.

Only lower case English is supported.

Prerequisites
-------------

The following TAA Tools must be on your system:

     SNDESCMSG       Send escape message

Implementation
--------------

None, the tool is ready to use.

Objects used by the tool
------------------------

   Object        Type    Attribute      Src member    Src file
   ------        ----    ---------      ----------    ----------

   RTVMSGTYPD    *CMD                   TAAMSHN       QATTCMD
   TAAMSHNC      *PGM       CLP         TAAMSHNC      QATTCL