The Delete  Program Source command  allows you in  a single command  to
delete  both the program  object and the  source member used  to create
the program.  This is useful for cleanup purposes.

A typical command would be:

       DLTPGMSRC     PGM(xxx)

The  information from the  program is accessed  to determine the source
that was used to create the program.

If either the  program or the  source cannot be found,  or you are  not
authorized  to  delete both,  or  the  source  member and  the  program
cannot  be allocated,  neither the  program is  deleted nor  the source
removed.  An appropriate message would appear.

Since the system  does not lock  programs when they  are called, it  is
possible for you  to delete a program  that is in use  by another user.

A  single module  ILE program  may be processed.   Multiple  module ILE
programs are restricted.

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

   PGM           The qualified  name  of  the program  to  be  deleted.
                 The library  defaults to *LIBL.   *CURLIB may  also be
                 used.

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

Only single module ILE programs may be deleted.

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

The following TAA Tools must be on your system:

        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
   ------        ----        ---------      ----------    ----------

   DLTPGMSRC     *CMD                       TAAPGMH       QATTCMD
   TAAPGMHC      *PGM           CLP         TAAPGMHC      QATTCL