The  Send Program  Information  command is  an  auditing function  that
places messages in the job log about a program.

For  example, assume  you want to  send a  message to  the the  job log
about the current CL program that is running.  You would specify:

            SNDPGMINF

The  default  is PGM(*CURRENT).   The  messages placed  in the  job log
would be:

    Pgm-XXX  Lib-YYY  Type-CLP  Created on 095/11/16 at 12:22:45
       Src file-QCLSRC  Lib-WWW        Mbr-XXX
         Member change date in the program 095/11/16 at 12:22:11
         Current source member change date 095/11/16 at 12:22:11

The messages  are sent  to the current  programs message  queue.   This
allows  you  to  clear  the  message queue  if  the  program  completes
normally.

You  can optionally specify a program name  such as the program you are
about to call or the previous program.

If the user is  not authorized to the  program or the source,  messages
are sent and the command completes normally.

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

   PGM           The  qualified  file  name  of  the  program  to  send
                 messages  about.  The default  is *CURRENT meaning the
                 program that  is running.   *CALLING  may be  used  to
                 mean  the program  that  called  the program  that  is
                 running.   When either  *CURRENT or *CALLING  is used,
                 the program must exist on the library list.

A  specific program may also  be specified such as  the program you are
about to call.

                 The library  value  defaults to  *LIBL.   *CURLIB  may
                 also be specified.

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

If  *CALLING  or *CURRENT  are  used, the  program  must  exist on  the
library list.

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

The following TAA Tools must be on your system:

     RTVPGMSTK       Retrieve program stack
     SNDDIAGMSG      Send diagnostic message

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

None, the tool is ready to use.

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

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

   SNDPGMINF     *CMD                   TAAPGMM       QATTCMD
   TAAPGMMC      *PGM       CLP         TAAPGMMC      QATTCL