
{  DECK: CMT$ESM_DEFINITION

    TYPE
      cmt$esm_definition = record
        element_name: cmt$element_name,
        product_id: cmt$product_identification,
        serial_number: cmt$serial_number,
        peripheral_driver_name: pmt$program_name,
        low_speed_port: array [1 .. cmc$max_low_speed_port_number] OF cmt$upline_connection,
        side_door_port: array [1 .. cmc$max_side_door_port_number] OF cmt$upline_connection,
        memory_size: cmt$esm_memory_size,
        maintenance_buffer_location: cmt$esm_maintenance_buffer_loc,
      recend;

    TYPE
      cmt$esm_maintenance_buffer_loc = record
        first_word_address: 0 .. cmc$max_esm_size,
        length: integer,
      recend;

    TYPE
      cmt$esm_memory_size = 0 .. cmc$max_esm_size;

    CONST
      cmc$max_low_speed_port_number = 12,
      cmc$max_side_door_port_number = 2;

*copyc cmc$maximum_esm_size
*copyc cmt$element_name
*copyc cmt$product_identification
*copyc cmt$serial_number
*copyc cmt$upline_connection
*copyc pmt$program_name

