The  Display Command  Source  command  displays  or lists  the  command
source  for a  command.  If  the source  does not  exist for  a non-TAA
command,  a  prompt occurs  asking if  RTVCMDSRC should  be used  and a
display occurs  after retrieval.   If a  TAA command  is specified  and
the  user  is  authorized  to  the TAASRCACC  Authorization  List,  the
source in the TAA Archive is displayed.

A typical command would be:

              DSPCMDSRC CMD(xxx)

The  command source for the specified command  would be displayed if it
can be accessed using STRSEU in browse mode.

DSPCMDSRC escape messages you can monitor for
---------------------------------------------

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

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

   CMD           The  qualified  name  of  the  command  object.    The
                 library value defaults  to *LIBL.  A  specific library
                 or *CURLIB may also be used.

                 If  the  source  still exists  where  the  command was
                 created from, the  STRSEU command is  used to  display
                 (browse mode) or print the source.

                 If the  source does  not exist  for a non-TAA  command
                 (it  could  be  a  system  command), a  prompt  occurs
                 asking  if RTVCMDSRC  should be  used.   If requested,
                 the  command  source is  retrieved  to  the  TAATMPCMD
                 source  file  in  QTEMP  and displayed  using  STRSEU.
                 The   source   file   is   retained   when   DSPCMDSRC
                 completes.

                 If  a  TAA  command  is  specified  and  the  user  is
                 authorized to  the TAASRCACC  Authorization List,  the
                 display  occurs via the DSPTAA  command which displays
                 the source from the TAA Archive.

   OUTPUT        How to  output  the results.    * is  the  default  to
                 display the source interactively.

                 If  the command  is  entered  in  batch or  *PRINT  is
                 specified, a spooled file is output and retained.

                 The  RTVCMDSRC  and  DSPTAA  functions only  occur  if
                 DSPCMDSRC is used interactively.


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

The STRSEU command must exist on your system.

For  most commands, RTVCMDSRC  can be used  effectively.  However, some
system commands are specified in  such a manner as to prevent  its use.

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

The following TAA Tools must be on your system:

     CHKOBJ3         Check object 3
     RSNLSTMSG       Resend last message
     RTVCMDA         Retrieve command attributes
     RTVCMDSRC       Retrieve command source
     SNDCOMPMSG      Send completion message
     SNDESCINF       Send escape information
     SNDESCMSG       Send escape message
     SNDSTSMSG       Send status message
     TAAARC          TAA Archive

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

None, the tool is ready to use.

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

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

   DSPCMDSRC     *CMD                   TAACMFH       QATTCMD
   TAACMFHC      *PGM       CLP         TAACMFHC      QATTCL
   TAACMFHD      *FILE      DSPF        TAACMFHD      QATTDDS