Use this system macro to:
- Verify that a terminal address (line number, interchange address, and
terminal address (LNIATA)/CPUID) is in the CRAS status table (CR0AT)
- Obtain the LNIATA and CRAS table slot address of:
- A functional support console (FSC)
- An alternate CRAS workstation given an alternate CRAS slot number or
associated printer index.
Format
- label
- A symbolic name can be assigned to the macro statement.
- VERIFY
- Is used to determine if a given LNIATA/CPUID is present in the CRAS
table.
- LOCATE
- Is used to find the CRAS slot address for one of the following:
- A functional support console when given a routing code indicator and a CPU
ID or
- A an alternate CRAS terminal when given an Axx slot number or a printer
index number.
- FSC
- Is used to find the CRAS slot address of a functional support console when
given the routing index located at the beginning of the CRAS table.
Entry Requirements
Return Conditions
- Control is returned to the next sequential instruction (NSI).
- The following output is placed in general register 0:
- For VERIFY option:
- If the LNIATA is not found, R0 will contain zeros.
- If the LNIATA is found, bytes 0-2 of R0 will remain unchanged. Byte
3 of R0 will contain the CPUID used in processing the macro request (unchanged
if a CPUID was supplied on input; CE1CPD if the CPUID was
omitted).
- For the LOCATE and FSC Options:
- R15 will contain the CRAS table slot address.
- The contents of R14 are unknown. The contents of all other
registers are preserved across this macro call.
Programming Considerations
- This macro can be run on any I-stream.
- The CRATC macro expands to a fast link macro for E-type segments; it
expands to a BASSM for C-type segments.
- This macro requires 6 bytes of storage when issued by a E-type segment and
10 bytes of storage when issued by a C-type segment.
- The CRATC macro should not be issued from a C-type segment, which is
interruptible.
- General register 9 (R9) must contain the address of the ECB before
processing the macro.
- General register 0 (R0) is used for all input and output for this
macro.
- If a successful search is completed, general register 15 (R15) will
contain the storage address of the CRAS table slot.
Examples
Reference macro RTCEQ for the functional support console
definitions.
Bit
| Console Type
| Label
|
0
| RO
| RTCDRO
|
1
| PRC
| RTCDPRC
|
2
| TAPE
| RTCDTA
|
3
| DASD
| RTCDDA
|
4
| COMM
| RTCDCOM
|
5
| AUDIT
| RTCDAUD
|
6
| TPFAR
| RTCDRDB
|
7-15
|
| Reserved for Use by IBM
|
Usage examples: