The Compare  Source  4 command  is a  front  end to  CMPSRC2.   CMPSRC2
compares  one, generic,  or all  members in  a  source file  to another
source  file.   CMPSRC4  allows all  source  files (or  standard source
files) to be compared from one library to another library.

A typical command would be:

             CMPSRC4  FROMFILE(*ALL) FROMLIB(xxx) TOLIB(yyy)

All members in the source  files in the From library would  be compared
to the corresponding file/member in the To library.

A single  member or  a generic  member name may  also be  compared from
all source files.

Diagnostic messages are sent for such errors as:

  **   The  corresponding   source  file  does  not  exist  in  the  To
       library.

  **   The corresponding  member  does  not  exist in  the  To  library
       source file.

  **   Corresponding members do not compare.

An escape message will occur if any errors are found.

CMPSRC4 escape messages you can monitor for
-------------------------------------------

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

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

   FROMFILE      The From  file to be compared.   One of  the following
                 special values must be specified:

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

                 *STD may  be  specified  to  mean  the  standard  file
                 names  associated  with  source   types  described  in
                 system  help text such  as QCLSRC,  QRPGSRC, etc.   If
                 one  of the  standard source  files does  not exist in
                 the  From   library,  no  error   occurs.    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 in  the From
                 library 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.

   FROMLIB       The  library  where  the  source  files  exist  to  be
                 compared from.

   TOLIB         The  library  where  the  source  files  exist  to  be
                 compared to.

   FROMMBR       The default is *ALL for all members in each file.

                 A specific member name or  a generic name may also  be
                 entered.

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

A maximum of 999 source files may exist in the From library.

QTEMP may not be named as the FROM or TO library.

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

The following TAA Tools must be on your system:

     CHKGENERC       Check generic
     CHKOBJ3         Check object 3
     CMPSRC2         Compare source 2
     EDTVAR          Edit variable
     RSNLSTMSG       Resend last message
     RTVLIBSRCF      Retrieve library source files
     RTVMBRLST       Retrieve member list
     SNDCOMPMSG      Send completion message
     SNDDIAGMSG      Send diagnostic message
     SNDESCINF       Send escape information
     SNDESCMSG       Send escape message

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

None, the tool is ready to use.

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

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

   CMPSRC4       *CMD                   TAASREZ       QATTCMD
   TAASREZC      *PGM       CLP         TAASREZC      QATTCL