The Compare Program  Attributes command compares the  various CRTxxxPGM
and  CHGPGM command parameters  of two  program objects.   The programs
must  be the  same type (such  as both RPG  types).  A  spooled file is
created of any differences.

The major attributes which are not compared are:

      - Owner
      - Authorizations
      - Text description
      - Create date and time
      - Source file and member name
      - Source data

A typical command would be:

             CMPPGM    FROMPGM(xxx) TOPGM(yyy)

A spooled file would be created with any differences shown.

An option exists to  send an escape message  if differences exist.   An
option exists to delete the spooled file if no differences exist.

Both programs  must be the  same type to  use CMPPGM.  For  example, if
the  FROMPGM is a  CL type, it cannot  be compared to  a TOPGM which is
an RPG type.  TAA9897 is sent if different types exist.

Most of  the  attributes  (but not  all)  are compared.    CMPPGM  uses
RTVPGMA and is limited to the attributes returned on RTVPGMA.

CMPPGM  escape messages you can monitor for
-------------------------------------------

      TAA9895    Differences exist (optional based on ESCAPE parm)
      TAA9897    Different types exist (such as CL vs RPG)

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

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

   FROMPGM       The  qualified  name   of  the  From  program   to  be
                 compared.    The  library  value  defaults  to  *LIBL.
                 *CURLIB may also be used.

   TOPGM         The qualified name of the  To program to be  compared.
                 The  default  is *FROMPGM  meaning  the  same  program
                 name as  in the FROMPGM parameter.   The library value
                 defaults  to blanks.  If no  name is entered, *LIBL is
                 assumed.  *CURLIB may also be used.

                 Both programs  must be  the same type.   For  example,
                 if  the FROMPGM  is  an  'RPG' type,  it  can only  be
                 compared to a TOPGM which is also an RPG type.

   CMPCRTDAT     A   *YES/*NO   parameter   for   whether  the   create
                 date/times of the two programs should be compared.

                 *NO is the default to bypass the compare.

                 *YES may  be specified  to cause  a compare.   If  the
                 program  was   saved  and  restored  to   a  different
                 library  (or  a different  program  name),  the create
                 date/time will be the same.   All other cases such  as
                 CRTDUPOBJ or  a second create  command will  produce a
                 difference in the create date/time values.

   ESCAPE        Whether  to  send  an  escape message  if  differences
                 exist.   The default  is *NO which  means a completion
                 message is sent.

                 *YES may be specified  to send TAA9895 if  differences
                 exist.

   DLTSPLF       Whether  to delete the  spooled file  if there  are no
                 differences.     The  default   is  *YES  meaning  the
                 spooled file is deleted  if no differences are  found.
                 The  spooled file  is always  retained if  differences
                 exist.

                 *NO  may be  specified to ensure  a spooled  file will
                 exist  regardless  of  whether  differences  exist  or
                 not.

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

Most  of the  attributes  (but  not all)  are  compared.   CMPPGM  uses
RTVPGMA and is limited to the attributes returned on RTVPGMA.

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

The following TAA Tools must be on your system:

     CHKOBJ3         Check object 3
     EDTVAR          Edit variable
     RTVPGMA         Retrieve program attributes
     RTVSYSVAL3      Retrieve system value 3
     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
   ------        ----    ---------      ----------    ----------

   CMPPGM        *CMD                   TAAPGNB       QATTCMD
   TAAPGNBC      *PGM       CLP         TAAPGNBC      QATTCL
   TAAPGNBR      *PGM       RPG         TAAPGNBR      QATTRPG