The  Print  Program  Attributes  command  prints  most  of  the  common
attributes for  programs.  A generic program name  or all programs in a
library may be printed.  Selection criteria is allowed.

Typical  uses of  this command  would be  to print the  exceptions that
you want  to see  rather than  all programs.   For  example, you  might
want a a printed listing to ensure that:

  **   All programs in a library have been optimized.

  **   All programs in a library have had observability removed.

  **   All CL programs prevent the retrieval of CL source.

A typical command to perform the latter test would be:

       PRTPGMA     PGM(xxxx/*ALL) ATTR(CLP) ALWRTVSRC(*YES)

A  listing  would  be printed  of  all  CL  programs in  the  specified
library  where  ALWRTVSRC(*YES)  was  specified  when  the  program was
created.

PRTPGMA is a slow running command and should be submitted to batch.

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

   PGM           The qualified name  of the program to  be printed.   A
                 generic  name may  be entered  or *ALL.   The  library
                 defaults  to *CURLIB.   *LIBL or *USRLIBL  may also be
                 specified.

   ATTR          The program  attribute  such as  CLP,  RPG etc.    The
                 default is *ANY.

   OWNER         The owner  of the program.   *ANY is  the default.   A
                 specific owner may be specified.

   OPTIMIZE      The  optimization   value.    The   default  is  *ANY.
                 *NOOPTIMIZE  and  *ALL  may  be  specified.    When  a
                 program   is   created,    the   default   value    is
                 *NOOPTIMIZE.   The  CHGPGM OPTIMIZE  parameter may  be
                 used to change the value.

   OBSERVE       Whether  observability has been removed.   The default
                 is *ANY.   *ALL or  *NONE may  be specified.   When  a
                 program is created,  the default is *ALL.   The CHGPGM
                 OBSERVE parameter may be used to change the value.

   USRPRF        Whether to  adopt the owners profile.   The default is
                 *ANY.   *USER or  *OWNER  may be  specified.   When  a
                 program is created,  the default is *USER.   The value
                 can  be  specified on  the  USRPRF  parameter of  most
                 CRTxxxPGM   commands   or   on   the   CHGPGM   USRPRF
                 parameter.

   USEADPAUT     Whether  to  use  adopted  authority  or  not.     The
                 default  is  *ANY.   *YES  or  *NO  may be  specified.
                 When  a program  is created, the  value is  *YES.  The
                 CHGPGM USEADPAUT parameter may  be used to change  the
                 value.

   LOGCLPGM      Whether to  log the commands from  a CL program.   The
                 default  is   *ANY.    *JOB,  *YES,   or  *NO  may  be
                 specified.    When  a  CL  program  is  created,   the
                 default is  *JOB.  The  CRTCLPGM LOG parameter  may be
                 used to set the value.

   ALWRTVSRC     Whether  to  allow the  retrieval  of  source from  CL
                 programs.   The default  is *ANY.  *YES  or *NO may be
                 specified.    When  a  CL  program   is  created,  the
                 default  is *YES.   The  CRTCLPGM ALWRTVSRC  parameter
                 may be used to set the value.

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

The CRTCLPGM values are only meaningful when printing CL programs.

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

The following TAA Tools must be on your system.

     CVTPGMA      Convert program attributes
     RTVSYSVAL3   Retrieve system value 3
     SNDCOMPMSG   Send completion message

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

None, the tool is ready to use.

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

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

   PRTPGMA       *CMD                       TAAPGMF       QATTCMD
   TAAPGMFC      *PGM           CLP         TAAPGMFC      QATTCL
   TAAPGMFR      *PGM           RPG         TAAPGMFR      QATTRPG