RTVDBFRR RETRIEVE DATA BASE FILE BY RR TAADBLL |
The Retrieve Data Base File by Relative Record command allows a
retrieval of the contents of up to 10 fields from a record in a
physical data base file using a RR number. Both character (up to 50
bytes) and decimal fields are supported. The command allows a
general purpose approach that may be used to avoid having to write a
program.
A typical series of commands would be:
DCL &VALUE1 *CHAR LEN(50)
DCL &VALUE2 *CHAR LEN(50)
.
RTVDBFRR FILE(xxx) RR(*FIRST) FIELD1(yyy)
VALUE1(&VALUE1) FIELD2(zzz)
VALUE2(&VALUE2)
The information about the two fields for the first record in the file
would be returned. The data for either character or decimal fields
is left adjusted in the return values.
RTVDBFRR escape messages you can monitor for
--------------------------------------------
None. Escape messages from based on functions will be re-sent.
Command parameters *CMD
------------------
FILE The qualified name of the file to retrieve
information from. The library value defaults to
*LIBL. *CURLIB or a specific library may also be
used.
MBR The member of the file to retrieve information from.
The default is *FIRST. *LAST or a specific member
may also be used.
RR The relative record to be accessed. The default is
*FIRST for the first record in the file. *LAST or a
specific relative record number may also be used.
FIELD1 One of the 10 field names in the file to be
accessed.
VALUE1 The value of the field named in FIELD1. Either
character or decimal fields may be retrieved. The
data is left justified. This is an optional
parameter that if used must be specified as *CHAR
LEN(50).
FIELD2 One of the 10 field names in the file to be
accessed.
VALUE2 The value of the field named in FIELD2. Either
character or decimal fields may be retrieved. The
data is left justified. This is an optional
parameter that if used must be specified as *CHAR
LEN(50).
FIELD3 One of the 10 field names in the file to be
accessed.
VALUE3 The value of the field named in FIELD3. Either
character or decimal fields may be retrieved. The
data is left justified. This is an optional
parameter that if used must be specified as *CHAR
LEN(50).
FIELD4 One of the 10 field names in the file to be
accessed.
VALUE4 The value of the field named in FIELD4. Either
character or decimal fields may be retrieved. The
data is left justified. This is an optional
parameter that if used must be specified as *CHAR
LEN(50).
FIELD5 One of the 10 field names in the file to be
accessed.
VALUE5 The value of the field named in FIELD5. Either
character or decimal fields may be retrieved. The
data is left justified. This is an optional
parameter that if used must be specified as *CHAR
LEN(50).
FIELD6 One of the 10 field names in the file to be
accessed.
VALUE6 The value of the field named in FIELD6. Either
character or decimal fields may be retrieved. The
data is left justified. This is an optional
parameter that if used must be specified as *CHAR
LEN(50).
FIELD7 One of the 10 field names in the file to be
accessed.
VALUE7 The value of the field named in FIELD7. Either
character or decimal fields may be retrieved. The
data is left justified. This is an optional
parameter that if used must be specified as *CHAR
LEN(50).
FIELD8 One of the 10 field names in the file to be
accessed.
VALUE8 The value of the field named in FIELD8. Either
character or decimal fields may be retrieved. The
data is left justified. This is an optional
parameter that if used must be specified as *CHAR
LEN(50).
FIELD9 One of the 10 field names in the file to be
accessed.
VALUE9 The value of the field named in FIELD9. Either
character or decimal fields may be retrieved. The
data is left justified. This is an optional
parameter that if used must be specified as *CHAR
LEN(50).
FIELD10 One of the 10 field names in the file to be
accessed.
VALUE10 The value of the field named in FIELD10. Either
character or decimal fields may be retrieved. The
data is left justified. This is an optional
parameter that if used must be specified as *CHAR
LEN(50).
Restrictions
------------
** Because the command returns variables, RTVDBFRR may only be
used in a CL program.
** Only a physical data file (not a source file) may be used.
** The maximum supported file length is 9999 bytes.
Prerequisites
-------------
The following TAA Tools must be on your system:
CHKOBJ3 Check object 3
HLRMVMSG HLL Remove message
RSNLSTMSG Resend last message
RTVDBFA Retrieve data base file attributes
RTVFLDARR Retrieve field array
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
------ ---- --------- ---------- ----------
RTVDBFRR *CMD TAADBLL QATTCMD
TAADBLLC *PGM CLP TAADBLLC QATTCL
TAADBLLR *PGM RPG TAADBLLR QATTRPG
|
Added to TAA Productivity tools January 1, 2007
