gtpi1m3i | System Installation Support Reference |
The FIND_CY2KT user exit, UPX6, performs accounting or utility functions
when the TPF system retrieves a pool section keypoint table (CY2KT).
The FIND_CY2KT user exit also provides a mechanism that allows you to
supply your own function to convert CY2KT from its current format to 32-way
loosely coupled pool support format or a user-defined format compatible with
32-way loosely coupled pool support format.
The FIND_CY2KT user exit is called by the FIND_CY2KT function from
segment CYH6.
Input
- EBXSW0
- Contains the index of the data level where CY2KT is to be
constructed. The index is in the form of data level 0 (D0) to data
level F (DF). The specified data level is free on entry to the user
exit.
- EBXSW3
- Contains the ordinal of CY2KT to be converted.
Return Values
- R6=0
- Default return code. If this value is returned, CYH6 converts CY2KT
from pool expansion (PXP) format to 32-way loosely coupled pool support
format. Use this return code if you code this user exit and do not
change CY2KT.
- R6=1
- If this value is returned, CYH6 returns to its caller without changing
CY2KT. Use this return code if you code this user exit and your code
converts CY2KT from its current format to 32-way loosely coupled pool support
format or a user-defined format compatible with 32-way loosely coupled pool
support format.
Programming Considerations
- This user exit is called by CYH6 when the conversion mode indicator
(CY1MD32) in CTK9 is PXP or CONVERTING. If the conversion mode
indicator is 32LC or FALLING_BACK, CYH6 does not call this user
exit.
- As shipped by IBM, this user exit issues a BACKC macro to return to the
caller. The data level specified by EBXSW0 is free.
- You can use all data levels and registers if the data levels and registers
are saved before use and restored before returning to the caller.
- If R6=0 on return to CYH6, the data level specified by EBXSW0 must be
free.
- If R6=1 on return to CYH6, the requested CY2KT must be on the data level
specified by EBXSW0 in 32-way loosely coupled pool support format or in a
user-defined format compatible with 32-way loosely coupled pool support
format. CY2KT must appear in the same format it would be in if
retrieved directly from the #CY2KT fixed file record type.
References
See TPF Database Reference for more information
about pool support.