Characteristics for a language processor environment

When IRXINIT is called to automatically initialize an environment (such as logon and ISPF screen initialization), it uses default values. TSO/E provides three default parameters modules that are load modules containing the default values for initializing language processor environments for TSO/E (READY mode), ISPF, and non-TSO/E address spaces. The parameters modules are:

IRXTSPRM (for TSO/E)
IRXISPRM (for ISPF)
IRXPARMS (for MVS™)

You can change the values TSO/E uses to define language processor environments by providing your own load modules. See on how to change the default values.

The parameters modules consist of the parameter block (PARMBLOCK), the module name table, the function package table, and the host command environment table. The PARMBLOCK is a control block that is created when an environment is initialized. It contains the values used to define the environment and the addresses of the module name table, the function package table, and the host command environment table.

The following sections briefly describe the fields in the PARMBLOCK that define the characteristics for a language processor environment.

Table 3 shows the default values that TSO/E provides in each of the three default parameters modules.

ID

An 8-byte character field that is used only to identify the parameter block that IRXINIT creates. The field name is ID. The value must be IRXPARMS.

Version

A 4-byte character field that identifies the version of the parameter block for a particular release and level of TSO/E. The field name is VERSION. The value must be 0200.

Language Code

A 3-byte character field that contains a language code. The field name is LANGUAGE. The language code identifies the language in which REXX messages are displayed. The valid language codes are listed in Table 1.

Table 1. Language codes and their meanings
Language code	Language
CHS	Simplified Chinese
CHT	Traditional Chinese
DAN	Danish
DEU	German
ENP	U.S. English – all uppercase
ENU	U.S. English – mixed case (uppercase and lowercase)
ESP	Spanish
FRA	French
JPN	Japanese (Kanji)
KOR	Korean
PTB	Brazilian Portuguese

Note: To display REXX messages in languages other than U.S. English, you must have the appropriate national language feature of TSO/E installed.

Reserved

A 1-byte field that is reserved.

Module Name Table

A 4-byte field that contains the address of the modulename table. The field name is MODNAMET. The table contains the names of DDs for reading and writing data and from which to load execs, the names of several replaceable routines, and the names of the following exit routines:

Exec processing exit (exit for the IRXEXEC routine)
Exec initialization exit
Exec termination exit
Attention handling exit

Table 6 shows a summary of the replaceable routines. contains the format of the module name table.

Host Command Environment Table

A 4-byte field that contains the address of the host command environment table. The field name is SUBCOMTB. The table contains the names of valid host command environments that execs running in the language processor environment can use. It also contains the names of the routines that handle commands within each host command environment.

Function Package Table

A 4-byte field that contains the address of the function package table for function packages. The field name is PACKTB. The table consists of three parts for user packages, local packages, and system packages. Each part of the table contains a directory of the module names that represent the external functions to be searched.

Token for PARSE SOURCE

An 8-byte character string that contains the value of a token to be used by the PARSE SOURCE instruction. The field name is PARSETOK. The default is blank. This token is the last token of the string that PARSE SOURCE returns. The token you specify is returned in every PARSE SOURCE instruction that is used in the environment.

Flags

A fullword of bits used as flags. The field name is FLAGS. The flags define certain characteristics for the new language processor environment and how the environment and execs executing in the environment operate.

In addition to the flags field, the parameter following the flags is a mask field that works together with the flags. The mask field is a string that has the same length as the flags field. Each bit position in the mask field corresponds to a bit position in the flags field. IRXINIT uses the mask field to determine whether the corresponding flag bit should be used or ignored.

Table 2 summarizes each flag. describes each of the flags and the bit settings for each flag.

