TAA Tools
RTVALLUSR       RETRIEVE ALL USER                      TAALICQ

The Retrieve All  User command retrieves the exception  libraries found
in  the SAVLIB  LIB(*ALLUSR) help  text for  system libraries.   Unique
return  parameters exist for  # and Q  libraries.  The  # libraries are
not  saved  by  SAVLIB(*ALLUSR).     The  Q  libraries  are   saved  by
SAVLIB(*ALLUSR).   This  assists  in the  processing  of commands  that
emulate the *ALLUSR function or the unique TAA *ALLUSR2 function.

A typical series of commands would be:

             DCL        &QLIBS *CHAR LEN(5000)
             DCL        &S36LIBS *CHAR LEN(1000)
              .
             RTVALLUSR  QLIBS(&QLIBS) #LIBS(&S36LIBS)

Each  library  in  each  return  parameter  takes  10  positions.   The
remainder of the return variable is filled with blanks.

Some libraries such as QRCL are returned as generic values.

QUSRV* is  part of  the list  which differs  slightly  from the  SAVLIB
definition.

RTVALLUSR escape messages you can monitor for
---------------------------------------------

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

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

   QLIBS         An  optional return  variable for  the exception  list
                 of  libraries  identified on  the  SAVLIB  command for
                 libraries beginning with the  letter Q that are  saved
                 when  *ALLUSR is  specified.   All  other Q  libraries
                 are not saved.

                 Each  library takes  10 positions.   The  remainder of
                 the  return  variable  is filled  with  blanks.   Some
                 libraries  such  as  QRCL  are  returned   as  generic
                 values.

                 If  used,  the variable  must  be  specified as  *CHAR
                 LEN(5000).

   QLIBGEN       An   optional  return  variable  that   will  allow  a
                 determination  of   whether   the  library   name   is
                 generic.    Each  entry  is one  byte  in  length  and
                 corresponds  to  a library  in  QLIBS.   If  the QLIBS
                 library is  not  generic,  '0' will  exist.    If  the
                 QLIBS library  is generic,  1-9 are  returned for  the
                 length  of the library  name without  the *.   This is
                 intended to simplify processing of generic names.

                 If  used,  the  variable must  be  specified  as *CHAR
                 LEN(500).

   S36LIBS       An optional  return variable  for  the exception  list
                 of  libraries identified  on  the  SAVLIB command  for
                 libraries  beginning with  # that  are not  saved when
                 *ALLUSR is specified.

                 Each library  takes 10  positions.   The remainder  of
                 the return variable is filled with blanks.

                 If  used, the  variable  must  be specified  as  *CHAR
                 LEN(1000).

   QLIBCNT       An  optional  return  variable  for  the  number of  Q
                 libraries returned.

                 If used,  the  variable  must  be  specified  as  *DEC
                 LEN(5 0).

   S36LIBCNT     An  optional  return  variable for  the  number  of  #
                 libraries returned.

                 If  used,  the  variable  must  be specified  as  *DEC
                 LEN(5 0).

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

None.

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

The following TAA Tools must be on your system:

     SNDESCINF       Send escape information

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

None, the tool is ready to use.

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

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

   TAALICQ       *CMD                   TAALICQ       QATTCMD
   TAALICQC      *PGM       CLP         TAALICQC      QATTCL
					

Added to TAA Productivity tools October 15, 2003


Home Page Up to Top