The Retrieve Object Description 3 command provides a subset of the
system RTVOBJD command. RTVOBJD3 is intended for use with
multi-member data base files. The performance of RTVOBJD is slow on
large member files because the size of all members must be added up.
RTVOBJD3 returns a limited amount of information which does not
include size.
The API QUSROBJD is used.
A typical command would be:
DCL &TEXT *CHAR LEN(50)
DCL &OWNER *CHAR LEN(10)
.
RTVOBJD3 OBJ(xxx) OBJTYPE(*xxx) TEXT(&TEXT)
OWNER(&OWNER)
The QUSROBJD API has several formats. RTVOBJD3 uses OBJD0200 which
returns basic information about the object, but does not include size
information.
Finding existing use of RTVOBJD and the SIZE keyword
----------------------------------------------------
You can determine all the CL statements where you have used the
system RTVOBJD command with the SCNSRC tool such as:
SCNSRC FILE(xxx) ARGUMENT(RTVOBJD) PRTFOLSTM(*YES)
This will print a listing of all statements where the RTVOBJD was
used and the following statement. You may be able to spot some uses
for RTVOBJD3.
RTVOBJD3 escape messages you can monitor for
---------------------------------------------
TAA9893 OBJTYPE(*ALL) specified - More than one object
Escape messages from based on functions will be re-sent.
Command parameters *CMD
------------------
OBJ The qualified name of the object. The library value
defaults to *LIBL. *CURLIB may also be used.
OBJTYPE The object type to be retrieved. Use the command
prompter for a complete list.
If *ALL is specified and more than one object
exists, the TAA9893 message will be sent as an
escape message.
RTNLIB The library where the object exists. If used, the
variable must be specified as *CHAR LEN(10). This
may be of value if *LIBL or *CURLIB is used for the
qualified library name.
RTNOBJTYPE The return object type of the object. If used, the
variable must be specified as *CHAR LEN(7). This
may be of value if *ALL was used for the OBJTYPE
parameter.
OBJATR The attributes of the object such as RPG or PF. If
used, the variable must be specified as *CHAR
LEN(10).
TEXT The text description of the object. If used, the
variable must be specified as *CHAR LEN(50).
OWNER The owner of the object. If used, the variable must
be specified as *CHAR LEN(10).
ASP The Auxiliary Storage Pool where the object is
located. If used, the variable must be specified as
*DEC LEN(2 0).
CRTDATE The creation date of the object. If used, the
variable must be specified as *CHAR LEN(13). The
format is CYYMMDDHHMMSS.
CHGDATE The last change date of the object. If used, the
variable must be specified as *CHAR LEN(13). The
format is CYYMMDDHHMMSS.
SRCF The source file used to create the object if any.
If used, the variable must be specified as *CHAR
LEN(10). ILE programs do not return a value. See
the tool RTVILEMODA.
SRCFLIB The source file library used to create the object if
any. If used, the variable must be specified as
*CHAR LEN(10). ILE programs do not return a value.
See the tool RTVILEMODA.
SRCMBR The source file member used to create the object if
any. If used, the variable must be specified as
*CHAR LEN(10). ILE programs do not return a value.
See the tool RTVILEMODA.
Restrictions
------------
Because the command returns variables, it may only be used in a CL
program.
Prerequisites
-------------
The following TAA Tools must be on your system:
RTVOBJLST Retrieve object list
SNDESCINF Send escape information
SNDESCMSG Send escape message
Implementation
--------------
None, the tool is ready to use.
Objects used by the tool
------------------------
Object Type Attribute Src member Src file
------ ---- --------- ---------- ----------
RTVOBJD3 *CMD TAAOBKM QATTCMD
TAAOBKMC *PGM CLP TAAOBKMC QATTCL
|
