gtpi1m33 | System Installation Support Reference |
The database reorganization (DBR) user exit (UBDB) is activated by the DBR
initialization program BDBF after BDBF completes the initialization of the DBR
keypoints for one subsystem user. The DBR user exit enables users to
complete any further initialization of the DBR keypoints for a particular
subsystem user.
Input
- D0
- DCTBPK parameter list
- D1
- Output message block for BDBN
- D2
- DBR master keypoint
- D3
- IDSFCZ parameter block (used by ZDBSO INIT and ZDBRO INIT triplet
messages)
- D4
- Record types not to be captured by DBR
- D5
- DBR exception record (for the last record type in the system)
- D6
- ESFAC core block (used by ZDBSO INIT and ZDBRO INIT triplet messages)
- EBW000-EBW015
- Subsystem user IDs for each subsystem user entered with the ZDBSO INIT
SSU1/SSU2... message
- EBW060-EBW063
- Number of subsystem user keypoints initialized with the ZDBSO INIT
SSU1/SSU2... message
- EBW064-EBW067
- Number of subsystem users entered with the ZDBSO INIT SSU1/SSU2...
message
- EBW074
- Type of IPL (X'04' = IPL from general file)
- EBW088-EBW089
- Number of processors generated in the system
- EBW092
- Processor ordinal number entered with the ZDBRO INIT triplet message
- EBW096
- Hexadecimal value for the I-stream entered with the ZDBRO INIT triplet
message
- EBX000-EBX009
- Input message (first two tokens)
- EBX060-EBX063
- Number of subsystem users to be processed by the ZDBSO INIT message
- EBX064-EBX067
- Pointer to the current subsystem user table entry (used by ZDBSO INIT
message)
- EBXSW0
- FINWC switch - X'80'
- EBXSW2
- First subsystem user's DBR keypoints initialized -
X'04' (used by the ZDBSO INIT message)
- EBXSW3
- ZDBSO switch - X'80'
- EBXSW4
- BYPASS=YES option entered - X'80'
- EBXSW4
- ZDBSO INIT SSU1/SSU2... message entered - X'40'
- EBXSW4
- ZDBRO INIT triplet message entered - X'20'
- EBXSW5
- First triplet combination for the ZDBSO INIT message processed -
X'FF'
Programming Considerations
- Data levels 3, 4, 5, and 6 can be used, but CRUSA macros must be issued
for each of the data levels that is to be used by UBDB.
- Data levels 0, 1, and 2 must not be used.
- ECB work area fields and switches specified previously must not
be used by UBDB.
References
TPF Database Reference.