TAA Tools
RTVOBJCNT       RETRIEVE OBJECT COUNT                  TAAOBJS

The Retrieve Object  Count command returns  a count of the  objects and
types  found, the  first object and  library found,  and the  number of
libraries where objects were found.

A  typical  use of  the command  would be  to  determine the  number of
objects that  exist  for  a generic  name,  the  library of  the  first
object and if all of the objects are in the same library.

             DCL          &FSTLIB *CHAR LEN(10)
             DCL          &OBJCNT *DEC LEN(7 0)
             DCL          &LIBCNT *DEC LEN(7 0)
              .
             RTVOBJCNT    OBJ(xxxx*) FSTLIB(&FSTLIB) +
                            LIBCNT(&LIBCNT) OBJCNT(&OBJCNT)
             IF           (&LIBCNT *GT 1) DO /* More than 1 */

RTVOBJCNT escape messages you can monitor for
---------------------------------------------

      CPF2123    No objects exist

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


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

   OBJ           The  qualified file  name of  the object.    A generic
                 name would normally be entered.

                 If  a  specific  name  (non-generic)  is  entered, the
                 object type may  not be  *ALL when  *LIBL or  *USRLIBL
                 is used (this is a DSPOBJD restriction).

                 *ALL may be  specified to count all  objects (if any).
                 If  *ALL is used,  only a specific  library or *CURLIB
                 may be specified.

                 The  library  value  defaults  to  *LIBL.    *USRLIBL,
                 *CURLIB, *ALLUSR, or *ALL may also be entered.

   OBJTYPE       The  standard object  types are  supported.   *ALL  is
                 the default.

   FSTOBJ        An  optional  return variable  that  will contain  the
                 first  object found.  If  specified, the variable must
                 be declared as *CHAR LEN(10).

   FSTLIB        An  optional return  variable  that will  contain  the
                 library  of  the first  object  found.    This can  be
                 helpful  if the  library is not  known.   See also the
                 LIBCNT parameter.   If  specified, the  variable  must
                 be declared as *CHAR LEN(10).

   FSTOBJTYPE    An  optional return  variable  that  will contain  the
                 object   type  of   the  first   object  found.     If
                 specified, the  variable  must be  declared  as  *CHAR
                 LEN(10).

   LIBCNT        An  optional  return  variable  that  will  contain  a
                 count  of the number  of libraries where  objects were
                 found.   If  specified, the variable  must be declared
                 as *DEC LEN(7 0).

   OBJCNT        An optional  return  variable  that will  contain  the
                 count  of all the  objects found.   If  specified, the
                 variable must be declared as *DEC LEN(7 0).

   CNTPGM        An  optional  return variable  that  will  contain the
                 count  of  all   the  program   objects  found.     If
                 specified,  the  variable  must be  declared  as  *DEC
                 LEN(7 0).

   CNTPF         An  optional  return variable  that  will  contain the
                 count of  all the  physical file  objects found.    If
                 specified,  the  variable must  be  declared  as  *DEC
                 LEN(7 0).

   CNTLF         An  optional  return variable  that  will contain  the
                 count  of  all the  logical  file objects  found.   If
                 specified,  the  variable must  be  declared  as  *DEC
                 LEN(7 0).

   CNTDSPF       An  optional return  variable  that  will contain  the
                 count  of  all the  display  file objects  found.   If
                 specified, the  variable  must  be  declared  as  *DEC
                 LEN(7 0).

   CNTPRTF       An  optional return  variable  that  will contain  the
                 count  of  all the  printer  file objects  found.   If
                 specified, the  variable  must  be  declared  as  *DEC
                 LEN(7 0).

   CNTCMD        An  optional return  variable  that will  contain  the
                 count   of  all  the   command  objects  found.     If
                 specified,  the  variable  must  be  declared  as *DEC
                 LEN(7 0).

   CNTDTAARA     An optional  return  variable  that will  contain  the
                 count  of  all  the  data  area  objects  found.    If
                 specified,  the  variable  must  be  declared  as *DEC
                 LEN(7 0).

   CNTJOBD       An optional  return  variable that  will  contain  the
                 count of  all the job  description objects found.   If
                 specified,  the  variable  must  be  declared as  *DEC
                 LEN(7 0).

   CNTMENU       An optional  return  variable that  will  contain  the
                 count of  all the menu  objects found.   If specified,
                 the variable must be declared as *DEC LEN(7 0).

   CNTOTHER      An  optional  return variable  that  will contain  the
                 count  of  all the  other object  types found  that do
                 not have  specific  return variables.   If  specified,
                 the variable must be declared as *DEC LEN(7 0).

   SIZE          An  optional return  variable  that  will contain  the
                 size  of all  the  objects found.   If  specified, the
                 variable must be declared as *DEC LEN(15 0).

                 Note that  the  size  returned does  not  include  the
                 size of the library object.

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

None.

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

The following TAA Tools must be on your system:

     CHKGENERC       Check generic
     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
   ------        ----    ---------      ----------    ----------

   RTVOBJCNT     *CMD                   TAAOBJS       QATTCMD
   TAAOBJSC      *PGM       CLP         TAAOBJSC      QATTCL
					

Added to TAA Productivity tools May 1, 1996


Home Page Up to Top