The Retrieve  Library Size  command retrieves  the size  and number  of
objects  in a library.   The  library object  is also considered.   The
command  is  slow running  against a  large library  or a  library with
many source members.

A typical series of commands would be:

             DCL        &SIZE *DEC LEN(15 0)
             DCL        &OBJECTS *DEC LEN(11 0)
              .
             RTVLIBSIZ  LIB(xxx) SIZE(&SIZE) OBJECTS(&OBJECTS)

The size and number of objects would be returned.

RTVLIBSIZ escape messages you can monitor for
---------------------------------------------

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

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

   LIB           The library to retrieve the information for.

   ASPDEV        Specifies  the auxiliary  storage  pool  (ASP)  device
                 name where  storage for the library is  allocated.  If
                 the  library resides  in an  ASP that  is not  part of
                 the thread's library name  space, this parameter  must
                 be  specified   to  ensure  the  correct   library  is
                 searched.

                 This  parameter  can be  specified  as a  list  of two
                 values  (elements)  or  as   a  single  value.     The
                 possible single values are:

                 * = The ASPs  that are currently part of  the thread's
                 library  name space  will  be searched  to  locate the
                 library.   This includes  the system ASP  (ASP 1), all
                 defined  basic user  ASPs  (ASPs  2-32), and,  if  the
                 thread  has an  ASP group,  the primary  and secondary
                 ASPs in the thread's ASP group.

                 *ALLAVL  = All available ASPs will  be searched.  This
                 includes the  system ASP  (ASP 1),  all defined  basic
                 user ASPs (ASPs  2-32), and all available  primary and
                 secondary  ASPs,   (ASPs  33-255)  with  a  status  of
                 'Available'.

                 *CURASPGRP =  If  the thread  has  an ASP  group,  the
                 primary and secondary  ASPs in the thread's  ASP group
                 will be  searched to locate  the library.   The system
                 ASP  (ASP 1) and  defined basic user  ASPs (ASPs 2-32)
                 will not be searched.   If no ASP group  is associated
                 with the thread, an error will be issued.

                 *SYSBAS  = The  system  ASP (ASP  1)  and all  defined
                 basic  user  ASPs  (ASPs  2-32)  will  be  searched to
                 locate the  library.   No  primary or  secondary  ASPs
                 will  be  searched  even  if the  thread  has  an  ASP
                 group.

                 Element 1: Device

                 The  device name  of the primary  or secondary  ASP to
                 be searched.  The primary  or secondary ASP must  have
                 been  activated (by  varying on  the  ASP device)  and
                 have  a status of  'Available'.   The system  ASP (ASP
                 1)  and defined user  basic ASPs (ASPs  2-32) will not
                 be searched.

                 Element 2: Search type

                 *ASP  =  Specifies  that  only  the  single  auxiliary
                 storage  pool (ASP) device  named in  element 1  is to
                 be searched.

                 *ASPGRP  =  Specifies  that the  entire  group  of the
                 primary auxiliary storage pool  (ASP) device named  in
                 element 1 is to be searched.

   SIZE          The  size  of  the  objects in  the  library  and  the
                 library object.   This is an  optional return variable
                 and if used must be specified as *DEC LEN(15 0).

   OBJECTS       The number  of objects  in the  library including  the
                 library object.   This is an optional  return variable
                 and if used must be specified as *DEC LEN(11 0).

   JRNOBJ        The number  of *JRN objects  in the library.   This is
                 an  optional  return  variable  and  if  used  must be
                 specified as *DEC LEN(5 0).

   JRNRCVOBJ     The number of  *JRNRCV objects in  the library.   This
                 is  an optional return  variable and  if used  must be
                 specified as *DEC LEN(5 0).

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

Because  the command returns  variables, RTVLIBSIZ may only  be used in
a CL program.

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

The following TAA Tools must be on your system:

     CHKOBJ3         Check object 3
     EDTVAR          Edit variable
     RSNLSTMSG       Resend last 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
   ------        ----    ---------      ----------    ----------

   RTVLIBSIZ     *CMD                   TAALIDF       QATTCMD
   TAALIDFC      *PGM       CLP         TAALIDFC      QATTCL