The Display  UIM Count  command counts the  number of  lines in  one or
more members  containing UIM type source.  Source  types in addition to
PNLGRP  may  be specified.    Comment lines  and  blank lines  are also
counted.  A percentage of  comments is provided.  DSPUIMCNT  provides a
better understanding of  the amount of actual source  versus a count of
the number of statements in a source member.

While  the  command  can  be  used  on  any  source  type, only  PNLGRP
comments  will  be  accurately  counted.     Other  commands  such   as
DSPCLPCNT and DSPRPGCNT are designed for specific source types.

A typical command would be:

             DSPUIMCNT    SRCFILE(xxx/QPNLSRC) MBR(*ALL)

All  members  in  the  QPNLSRC  file of  the  named  library  would  be
processed.   A  spooled file  would be output  displayed with  one line
for each PNLGRP  source type member.   A  count of the  lines with  UIM
statements, comments, and blank lines would be provided.

Specifying source types to process
-----------------------------------

Because no syntax  checking occurs during  the entry of UIM  source and
the  CRTPNLGRP command  is not sensitive  to the  source type,  you may
have  source types that are  other than PNLGRP (such as  TXT or a blank
type) containing UIM source.

The SRCTYP parameter allows for  a list of source types or  the special
value *ALL for all source types in the file.

If *ALL  or a  list is  named, the DSPUIMCNT  command assumes  that the
members contain UIM source.

Counting technique
------------------

A comment in UIM is noted by '.*' in positions 1-2.

Blank lines are counted separately.

DSPUIMCNT escape messages you can monitor for
---------------------------------------------

      TAA9891    No members exist in the file.
      TAA9892    The individual member specified does not exist.
      TAA9893    No generic members exist for the generic name.

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

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

   SRCFILE       The   qualified  name  of   the  source   file  to  be
                 processed.  The default is QPNLSRC.

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

   MBR           The  member,  generic  member  name,  or  the  special
                 value   *ALL  (all   members  in   the  file)   to  be
                 processed.

   SRCTYP        The source types to be  processed.  Because no  syntax
                 checking exists when  entering UIM source,  the source
                 types may  be of any value such as  TXT or even blank.

                 PNLGRP  is the  default to process  only those members
                 with a source type of PNLGRP.

                 *ALL may be specified  to process all source types  as
                 if they were specified as PNLGRP.

                 A list of up to 10 source types may be specified.

   OUTPUT        How  to output  the  results.   *  is  the default  to
                 display  the spooled  file if  the command  is entered
                 interactively.  The spooled  file is deleted after  it
                 is displayed.

                 If  the  command is  entered  in  batch or  *PRINT  is
                 specified,  the spooled  file is output  and retained.


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

None.

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

The following TAA Tools must be on your system:

     CHKGENERC       Check generic
     EDTVAR          Edit variable
     EXTLST          Extract list
     EXTLST2         Extract list 2
     HLRMVMSG        HLL Remove message
     RTVDBFA         Retrieve data base file attributes
     RTVMBRLST       Retrieve member list
     RTVSYSVAL3      Retrieve system value 3
     SNDCOMPMSG      Send completion message
     SNDESCINF       Send escape information
     SNDESCMSG       Send escape message
     SNDSTSMSG       Send status message

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

None, the tool is ready to use.

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

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

   DSPUIMCNT     *CMD                   TAASRFH       QATTCMD
   TAASRFHC      *PGM       CLP         TAASRFHC      QATTCL
   TAASRFHR      *PGM       RPG         TAASRFHR      QATTRPG