TRANSFER Reference Manual

ATTACH-COMPNT-A01
TISERV UOW Descriptions
069139, Update 1 to 40969 Tandem Computers Incorporated 2–127
ATTACH-COMPNT-A01
(UOW Code 136)
ATTACH-COMPNT-A01 attaches an item as a component to another item.
DEF attach-compnt-a01-uow.
02 hdr.
03 self-ident PIC AA VALUE "UW".
03 uow-code TYPE BINARY 16 UNSIGNED VALUE 136.
02 parent-item-id.
03 dummy PIC X(12).
02 compnt-id.
03 dummy PIC X(12).
02 rel-position TYPE BINARY 16.
02 compnt-type PIC 9(4) COMP.
END.
DEF attach-compnt-a01-rsp.
02 hdr.
03 self-ident PIC AA VALUE "UW".
03 uow-code TYPE BINARY 16 UNSIGNED VALUE 136.
02 retn-code TYPE BINARY 16.
02 retn-code-detail TYPE BINARY 16.
02 inserted-position TYPE BINARY 16.
END.
HDR
is the UOW header. The UOW-CODE value is 136.
PARENT-ITEM-ID
is the parent item.
COMPNT-ID
is the component item.
You can replace PARENT-ITEM-ID and COMPNT-ID with ITEM-HANDLE to
reference an item produced by a previous UOW within the same IPC. ITEM-
HANDLE is defined in the “Commonly Used Fields” subsection of this manual.
REL-POSITION
is the position that the component item occupies in the parent item component list.
Unless this is the last position, the entry previously occupying this position and all
entries following it are shifted to the next higher position. The first component
item occupies relative position 1. The value 0 is illegal in this field.
If the relative position of the last component is unknown, you can reference this
position by setting the REL-POSITION field to -1. The value -1 means the last
position of the list. Figure 2-3 shows a new component attached to a 30-
component list. If you issued ATTACH-COMPNT-A01 and used the value -1 in