1 02/06/84  cross_ring_io_
 2 
 3 
 4 Entry points in cross_ring_io_:
 5    (List is generated by the help command)
 6 
 7 
 8 :Entry:  allow_cross:  02/06/84 cross_ring_io_$allow_cross
 9 
10 
11 Function: This entry point must be called to allow use of an I/O
12 switch via cross-ring attachments from an outer ring.  The call must
13 be made in the inner ring before the outer ring attempts to attach.
14 
15 
16 Syntax:
17 declare cross_ring_io_$allow_cross entry (char(*), fixed bin,
18      fixed bin(35));
19 call cross_ring_io_$allow_cross (switch_name, ring, code);
20 
21 
22 Arguments:
23 switch_name
24    is the inner ring switch name.  (Input)
25 ring
26    is the highest validation level from which switch_name may be used.
27    (Input)
28 code
29    is a standard status code.  (Output)
30 
31 
32 Notes:  This entry may be called more than once with the same
33 switch_name argument.  Subsequent calls are ignored.