1 /*        BEGIN INCLUDE FILE gcos_mme_names.incl.pl1  */
  2 
  3 /* Author: MRJordan  July 1977
  4    Change: Dave Ward 06/17/81 mme_table (from gcos_process_mme_.pl1).
  5    Change:  Ron Barstad  83-08-03  Add MMEs 41-44 for 4js3
  6 */
  7 
  8 dcl  MME_NAME                 (44)char(4) aligned static options(constant) init(
  9                               "INOS" /*  1 */
 10 ,                             "ROAD" /*  2 */
 11 ,                             "FADD" /*  3 */
 12 ,                             "RELS" /*  4 */
 13 ,                             "SNAP" /*  5 */
 14 ,                             "LAPS" /*  6 */
 15 ,                             "FINI" /*  7 */
 16 ,                             "BORT" /*  8 */
 17 ,                             "MORE" /*  9 */
 18 ,                             "FCON" /* 10 */
 19 ,                             "FILS" /* 11 */
 20 ,                             "SETS" /* 12 */
 21 ,                             "RETS" /* 13 */
 22 ,                             "ENDC" /* 14 */
 23 ,                             "RELC" /* 15 */
 24 ,                             "SPEC" /* 16 */
 25 ,                             "TIME" /* 17 */
 26 ,                             "CALL" /* 18 */
 27 ,                             "SAVE" /* 19 */
 28 ,                             "RSTR" /* 20 */
 29 ,                             "MREL" /* 21 */
 30 ,                             "SYOT" /* 22 */
 31 ,                             "CHEK" /* 23 */
 32 ,                             "ROUT" /* 24 */
 33 ,                             "ROLL" /* 25 */
 34 ,                             "USER" /* 26 */
 35 ,                             "LOOP" /* 27 */
 36 ,                             "WAKE" /* 28 */
 37 ,                             "IDSE" /* 29 */
 38 ,                             ".EMM" /* 30 */
 39 ,                             "LBAR" /* 31 */
 40 ,                             "FRCE" /* 32 */
 41 ,                             "FSYE" /* 33 */
 42 ,                             "PRIO" /* 34 */
 43 ,                             "NEWS" /* 35 */
 44 ,                             "SNUM" /* 36 */
 45 ,                             "INFO" /* 37 */
 46 ,                             "SECR" /* 38 */
 47 ,                             "XLIT" /* 39 */
 48 ,                             "XXXX" /* 40 */
 49 ,                             "XXXX" /* 41 */
 50 ,                             "XXXX" /* 42 */
 51 ,                             "MODS" /* 43 */
 52 ,                             "MODR" /* 44 */
 53                               );
 54 
 55 /*
 56    The following table contains a "1"b value for each MME that _^Hi_^Hs legal
 57    during a courtesy call.  The table is indexed by mme_number.
 58 */
 59 
 60 
 61 dcl  mme_table                (44) bit(1) aligned internal static options (constant) initial (
 62                               "1"b /*  1 GEINOS */
 63 ,                             "0"b /*  2 GEROAD */
 64 ,                             "0"b /*  3 GEFADD */
 65 ,                             "0"b /*  4 GERELS */
 66 ,                             "0"b /*  5 GESNAP */
 67 ,                             "1"b /*  6 GELAPS */
 68 ,                             "0"b /*  7 GEFINI */
 69 ,                             "0"b /*  8 GEBORT */
 70 ,                             "0"b /*  9 GEMORE */
 71 ,                             "0"b /* 10 GEFCON */
 72 ,                             "0"b /* 11 GEFILS */
 73 ,                             "0"b /* 12 GESETS */
 74 ,                             "0"b /* 13 GERETS */
 75 ,                             "1"b /* 14 GEENDC */
 76 ,                             "0"b /* 15 GERELC */
 77 ,                             "1"b /* 16 GESPEC */
 78 ,                             "1"b /* 17 GETIME */
 79 ,                             "0"b /* 18 GECALL */
 80 ,                             "0"b /* 19 GESAVE */
 81 ,                             "0"b /* 20 GERSTR */
 82 ,                             "0"b /* 21 GEMREL */
 83 ,                             "1"b /* 22 GESYOT */
 84 ,                             "0"b /* 23 GECHEK */
 85 ,                             "1"b /* 24 GEROUT */
 86 ,                             "0"b /* 25 GEROLL */
 87 ,                             "0"b /* 26 GEUSER */
 88 ,                             "1"b /* 27 GELOOP */
 89 ,                             "0"b /* 28 GEWAKE */
 90 ,                             "0"b /* 29 GEIDSE */
 91 ,                             "0"b /* 30 GE.EMM */
 92 ,                             "0"b /* 31 GELBAR */
 93 ,                             "0"b /* 32 GEFRCE */
 94 ,                             "0"b /* 33 GEFSYE */
 95 ,                             "0"b /* 34 GEPRIO */
 96 ,                             "0"b /* 35 GENEWS */
 97 ,                             "1"b /* 36 GESNUM */
 98 ,                             "1"b /* 37 GEINFO */
 99 ,                             "0"b /* 38 GExxxx */
100 ,                             "0"b /* 39 GExxxx */
101 ,                             "0"b /* 40 GExxxx */
102 ,                             "0"b /* 41 GExxxx */
103 ,                             "0"b /* 42 GExxxx */
104 ,                             "0"b /* 43 GMODES */
105 ,                             "0"b /* 44 GMODER */
106      );
107 
108 /*        END INCLUDE FILE gcos_mme_names.incl.pl1          */