gtpi1m2z | System Installation Support Reference |
This exit routine, UCS1, is activated by communications source programs
before normal processing but not if entered after processing by other
communications source programs (that is, only one exit per input
message). This exit can be used to examine the input message
origin.
Input
- R0
- Contains CIAA to show activation from CIAA
- R1
- Pointer to input message block.
- R4
- Address of the WGTA entry for the message origin
- D0
- Message block in communication message format
- D1
- The AAA record, if in use
- D3
- The RCB record, if in use
- EBW042
- Set to X'08' if the input was from a 3270, otherwise set to
X'00'.
Input
- R0
- Contains CITT to show activation from CITT
- R1
- Pointer to input message block
- R2
- Pointer to RVT1 entry
- R3
- Pointer to RVT2 entry
- D0
- Message block in communication message format
- EBW000
- Input RCPL.
Programming Considerations
- UCS1 is a dynamic exit and is only called when SYSTC switch SBUCS1 is set
on.
- UCS1 is shipped as a BACKC stub.
- Communications Source programs (CIAA and CITT) enter UCS1 with return
expected.
- Communications Source program CINN, for local 3270s, completes its
processing in CIAA and, therefore, activates UCS1 through CIAA.
- The input block, from CIAA, will include an input message (assembled) or
answerback.