  TYPE

    nat$channel_device_statistics = ^array [1 .. * ] of
          nat$channel_device_statistic,

    nat$channel_device_statistic = record
      network_id: nat$network_identifier,
      credit_pdus_received: ALIGNED [0 MOD 8] integer,
      credit_pdus_sent: integer,
      current_normal_connections: integer,                { Normal OSI connections.
      current_priority_connections: integer,              { Priority OSI connections.
      device_resets: integer,
      duplicate_connect_indications: integer,
      normal_send_pdus_queued: integer,                   { Queued on cc connections.
      pdus_processed_out_of_order: integer,
      priority_receive: osi_receive_pdu,
      priority_receive_expedited_pdus: integer,
      priority_receive_pdus_discarded: integer,
      priority_send: osi_send_pdu,
      priority_send_expedited_pdus: integer,
      priority_send_pdus_discarded: integer,
      priority_send_pdus_queued: integer,                 { Queued on cc connections.
      receive: osi_receive_pdu,
      receive_pdus_discarded: integer,
      received_expedited_pdus: integer,
      send: osi_send_pdu,
      send_expedited_pdus: integer,
      send_pdus_discarded: integer,
    recend,

    osi_receive_pdu = record
      case boolean of
      = TRUE =
        pdu_average: 0 .. 0ffffffff(16),
        pdu_total: 0 .. 0ffffffff(16),
      = FALSE =
        value: integer,
      casend,
    recend,

    osi_send_pdu = record
      case boolean of
      = TRUE =
        pdu_average: 0 .. 0ffffffff(16),
        pdu_total: 0 .. 0ffffffff(16),
      = FALSE =
        value: integer,
      casend,
    recend;

*copyc nat$network_address
