CALL CSRPACT (Activate Previously Connected Storage)

The CALL CSRPACT cell pool service is used to activate the extent cell storage for allocation. You must specify which extent you want to activate.

Format

AMODE:: 24 or 31 (System code must be in 31-bit addressing mode when calling the service. All input addresses must be valid 31-bit addresses.)
RMODE:: 24 or ANY
ASC Mode:: Primary or AR (If the anchor and the extents are located in a data space, the caller must be in AR mode.)

cntl_alet: Specifies the variable containing the ALET that identifies the location of the anchor and extents. Initialize the ALET to 0 if your program is running in AR mode and the anchor and extents are in the primary address space. If your program is running in primary ASC mode, the value is ignored, but you must code the parameter anyway.
anchor_addr: Specifies the variable containing the address of the 64-byte anchor.
extent_num: Specifies the variable containing the number of the extent to be connected. The extent number must be within the range 0 to 65,536.
return_code: When CSRPACT completes, the variable specifying return_code contains the return code.

00: The operation was successful.
1C: Program error. The anchor address is not valid.
Action: Check to see if your program passed the wrong anchor address or inadvertently overlaid the anchor area.
30: Program error. The extent number is not valid.
Action: Specify the extent number within the range 1 to 65,536.
34: Program error. The extent is in an incorrect state.
Action: Check to see if your program passed the wrong extent number. Make sure that the extent is not already in an active state (that is, it has not been activated through CSRPACT or CSRPEXP). Also make sure that the extent is not in a disconnected state.
64: Program error or system error. An extent chain was broken.
Action: Check to see if your program inadvertently overlaid an extent area. Make sure that no extent belongs to more than one cell pool.
68: Program error or system error. An extent chain is circular.
Action: Check to see if your program inadvertently overlaid an extent area. Make sure that no extent belongs to more than one cell pool.
6C: Program error or system error. An extent could not be found.
Action: Check to see if your program inadvertently overlaid an extent area. Make sure that the anchor address being passed is for the right cell pool.