The Display  Source  Member command  is designed  for those  situations
where  you  need  to  display  a  source member,  but  the  Application
Development  Tools (includes STRSEU command) may  not be on the system.

The command  determines if  the STRSEU command  exists and  uses it  in
browse mode if  it does.  (The command is executed  using QCMDEXC).  If
STRSEU does not exist, DSPPFM is used.

DSPSRCMBR  may also be used as  a shorthand when you  want to force the
use of browse mode.

A typical command would be entered as:

      DSPSRCMBR    SRCFILE(yyy) MBR(xxx)

If DSPPFM is used,  the full source  record (sequence number and  date)
is  shown.   To  see just  the  source,  the user  can  window over  to
position 13.  (Enter W13 into the Control field).

If  MBR(*SELECT) is specified,  the sub  tool DSPSRCMBR2 is  used which
allows only display options.

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

   SRCFILE       The qualified  file  name of  the  source file.    The
                 library value defaults to *LIBL.

   SRCMBR        The  member  to  be  displayed.    The  special  value
                 *SELECT may  be used.  *SELECT  invokes the DSPSRCMBR2
                 tool   which  provides   a  list  of   members  to  be
                 selected, but  allows only  display and print  options
                 (change and delete are not provided).

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

None.

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

The following TAA Tools must be on your system:

           DSPSRCMBR2    Display source member 2
           SNDESCMSG     Send escape message

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

None, the tool is ready to use.

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

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

   DSPSRCMBR     *CMD                       TAASRCY       QATTCMD
   TAASRCYC      *PGM           CLP         TAASRCYC      QATTCL