Table 2. Summary of each flag bit
Flag name	Description
TSOFL	Indicates whether the new environment is to be integrated into TSO/E. 0 - The environment is not integrated into TSO/E. 1 - The environment is integrated into TSO/E.
Reserved	This bit is reserved.
CMDSOFL	Specifies the search order used to locate a command that is issued from an exec. 0 - Search for modules first, followed by execs, followed by CLISTs (TSO/E address space only). The ddname used to search for execs is specified in the LOADDD field in the module name table. 1 - Search for execs, followed by modules, followed by CLISTs (TSO/E address space only). The ddname used to search for execs is specified in the LOADDD field in the module name table.
FUNCSOFL	Specifies the search order used to locate functions and subroutines that are called from an exec. 0 - Search the load libraries first. If the function or subroutine is not found, search the exec libraries for an exec. 1 - Search the exec libraries first for an exec. If the exec is not found, search the load libraries.
NOSTKFL	Prevents execs running in the environment from using any data stack functions. 0 - The exec can use any data stack functions. 1 - Requests for data stack functions are processed as though the data stack is empty.
NOREADFL	Prevents execs running in the environment from reading any input file. 0 - Reads from any input file are permitted. 1 - Reads from any input file are not permitted.
NOWRTFL	Prevents execs running in the environment from writing to any output file. 0 - Writes to the output file are permitted. 1 - Writes to the output file are not permitted.
NEWSTKFL	Indicates whether a new data stack is initialized for the new environment. 0 - Do not create a new data stack. 1 - Create a new data stack during the initialization of the new language processor environment.
USERPKFL	Indicates whether the user function packages that are defined for the previous language processor environment are also available to the new environment. 0 - Add the user function packages from the previous environment to the user function packages for the new environment. 1 - Do not add the user function packages from the previous environment to the user function packages for the new environment.
LOCPKFL	Indicates whether the local function packages that are defined for the previous language processor environment are also available to the new environment. 0 - Add the local function packages from the previous environment to the local function packages for the new environment. 1 - Do not add the local function packages from the previous environment to the local function packages for the new environment.
SYSPKFL	Indicates whether the system function packages that are defined for the previous language processor environment are also available to the new environment. 0 - Add the system function packages from the previous environment to the system function packages for the new environment. 1 - Do not add the system function packages from the previous environment to the system function packages for the new environment.
NEWSCFL	Indicates whether the host command environments that are defined for the previous language processor environment (in the host command environment table) are also available to the new environment. 0 - Add the host command environments from the previous environment to the host command environment table for the new environment. 1 - Do not add the host command environments from the previous environment to the host command environment table for the new environment.
CLOSEXFL	Indicates whether the data set as specified in the LOADDD field in the module name table is closed after the exec completes processing or remains open. 0 - The data set is opened once and remains open. 1 - The data set is opened for each load and then closed.
NOESTAE	Indicates whether a recovery ESTAE is established under the new environment. 0 - A recovery ESTAE is established. 1 - A recovery ESTAE is not established.
RENTRANT	Indicates whether the new environment is initialized as reentrant or non-reentrant. 0 - A non-reentrant language processor environment is initialized. 1 - A reentrant language processor environment is initialized.
NOPMSGS	Indicates whether primary messages are printed. 0 - Primary messages are printed. 1 - Primary messages are not printed.
ALTMSGS	Indicates if alternate messages are printed. 0 - Alternate messages are not printed. 1 - Alternate messages are printed.
SPSHARE	Indicates if the subpool specified in SUBPOOL field is shared across MVS tasks. 0 - The subpool is not shared. 1 - The subpool is shared.
STORFL	Indicates whether execs running in the environment can use the TSO/E STORAGE function. 0 - The STORAGE function can be used. 1 - The STORAGE function cannot be used.
NOLOADDD	Indicates whether the data set specified in the LOADDD field in the module name table is to be searched. 0 - Search the ddname, such as SYSEXEC, specified in the LOADDD field. If the exec is not found, search SYSPROC. 1 - Search SYSPROC only. Note: SYSPROC is searched only if the language processor environment is integrated into TSO/E. The user can either use the EXECUTIL command to indicate whether to search the exec ddnames or use the ALTLIB command to explicitly activate them. describes the EXECUTIL command. describes the ALTLIB command.
NOMSGWTO	Indicates whether to route REXX messages to a file in an MVS environment. SYSTSPRT is the default file name. 0 - Messages are processed. 1 - Messages are routed to the SYSTSPRT file.
NOMSGIO	Indicates whether to route REXX messages to a JCL listing. 0 - Messages are processed. 1 - Messages are routed to the JCL listing.
Reserved	The remaining bits are reserved.

