Manualshelf

TRANSFER Reference Manual

ManualsBrandsHP ManualsServerHP NonStop G-Series
461462463464465466467468469470
READ-NEXT-NAME
TISERV UOW Descriptions
2–422 069139, Update 1 to 40969 Tandem Computers Incorporated
READ-NEXT-NAME
(UOW Code 224)
READ-NEXT-NAME retrieves correspondent names, group names, distribution list
names, or folder names defined in the TRANSFER delivery system.
DEF read-next-name-uow.
02 hdr.
03 self-ident PIC AA VALUE "UW".
03 uow-code TYPE BINARY 16 UNSIGNED VALUE 224.
02 filler TYPE BINARY 16.
02 filler TYPE BINARY 16.
02 corr-name PIC X(80) VALUE SPACES.
02 partial PIC X(80) VALUE SPACES.
02 name-type PIC X(32).
02 kind TYPE BINARY 16.
02 restriction-flag TYPE BINARY 16 VALUE 2.
02 alias-action-flag TYPE BINARY 16 VALUE 2.
02 name-format TYPE BINARY 16 VALUE 1.
02 num-wanted TYPE BINARY 16 UNSIGNED.
02 matcher PIC X(80).
02 dir-no TYPE BINARY 16.
02 filler TYPE BINARY 16 UNSIGNED VALUE 0.
END.
DEF read-next-name-rsp.
02 hdr.
03 self-ident PIC AA VALUE "UW".
03 uow-code TYPE BINARY 16 UNSIGNED VALUE 224.
02 retn-code TYPE BINARY 16.
02 retn-code-detail TYPE BINARY 16.
02 corr-name PIC X(80) VALUE SPACES.
02 partial PIC X(80) VALUE SPACES.
02 name-type PIC X(32).
02 kind TYPE BINARY 16.
02 restriction-flag TYPE BINARY 16 VALUE 2.
02 alias-action-flag TYPE BINARY 16 VALUE 2.
02 name-format TYPE BINARY 16 VALUE 1.
02 num-wanted TYPE BINARY 16 UNSIGNED.
02 matcher PIC X(80).
02 dir-no TYPE BINARY 16.
02 num-returned TYPE BINARY 16 UNSIGNED VALUE 0.
02 name-group OCCURS 0 TO 14 TIMES DEPENDING
ON num-returned.
03 name PIC X(80).
03 alias-type TYPE CHARACTER 1.
03 filler TYPE CHARACTER 1.
END.
HDR
is the UOW header. The UOW-CODE value is 224.