
{  Define types and constants for dedicated fault tolerance (DFT) buffer
{  that are used on the 170 side (cybil_cc).

  CONST
    dsc$db_fixed_length = 6 * 8,

{  Define length of mainframe element counters buffer, both NOS and NOS/BE
{  must use the same value.

    dsc$db_mainframe_element_l = 10 * 8;

  TYPE
    dst$dft_control_word = PACKED RECORD
      po: 0 .. 0f(16),
      seq_num: 0 .. 0ff(16),
      rl: 0 .. 0ff(16),
      pp: 0 .. 0ff(16),
      lbuf: 0 .. 0ff(16),
      nbuf: 0 .. 0ff(16),
      flags: 0 .. 0ffff(16),
    RECEND,

    r_register_format = PACKED RECORD
      offset: 0 .. 0fff(16),
      r_upper: 0 .. 0ffff(16),
      r_lower: 0 .. 0ffff(16),
      length: 0 .. 0ffff(16),
    RECEND;
