The Retrieve  TAA  Tool Commands  retrieves a  list of  commands for  a
named  TAA Tool.   The  commands are  passed back  in a  large variable
which may then be used to perform other processing.

A typical series of commands would be:

             DCL           &CMDS *CHAR LEN(500)
              .
             RTVTOLCMD     TOOL(xxx) CMDS(&CMDS)

Any  commands that  are part of  the tool would  be passed  back in the
&CMDS variable  with each  command taking  10  bytes.   If no  commands
exist, the  command completes  normally.  If  the tool does  not exist,
TAA9893 is sent as an escape message.

The TAAARCAW file in TAATOOL is used to access the information.

RTVTOLCMD escape messages you can monitor for
---------------------------------------------

      TAA9893    The tool does not exist

Escape messages from based on functions will be re-sent.

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

   TOOL          The TAA Tool name.

   CMDS          The  return variable that  must be  specified as *CHAR
                 LEN(500).   Each  command  takes  10  bytes.    If  no
                 commands exist, the variable will be all blanks.

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

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

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

The following TAA Tools must be on your system:

     SNDESCINF       Send escape information
     SNDESCMSG       Send escape message

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

None, the tool is ready to use.

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

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

   RTVTOLCMD     *CMD                   TAATOML       QATTCMD
   TAATOMLC      *PGM       CLP         TAATOMLC      QATTCL
   TAATOMLR      *PGM       RPG         TAATOMLR      QATTRPG