TRANSFER Reference Manual

ALTER-PROFILE-ELEM
TISERV UOW Descriptions
2–118 069139, Update 1 to 40969 Tandem Computers Incorporated
ALTER-PROFILE-ELEM
(UOW Code 204)
ALTER-PROFILE-ELEM alters data elements in a depot profile record. This UOW is
typically used after a GET-PROFILE-ELEM UOW.
Definition I is a DDL skeleton format to which definitions can be added; it is for
general applications use.
DEF alter-profile-elem-usk.
02 hdr.
03 self-ident PIC AA VALUE "UW".
03 uow-code TYPE BINARY 16 UNSIGNED
VALUE 204.
02 filler TYPE CHARACTER 4.
02 corr-name PIC X(80) VALUE SPACES.
02 group-name REDEFINES corr-name.
02 num-returned TYPE BINARY 16 UNSIGNED.
END.
DEF alter-profile-elem-rsk.
02 hdr.
03 self-ident PIC AA VALUE "UW".
03 uow-code TYPE BINARY 16 UNSIGNED
VALUE 204.
02 retn-code TYPE BINARY 16.
02 retn-code-detail TYPE BINARY 16.
02 corr-name PIC X(80).
02 group-name REDEFINES corr-name.
02 num-returned TYPE BINARY 16.
END.