1 /* Begin include file event_channel_name.incl.pl1 */
 2 
 3 /* format: style4 */
 4 
 5 /* Written 1984-11-02 by E. Swenson */
 6 
 7 
 8 /****^  HISTORY COMMENTS:
 9   1) change(86-08-09,Kissel), approve(86-08-12,MCR7479),
10      audit(86-10-08,Fawcett), install(86-11-03,MR12.0-1206):
11      Added constants for the flag values and declared a structure to describe
12      the encoded_index after it is decoded.  This include file has also been
13      converted to ALM for use by pxss.
14                                                    END HISTORY COMMENTS */
15 
16 
17 dcl  1 event_channel_name structure aligned based,
18        2 encoded_index bit (18) unaligned,
19        2 verifier bit (18) unaligned,
20        2 ring fixed bin (3) unsigned unaligned,
21        2 type bit (1) unaligned,                            /* "1"b for regular, "0"b for fast */
22        2 mbz bit (14) unaligned,
23        2 unique_id fixed bin (18) unsigned unaligned;
24 
25 dcl  FAST_CHANNEL_TYPE bit (1) aligned initial ("0"b) internal static options (constant);
26 dcl  REGULAR_CHANNEL_TYPE bit (1) aligned initial ("1"b) internal static options (constant);
27 
28 dcl  NORMAL_CHANNEL_FLAGS bit (3) aligned internal static options (constant) init ("000"b);
29 dcl  SEND_IPS_WKP_CHANNEL_FLAGS bit (3) aligned internal static options (constant) init ("001"b);
30 
31 /* Structure for use after the encoded_index in the event_channel_name has been decoded. */
32 
33 dcl  1 decoded_index structure aligned based,
34        2 flags bit (3) unaligned,
35        2 index fixed bin (15) unsigned unaligned;
36 
37 dcl  ENCODED_INDEX_CONSTANT fixed bin (35) internal static options (constant) init (262144);
38 
39 /* End include file event_channel_name.incl.pl1 */