GDSX (Extended General Device Support) Manual

User Exit Descriptions
Extended General Device Support (GDSX) Manual—529931-001
9-9
USER^ATTRIBUTES
token-code input
INT(32):value
is the SCF token code. The value of token-code is one of the following:
token-value input
INT:ref
is a pointer to a STRUCT containing attribute values. When this
USER^ATTRIBUTES is called by TSCODE, attribute variables in this STRUCT
contain spaces unless they have been set by means of an SCF ADD or ALTER
command (spaces in INT variables will equal 8224). USER^ATTRIBUTES code
may change the values of the variables except the one associated with the
EXTSUSIZE configuration parameter.
A sample STRUCT is shown later in this subsection.
Considerations
•
The TSCODE-supported FAULT procedure should only be called from the
USER^ATTRIBUTES exit with its noretn parameter equal to 0. See the
description of FAULT on page 8-22.
•
USER^ATTRIBUTES is an integer function called only by TSCODE, never by
USCODE. USCODE returns function values to TSCODE with the TAL RETURN
statement. The permissible returned function values are described under the
status variable above.
•
This procedure is called from the monitor task.
•
Pseudo procedures may be called from this procedure.
Example
Here is an example of a STRUCT pointed to by the value in token-value:
STRUCT TOKEN^VALUE;
BEGIN
STRUCT Z^ACCESSNAME;
BEGIN
STRUCT Z^DISC;
BEGIN
STRUCT Z^VOLUME;
BEGIN STRING BYTE [0:7]; END;
STRUCT Z^SUBVOLUME;
BEGIN STRING BYTE [0:7]; END;
STRUCT Z^FILENAME;
BEGIN STRING BYTE [0:7]; END;
150929409 ADD SU command
150929411 ALTER SU command