1 
 2 
 3      "BEGIN INCLUDE FILE event_channel_name.incl.alm
 4 
 5 
 6           "Created 08/09/86  1104.1 edt Sat by convert_include_file,
 7           "   Version of 01/09/85  1054.4 edt Wed.
 8 
 9 " HISTORY COMMENTS:
10 "  1) change(86-08-09,Kissel), approve(86-08-12,MCR7479),
11 "     audit(86-10-08,Fawcett), install(86-11-03,MR12.0-1206):
12 "     Converted from event_channel_name.incl.pl1.  The field, encoded_index,
13 "     has been named encoded_idx to get around the ALM length restriction.
14 "                                                      END HISTORY COMMENTS
15 
16 "
17 "         Structure event_channel_name
18 "
19           equ       event_channel_name_size,2
20 
21           equ       event_channel_name.encoded_idx,0 " UPPER
22           equ       event_channel_name.verifier,0 " LOWER
23 
24           equ       event_channel_name.ring_word,1
25           equ       event_channel_name.ring_shift,33
26           bool      event_channel_name.ring_mask,000007
27           equ       event_channel_name.type_word,1
28           bool      event_channel_name.type,040000 " DU
29           equ       event_channel_name.mbz_word,1
30           equ       event_channel_name.mbz_shift,18
31           bool      event_channel_name.mbz_mask,037777
32           equ       event_channel_name.unique_id,1 " LOWER
33 
34           bool      FAST_CHANNEL_TYPE,000000      " DU  MANIFEST
35           bool      REGULAR_CHANNEL_TYPE,400000   " DU  MANIFEST
36           bool      NORMAL_CHANNEL_FLAGS,000000   " DU  MANIFEST
37           bool      SEND_IPS_WKP_CHANNEL_FLAGS,100000 " DU  MANIFEST
38 
39 "
40 "         Structure decoded_index
41 "
42           equ       decoded_index.flags_shift,33
43           bool      decoded_index.flags_mask,000007
44           equ       decoded_index.index_shift,18
45           bool      decoded_index.index_mask,077777
46 
47           equ       ENCODED_INDEX_CONSTANT,262144 " MANIFEST
48 
49      "END INCLUDE FILE event_channel_name.incl.alm