The Duplicate  Display File and  Source command  allows a Display  File
object and its source to be duplicated from one library to another.

A typical command would be:

            DUPDSPFSRC    FILE(ABC) TOLIB(LIB2)

The  command would  determine the  source member  used for  the Display
File  ABC and  then duplicate the  file to LIB2.   The  source used for
the Display  File would  be  copied to  the same  name  source file  in
LIB2.

A REPLACE option  exists to determine what should  occur if the Display
File  or source already exists.   The default  is REPLACE(*NO) in which
case neither the Display file nor  the source member must exist in  the
To library.

The To  source file  must always  exist in  the To  library.   The user
must   be  properly   authorized  to   the   objects  to   perform  the
duplication.

For most typical  error conditions, duplication  will not be  attempted
and DUPDSPFSRC will end with an appropriate escape message.

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

   FILE          The qualified name  of the Display File.   The library
                 value defaults  to *LIBL.   *CURLIB may also  be used.

   TOLIB         The  library where  the object will  be duplicated to.

   TOSRCF        The source  file to be  copied to  in the To  library.
                 The  default  is  *FROMSRCF.   The  source  file  must
                 exist in the To library.

   REPLACE       Whether  the   existing  object  and  source  will  be
                 replaced.   The default  is *NO  meaning that  neither
                 can exist before any duplication is attempted.

                 *YES  may  be  specified  in   which  case  either  or
                 neither  may  exist.    If  either  exists,  they  are
                 removed before duplication occurs.

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

None.

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

The following TAA Tools must be on your system:

     SNDCOMPMSG      Send completion message
     SNDESCMSG       Send escape message

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

None, the tool is ready to use.

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

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

   DUPDSPFSRC    *CMD                   TAADSPG       QATTCMD
   TAADSPGC      *PGM       CLP         TAADSPGC      QATTCL