This invocation of CELQPIPI adds an entry for the environment represented by token in the Language Environment-maintained table. If a routine entry address is not provided, the routine name is used to dynamically load the routine and add it to the PreInit table. The PreInit table index for the new entry is returned to the calling routine.

Syntax

>>-CALL--CELQPIPI--(--add_entry--,--token--,--routine_name--,--->

>--routine_entry--,--ceexptbl_index--)-------------------------><

add_entry (input)

A fullword function code (integer value = 6) containing the add_entry request.

token (input)

A doubleword with the value of the token associated with the environment that adds this new routine. This token is returned by a CELQPIPI(init_main), or CELQPIPI(init_sub) request.

The token must identify a previously preinitialized environment that is dormant at the time of the call.

routine_name (input)

A character string of length 8, left-justified and padded right with blanks, containing the name of the routine. To indicate the absence of the name, this field should be blank. If routine_entry is zero, this is used as the load name.

routine_entry (input/output)

The routine entry address that is added to the PreInit table. If routine_entry is zero on input, routine_name is used as the load name. On output, routine_entry is set to the load address of routine_name.

ceexptbl_index (output)

The doubleword index to the PreInit table where this routine was added. If the return code is nonzero, this value is indeterminate. The index starts at zero.