TRANSFER Reference Manual

GET-ITEM-REC-B40
TISERV UOW Descriptions
2–310 069139, Update 1 to 40969 Tandem Computers Incorporated
RETN-CODE-DETAIL
is an error number returned by a subsystem other than the TRANSFER delivery
system or is a further qualification of an error detected by the TRANSFER delivery
system.
NUM-RETURNED
is the number of records returned by the TRANSFER delivery system in the
response.
RECS-RETURNED
is the data array that contains the records retrieved. For this array, you must
define array limits and element sizes that are consistent with the records requested
in the UOW. The data structure is always specific to each particular application.
Field and subfield structure is based on values of NUM-REQUESTED and MAX-
DATASIZE. Thus, RECS-RETURNED is specific to your application.
To illustrate how the RECS-RETURNED field is used, the following example
assumes that the request UOW specified a value of 20 for NUM-REQUESTED and
a value of 80 for MAX-DATASIZE. The application code would then specify:
02 recs-returned OCCURS 0 TO 20 TIMES
DEPENDING ON num-returned.
03 record-key.
04 rec-type PIC 9(4) COMP.
04 rec-seq-num PIC 9(4) COMP.
03 extobj-rec-num REDEFINES record-key
TYPE BINARY 32 UNSIGNED.
03 data-len TYPE BINARY 16 UNSIGNED.
03 data-string PIC X(80).
RECORD-KEY
is the record key that identifies a particular record.
REC-TYPE
contains the record type.
REC-SEQ-NUM
contains the record sequence number.
EXTOBJ-REC-NUM
redefines the record key indicated by REC-TYPE and REC-SEQ-NUM as a
32-bit unsigned value.