TAA Tools
CPYGENSRC       COPY GENERIC SOURCE                    TAASRCT

The Copy Generic  Source command copies  all of the source  members for
a  specified  generic name.    Either a  single  source file,  standard
source  files (e.g.   QCMDSRC),  all source  files, or the  QATT source
files may be specified.

A typical command would be entered as:

        CPYGENSRC   GENNAME(PAYX) FROMSRCF(*STD)
                      FROMLIB(xxxx) TOLIB(yyyy)

All of  the  members  beginning with  PAYX  would  be copied  from  the
standard source  files (QCMDSRC,  QCLSRC etc.) in  library xxxx  to the
same named  files in yyyy.  No * need  be entered for the generic name.

An option also exists to remove  the members that were copied from  the
FROMLIB.

If SRCFILE(*QATT)  is used,  you must  know the Tool  ID to  specify as
the generic  name.  The Tool ID can be  determined using DSPTAA and the
name in the upper right  hand corner of the  first page.  For  example,
the Tool ID for this tool is TAASRCT.

CPYGENSRC does  not operate  against the  TAA Archive.   You must  have
the source in normal source files to use CPYGENSRC.

All source  files in the  From library with  members to be  copied must
exist  in  the To  library.   Generic  members  need not  exist  in all
files.  If no members are copied from any file, an error occurs.

*USE authority  is required  to  the From  File.   *OBJMGT and  *CHANGE
authority are required to the To file.

If  copying  from  *STD to  *QATT  or  from  *QATT  to *STD,  only  the
standard file names:

          QCMDSRC     QATTCMD
          QCLSRC      QATTCL
          QDDSSRC     QATTDDS
          QRPGSRC     QATTRPG

are considered.

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

   GENNAME       The  generic name  of the  member to  be printed.   If
                 the value does  not contain an *  at the end,  generic
                 is  assumed.     Note   that  you   cannot  print   an
                 individual member (Use CPYSRCF directly).

   FROMSRCF      The  From  source file  to  be  used.   If  a  name is
                 entered, only that source file will be searched.

                 *ALL may be entered  to mean all  source files in  the
                 library.

                 *STD  may  be  specified to  mean  the  standard  file
                 names  associated   with  source  types  described  in
                 system   help   text.     See   the   discussion  with
                 RTVSRCTYP.

                 *SRC1, *SRC2,  and *SRC3 mean  that a  data area  must
                 exist on  the library list by  the corresponding names
                 of  SRCLST1, SRCLST2, and  SRCLST3.   These data areas
                 must contain  the  name  of  the source  files  to  be
                 checked.  Only  source files that exist  and match one
                 of  those  found in  the  data area  will  be checked.
                 See the discussion with the CRTSRCFLST tool.

                 *QATT or *QATT2 may be  specified to mean those  files
                 used  by  the   TAA  Productivity  Tools.     See  the
                 PRTQATTF tool for a detail description.

                 The  *QATT  values  only  work against  normal  source
                 files and not the TAA Archive.

                 If   generic   members   exist  to   be   copied,  the
                 corresponding To  file must exist  in the To  library.

   FROMLIB       The  library  to  be  copied  from.   The  default  is
                 *LIBL.    *LIBL  may not  be  specified  if  a special
                 value is used for the FROMSRCF parameter.

   TOSRCF        The To  source  file  to  be used.    The  default  is
                 *FROMSRCF.   If a  name is  entered, only that  source
                 file will be used.

                 The  special  value *STD  exists  to  allow conversion
                 from *QATT to  *STD for  4 files.   The special  value
                 *QATT exists  to allow conversion  from *STD  to *QATT
                 for  4  files.   See  the  previous documentation  for
                 further description.

   TOLIB         The  library to be  copied to.   The default is *LIBL.
                 Both library  values cannot  be  the same.   At  least
                 one  of  the  parameters  must  be  a  specific  name.
                 *LIBL  may not be used if a  special value is used for
                 FROMSRCF.

   RMVFROMMBR    A *YES/*NO parameter that defaults  to *NO.  *YES  may
                 be entered  to remove  the members  which were  copied
                 from the FROMLIB.

   CHGTEXT       A  *YES/*NO parameter that  defaults to  *NO.  CPYSRCF
                 is  used  to  copy  the  source.    If  the  To-member
                 already exists,  CPYSRCF does not  change the  text of
                 the  existing  member.    If  *YES is  specified,  the
                 To-member  text  will  be changed  to  agree  with the
                 From-member.

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

A library may not have more than 999 source files.

A source file may not have more than 900 members.

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

The following TAA Tools must be on your system.

     CHKGENERC    Check generic
     CHKOBJ3      Check object 3
     EDTVAR       Edit variable
     RTVLIBSRCF   Retrieve library source file
     RTVMBRLST    Retrieve member list
     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
   ------        ----        ---------      ----------    ----------

   CPYGENSRC     *CMD                       TAASRCT       QATTCMD
   TAASRCTC      *PGM           CLP         TAASRCTC      QATTCL
					

Added to TAA Productivity tools April 1, 1995


Home Page Up to Top