TRANSFER Reference Manual

DETACH-EXTOBJ
TISERV UOW Descriptions
069139, Update 1 to 40969 Tandem Computers Incorporated 2–219
DETACH-EXTOBJ
(UOW Code 146)
DETACH-EXTOBJ detaches a primary external object from an item or detaches an
alternate external object from either an item or a primary external object.
DEF detach-extobj-uow.
02 hdr.
03 self-ident PIC AA VALUE "UW".
03 uow-code TYPE BINARY 16 UNSIGNED
VALUE 146.
02 parent PIC X(80).
02 parent-id REDEFINES parent.
03 dummy PIC X(12).
02 parent-handle REDEFINES parent TYPE
ITEM-HANDLE.
02 rel-position TYPE BINARY 16.
02 object-name PIC X(80).
02 object-id REDEFINES object-name.
03 dummy PIC X(12).
02 object-handle REDEFINES object-name
TYPE ITEM-HANDLE.
02 options.
03 parent-is-item TYPE BOOLEAN.
03 parent-is-object-name TYPE BOOLEAN.
03 alternate-attachment TYPE BOOLEAN.
03 child-is-object-name TYPE BOOLEAN.
03 reserved-1 TYPE BOOLEAN VALUE "N".
03 reserved-2 TYPE BOOLEAN VALUE "N".
03 reserved-3 TYPE BOOLEAN VALUE "N".
03 reserved-4 TYPE BOOLEAN VALUE "N".
END.
DEF detach-extobj-rsp.
02 hdr.
03 self-ident PIC AA VALUE "UW".
03 uow-code TYPE BINARY 16 UNSIGNED
VALUE 146.
02 retn-code TYPE BINARY 16.
02 retn-code-detail TYPE BINARY 16.
02 parent PIC X(80).
02 object-name PIC X(80).
02 detached-position TYPE BINARY 16.
END.
HDR
is the UOW header. The UOW-CODE value is 146.
PARENT
denotes the object from which the external object is to be detached. This field can
specify either an item or a primary external object; thus, it can contain an item ID,