Use of the task token UEPTSTOK

The task token UEPTSTOK provides the address of a 4-byte area that you can use to pass information between successive temporary storage requests in the same task.

For example, you can use UEPTSTOK to pass information between successive invocations of the XTSEREQ exit. By contrast, UEPTQTOK is usable only for the duration of a single temporary storage request, because its contents may be destroyed at the end of the request.

Table 1. WRITEQ TS: User arguments and associated keywords, data types, and input/output types
Argument	Keyword	Data type	Input/output type
Arg1	QUEUE	CHAR(8)	input
Arg1	QNAME	CHAR(16)	input
Arg2	FROM	DATA-AREA	input
Arg3	LENGTH	BIN(15)	input
Arg4	*	*	*
Arg5	ITEM	BIN(15)	input/output
Arg5	NUMITEMS	BIN(15)	output
Arg6	*	*	*
Arg7	SYSID	CHAR(4)	input

Note: The different uses of Arg5 are shown, because Arg5 is used by the ITEM and NUMITEMS keywords which are alternatives and the argument to the ITEM keyword is an input field when REWRITE is specified.

Table 2. READQ TS: User arguments and associated keywords, data types, and input/output types
Argument	Keyword	Data type	Input/output type
Arg1	QUEUE	CHAR(8)	input
Arg1	QNAME	CHAR(16)	input
Arg2	SET	DATA-AREA, PTR	output
Arg2	INTO	DATA-AREA	output
Arg3	LENGTH	BIN(15)	input/output
Arg4	NUMITEMS	BIN(15)	output
Arg5	ITEM	BIN(15)	input
Arg6	*	*
Arg7	SYSID	CHAR(4)	input

Table 3. DELETEQ TS: User arguments and associated keywords, data types, and input/output types
Argument	Keyword	Data type	Input/output type
Arg1	QUEUE	CHAR(8)	input
Arg1	QNAME	CHAR(16)	input
Arg2	*	*	*
Arg3	*	*	*
Arg4	*	*	*
Arg5	*	*	*
Arg6	*	*	*
Arg7	SYSID	CHAR(4)	input