Mask

A fullword of bits used as a mask for the setting of the flag bits. The field name is MASKS. The mask field is a string that has the same length as the flags field. Each bit position in the mask field corresponds to a bit in the same position in the flags field. IRXINIT uses the mask field to determine whether the corresponding flag bit is used or ignored.

Subpool Number

A fullword of binary numbers that specifies the number of the subpool in which storage is allocated for the entire language processor environment. The field name is SUBPOOL. If the environment is integrated into TSO/E, this value must be decimal 78.

Address Space Name

An 8-byte character field that specifies the name of the address space. The field name is ADDRSPN. The defaults are MVS (for IRXPARMS), TSO/E (for IRXTSPRM), and ISPF (for IRXISPRM).

X'FFFFFFFFFFFFFFFF'

The end of the parameter block (PARMBLOCK) must be indicated by X'FFFFFFFFFFFFFFFF'.

The following four tables show the default values that TSO/E provides in each of the default parameters modules. In Table 3, the LANGUAGE field contains the language code ENU for U.S. English in mixed case (uppercase and lowercase). The default parameters modules may contain a different language code depending on whether one of the language features has been installed. See Table 1 for information about the different language codes.

Note: The LANGUAGE field in the parameters module IRXISPRM (for ISPF) contains nulls. For ISPF, the system uses the language default from the parameters module IRXTSPRM (for TSO/E).

Table 3. Values TSO/E provides in the default parameters modules
Field name	IRXPARMS (MVS)	IRXTSPRM (TSO/E)	IRXISPRM (ISPF)
ID	IRXPARMS	IRXPARMS	IRXPARMS
VERSION	0200	0200	0200
LANGUAGE	ENU	ENU
PARSETOK
FLAGS
TSOFL	0	1	1
CMDSOFL	0	0	0
FUNCSOFL	0	0	0
NOSTKFL	0	0	0
NOREADFL	0	0	0
NOWRTFL	0	0	0
NEWSTKFL	0	0	1
USERPKFL	0	0	0
LOCPKFL	0	0	0
SYSPKFL	0	0	0
NEWSCFL	0	0	0
CLOSEXFL	0	0	0
NOESTAE	0	0	0
RENTRANT	0	0	0
NOPMSGS	0	0	0
ALTMSGS	1	1	0
SPSHARE	0	1	1
STOREFL	0	0	0
NOLOADDD	0	0	0
NOMSGWTO	0	0	0
NOMSGIO	0	0	0
MASKS
TSOFL_MASK	1	1	1
CMDSOFL_MASK	1	1	0
FUNCSOFL_MASK	1	1	0
NOSTKFL_MASK	1	1	0
NOREADFL_MASK	1	1	0
NOWRTFL_MASK	1	1	0
NEWSTKFL_MASK	1	1	1
USERPKFL_MASK	1	1	0
LOCPKFL_MASK	1	1	0
SYSPKFL_MASK	1	1	0
NEWSCFL_MASK	1	1	0
CLOSEXFL_MASK	1	1	0
NOESTAE_MASK	1	1	0
RENTRANT_MASK	1	1	0
NOPMSGS_MASK	1	1	0
ALTMSGS_MASK	1	1	0
SPSHARE_MASK	1	1	1
STOREFL_MASK	1	1	0
NOLOADDD_MASK	1	1	0
NOMSGWTO_MASK	1	1	0
NOMSGIO_MASK	1	1	0
SUBPOOL	0	78	78
ADDRSPN	MVS	TSO/E	ISPF
---	FFFFFFFFFFFFFFFF	FFFFFFFFFFFFFFFF	FFFFFFFFFFFFFFFF

