TRANSFER Reference Manual

GET-AUX-NAME
TISERV UOW Descriptions
2–230 069139, Update 1 to 40969 Tandem Computers Incorporated
GET-AUX-NAME
(UOW Code 178)
GET-AUX-NAME retrieves the names of authorizing users and reply-to recipients for
a package.
DEF get-aux-name-uow.
02 hdr.
03 self-ident PIC AA VALUE "UW".
03 uow-code TYPE BINARY 16 UNSIGNED
VALUE 178.
02 item-id.
03 dummy PIC X(12).
02 aux-name-type PIC 9(4) COMP.
02 aux-name-seq-num PIC S9(4) COMP.
02 options.
03 skip-exact TYPE BOOLEAN.
03 any-seq-num TYPE BOOLEAN.
03 strip-local-node-name TYPE BOOLEAN.
03 reserved-3 TYPE BOOLEAN VALUE "N".
03 reserved-4 TYPE BOOLEAN VALUE "N".
03 reserved-5 TYPE BOOLEAN VALUE "N".
03 reserved-6 TYPE BOOLEAN VALUE "N".
03 reserved-7 TYPE BOOLEAN VALUE "N".
02 num-requested TYPE BINARY 16 UNSIGNED.
END.
DEF get-aux-name-rsp.
02 hdr.
03 self-ident PIC AA VALUE "UW".
03 uow-code TYPE BINARY 16 UNSIGNED
VALUE 178.
02 retn-code TYPE BINARY 16.
02 retn-code-detail TYPE BINARY 16.
02 num-returned TYPE BINARY 16 UNSIGNED.
02 returned-names OCCURS 0 TO 10 TIMES
DEPENDING ON num-returned.
03 aux-name-type PIC 9(4) COMP.
03 aux-name-seq-num PIC S9(4) COMP.
03 aux-name PIC X(120).
END.
HDR
is the UOW header. The UOW-CODE value is 178.