<< LINES .001/.009 ARE RESERVED FOR SYSTEMS INTEGRATION>>               00005000
<<==========================================================>> <<04893>>00010000
<<==========================================================>> <<04893>>00015000
<<=====                                                =====>> <<04893>>00020000
<<=====                  inclrit                       =====>> <<04893>>00025000
<<=====                                                =====>> <<04893>>00030000
<<==========================================================>> <<04893>>00035000
<<==========================================================>> <<04893>>00040000
<<                                                          >> <<04893>>00045000
<< this is the include file for the reply information table.>> <<04893>>00050000
<< the rit is used to store information about processes that>> <<04893>>00055000
<< that are waiting for a reply from the console operator.  >> <<04893>>00060000
<< the information is stored in the following manner:       >> <<04893>>00065000
<<                                                          >> <<04893>>00070000
<< table header:                                            >> <<04893>>00075000
<< consists of 57 words.                                    >> <<04893>>00080000
<< 0) contains the number of entries in the rit.            >> <<04893>>00085000
<< 1) contains the maximum number of entries allowed.       >> <<04893>>00090000
<< 2) points to first open entry space                      >> <<04893>>00095000
<< 3) number of impeded processes                           >> <<04893>>00100000
<< 4-56) pin# of queued processes                           >> <<04893>>00105000
<<                                                          >> <<04893>>00110000
<< entry format:                                            >> <<04893>>00115000
<< consists of 51 words.                                    >> <<04893>>00120000
<< 0) process identification number (pin).                  >> <<04893>>00125000
<< 1) data segment table number (dst #).                    >> <<04893>>00130000
<< 2) buffer address (dst relative).                        >> <<04893>>00135000
<< 3) first byte - max. length of string.                   >> <<04893>>00140000
<< 3) second byte - reply type expected.                    >> <<04893>>00145000
<< 4) not used.                                             >> <<04893>>00150000
<< 5) not used.                                             >> <<04893>>00155000
<< 6) not used.                                             >> <<04893>>00160000
<< 7) number of bytes in message.                           >> <<04893>>00165000
<< (8 - 50) message in ascii.                               >> <<04893>>00170000
<<                                                          >> <<04893>>00175000
<<                                                          >> <<04893>>00180000
<< the modules which use the rit and are affected by this   >> <<04893>>00185000
<< include file are progen (09), message (59), and          >> <<04893>>00190000
<< opcommand (85).  initial (00) builds the rit but does not>> <<04893>>00195000
<< use this include file.  therefore any changes that affect>> <<04893>>00200000
<< the structure of the table must be changed in this file  >> <<04893>>00205000
<< and also in initial.                                     >> <<04893>>00210000
                                                               <<04893>>00215000
define                                                         <<04893>>00220000
                                                               <<04893>>00225000
<< header format >>                                            <<04893>>00230000
  rit'head'ent = 0#,     << current num. of entries in use. >> <<04893>>00235000
  rit'head'maxent = 1#,  << max. number of entries in table.>> <<04893>>00240000
  fiq=4#,                << contains ptr. to first in queue  >><<04893>>00245000
  liq=2#,                << contains ptr. to last in queue   >><<04893>>00250000
  queued'entries=3#,     << current num. of queued entries   >><<04893>>00255000
                                                               <<04893>>00260000
<< entry format >>                                             <<04893>>00265000
  rit'pinnum = 0#,       << pin # waiting for reply.        >> <<04893>>00270000
  rit'dstoffset = 2#,    << offset in dst for reply.        >> <<04893>>00275000
  rit'replylen = 3).(0:8#,  << reply length expected.       >> <<04893>>00280000
  rit'replytype = 3).(8:8#, << reply type expected.         >> <<04893>>00285000
  rit'msglen = 7#,       << offset in entry to msg. length. >> <<04893>>00290000
  rit'msgbase = 8#,      << offset in entry to msg. area.   >> <<04893>>00295000
                                                               <<04893>>00300000
<< overhead >>                                                 <<04893>>00305000
  rit'size = 51#,        << size of rit entry.              >> <<04893>>00310000
  rit'headsize =57#,     << length of rit header.           >> <<04893>>00315000
  rit'replypin =1#,      << pin of process waiting for reply>> <<04893>>00320000
  rit'sir =21#,                                                <<04893>>00325000
  rit'dst = 28#,                                               <<04893>>00330000
  rit'msgsize=(rit'size -rit'msgbase)*2#,<< msg.size in bytes>><<04893>>00335000
  firstentry = 5#,       << first position for entry        >> <<04893>>00340000
  lastentry = 57#,        << last position for entry         >><<04893>>00345000
  max'queued'entries=52#, << size of header alloted to queue >><<04893>>00350000
                                                               <<04893>>00355000
<< possible reply type values >>                               <<04893>>00360000
  replytype'number = 0#, << reply to be a number.           >> <<04893>>00365000
  replytype'yn = 1#,     << reply to be either yes or no.   >> <<04893>>00370000
  replytype'strings = 2#,<< reply to be 1 or 2 strings.     >> <<04893>>00375000
  replytype'yn'num = 3#, << reply to be a yes or no or num. >> <<04893>>00380000
  replytype'onestring=4#;<< reply to be 1 string.           >> <<04893>>00385000
                                                               <<04893>>00390000
<<==========================================================>> <<04893>>00395000
<<==========================================================>> <<04893>>00400000
<<=====                                                =====>> <<04893>>00405000
<<=====               end of inclrit                   =====>> <<04893>>00410000
<<=====                                                =====>> <<04893>>00415000
<<==========================================================>> <<04893>>00420000
<<==========================================================>> <<04893>>00425000
