gtpi1m3y | System Installation Support Reference |
The message router exit, COBC, is called by COA4 before routing the message
to the application.
This user exit can be used in the following ways:
- The text of the message on data level 0 can be altered.
- The destination of the message can be changed by altering the destination
field in the RCPL.
- Additional information can be passed to the destination application by
changing the RCPL to the expanded format and adding the general data
area.
- By inspecting R5 and changing its contents, it is possible to force an
I-stream.
Input
- R5
- Destination I-stream number
- D0
- Input message in AM0SG format
- D1
- Reserved
- D2
- Reserved
- D3
- Reserved
- EBW000-EBWXXX
- The RCPL of the destination message (the length depends on whether it is
an expanded RCPL and the size of the general data area).
- EBX064-EBX103
- Reserved
- EBROUT
- Reserved
- CE1DBI
- Database ID of the basic subsystem
- CE1PBI
- Program base ID of the basic subsystem
- CE1SSU
- Subsystem user ID of the basic subsystem
- CE1ISN
- Reserved.
Programming Considerations
- Data level 0 should still contain the input message on return to
COA4. Data level 1 through 3 must not be altered. All other
levels must not be holding any core blocks.
- COBC is a dynamic exit and is only called when SYSTC switch SBCOMXT is set
on.
- During the system installation process, 'COMMEXIT=YES' on the
MSGRT macro must be coded to set SBCOMXT on.