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

Powered by AS/400Powered by AS/400 Last modified on July 15, 2010 © 1995, 2010 - Jim Sloan, Inc.