TRANSFER Reference Manual

ALTER-PROFILE-ELEM
TISERV UOW Descriptions
069139, Update 1 to 40969 Tandem Computers Incorporated 2–119
Definition II is for TAL programs.
DEF alter-profile-elem-uow.
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.
02 elem-data-block TYPE PROFILE-ELEM-SHORT
OCCURS 0 TO 10 TIMES
DEPENDING ON
num-returned.
END.
DEF alter-profile-elem-rsp.
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) VALUE SPACES.
02 group-name REDEFINES corr-name.
02 num-returned TYPE BINARY 16 UNSIGNED.
02 elem-retn-code TYPE BINARY 16
OCCURS 0 TO 10 TIMES
DEPENDING ON
num-returned.
END.
HDR
is the UOW header. The UOW-CODE value is 204.
CORR-NAME
is the name of the correspondent whose depot profile is altered. You can use a
partially qualified name, including wild-card characters. This is also the
correspondent represented by the calling process. Only system administrators can
enter correspondent names other than their own in this field; correspondents
without system administrator privileges must enter their own names or leave the
field blank. In the response, the fully qualified name is returned.