TRANSFER Reference Manual

COPY-ITEM
TISERV UOW Descriptions
069139, Update 1 to 40969 Tandem Computers Incorporated 2–143
COPY-ITEM
(UOW Code 107)
COPY-ITEM makes a copy of an existing item, The correspondent can save the copy in
any local group folder to which the correspondent has access or in any folder in the
correspondent's private depot.
DEF copy-item-uow.
02 hdr.
03 self-ident PIC AA VALUE "UW".
03 uow-code TYPE BINARY 16 UNSIGNED
VALUE 107.
02 item-id.
03 dummy PIC X(12).
02 options.
03 copy-data TYPE BOOLEAN.
03 copy-recips TYPE BOOLEAN.
03 copy-compnts TYPE BOOLEAN.
03 reserved-3 TYPE BOOLEAN VALUE "N".
END.
DEF copy-item-rsp.
02 hdr.
03 self-ident PIC AA VALUE "UW".
03 uow-code TYPE BINARY 16 UNSIGNED
VALUE 107.
02 retn-code TYPE BINARY 16.
02 retn-code-detail TYPE BINARY 16.
02 new-item-id.
03 dummy PIC X(12).
END.
HDR
is the UOW header. The UOW-CODE value is 107.
ITEM-ID
is the item to be copied (the source item). To refer to an item produced by a
previous UOW within the same IPC, you can replace ITEM-ID with ITEM-
HANDLE, which is defined in the “Commonly Used Fields” subsection of this
manual.