Table 4. Values TSO/E provides in the field name in the module name table
Field name in module name table	IRXPARMS (MVS)	IRXTSPRM (TSO/E)	IRXISPRM (ISPF)
INDD	SYSTSIN	SYSTSIN
OUTDD	SYSTSPRT	SYSTSPRT
LOADDD	SYSEXEC	SYSEXEC
IOROUT
EXROUT
GETFREER
EXECINIT
ATTNROUT
STACKRT
IRXEXECX
IDROUT
MSGIDRT
EXECTERM
---	FFFFFFFFFFFFFFFF	FFFFFFFFFFFFFFFF	FFFFFFFFFFFFFFFF

Table 5. Values TSO/E provides in the field name in the host command environment table
Field name in host command environment table	IRXPARMS (MVS)	IRXTSPRM (TSO/E)	IRXISPRM (ISPF)
TOTAL	9	11	13
USED	9	11	13
LENGTH	32	32	32
INITIAL	MVS	TSO	TSO
---	FFFFFFFFFFFFFFFF	FFFFFFFFFFFFFFFF	FFFFFFFFFFFFFFFF
Entry 1
NAME	MVS	MVS	MVS
ROUTINE	IRXSTAM	IRXSTAM	IRXSTAM
TOKEN
Entry 2
NAME	LINK	TSO	TSO
ROUTINE	IRXSTAM	IRXSTAM	IRXSTAM
TOKEN
Entry 3
NAME	ATTACH	LINK	LINK
ROUTINE	IRXSTAM	IRXSTAM	IRXSTAM
TOKEN
Entry 4
NAME	CPICOMM	ATTACH	ATTACH
ROUTINE	IRXSTAM	IRXSTAM	IRXSTAM
TOKEN
Entry 5
NAME	LU62	CONSOLE	ISPEXEC
ROUTINE	IRXSTAM	IRXSTAM	IRXSTAM
TOKEN
Entry 6
NAME	LINKMVS	CPICOMM	ISREDIT
ROUTINE	IRXSTAMP	IRXAPPC	IRXSTAM
TOKEN
Entry 7
NAME	LINKPGM	LU62	CONSOLE
ROUTINE	IRXSTAMP	IRXAPPC	IRXSTAM
TOKEN
Entry 8
NAME	ATTCHMVS	LINKMVS	CPICOMM
ROUTINE	IRXSTAMP	IRXSTAMP	IRXAPPC
TOKEN
Entry 9
NAME	ATTCHPGM	LINKPGM	LU62
ROUTINE	IRXSTAMP	IRXSTAMP	IRXAPPC
TOKEN
Entry 10
NAME		ATTCHMVS	LINKMVS
ROUTINE		IRXSTAMP	IRXSTAMP
TOKEN
Entry 11
NAME		ATTCHPGM	LINKPGM
ROUTINE		IRXSTAMP	IRXSTAMP
Entry 12
NAME			ATTCHMVS
ROUTINE			IRXSTAMP
TOKEN
Entry 13
NAME			ATTCHPGM
ROUTINE			IRXSTAMP
TOKEN

Table 6. Values TSO/E provides in the field name in the function package table
Field name in function package table	IRXPARMS (MVS)	IRXTSPRM (TSO/E)	IRXISPRM (ISPF)
USER_TOTAL
USER_USED	1	1	1
LOCAL_TOTAL	1	1	1
LOCAL_USED	1	1	1
SYSTEM_TOTAL	1	2	2
SYSTEM_USED	1	2	2
LENGTH	8	8	8
---	FFFFFFFFFFFFFFFF	FFFFFFFFFFFFFFFF	FFFFFFFFFFFFFFFF
Entry 1
NAME	IRXEFMVS	IRXEFMVS	IRXEFMVS
Entry 2
NAME	IRXFLOC	IRXEFPCK	IRXEFPCK
Entry 3
NAME	IRXFUSER	IRXFLOC	IRXFLOC
Entry 4
NAME		IRXFUSER	IRXFUSER