
  TYPE
    dmt$assigned_ms_vol_attributes = array [1 .. * ] of
          dmt$assigned_ms_vol_attribute,

    dmt$assigned_ms_volume_keywords = (dmc$avt_index,
          dmc$ms_device_allocation_table, dmc$ms_recorded_vsn,
          dmc$ms_device_log, dmc$ms_internal_vsn, dmc$ms_mainframe_assigned,
          dmc$ms_volume_directory, dmc$ms_volume_owner,
          dmc$ms_device_file_list_table, dmc$ms_volume_login_table,
          dmc$ms_allocation_allowed, dmc$ms_current_log_position,
          dmc$ms_allocated_log_size, dmc$ms_device_log_entry_count,
          dmc$ms_volume_unavailable),

    dmt$assigned_ms_vol_attribute = record
      case keyword: dmt$assigned_ms_volume_keywords of

      = dmc$avt_index =
        index: dmt$active_volume_table_index,

      = dmc$ms_allocation_allowed =
        allocation_allowed: boolean,

      = dmc$ms_current_log_position =
        current_log_position: integer,

      = dmc$ms_device_allocation_table =
        p_dat: gft$system_file_identifier,

      = dmc$ms_device_log_entry_count =
        device_log_entry_count: integer,

      = dmc$ms_recorded_vsn =
        recorded_vsn: rmt$recorded_vsn,

      = dmc$ms_internal_vsn =
        internal_vsn: dmt$internal_vsn,

      = dmc$ms_device_log =
        p_dlog: gft$system_file_identifier,

      = dmc$ms_allocated_log_size =
        allocated_log_size: amt$file_byte_address,

      = dmc$ms_mainframe_assigned =
        mainframe_assigned: dmt$mainframe_assigned,

      = dmc$ms_volume_directory =
        directory_sfid: gft$system_file_identifier,

      = dmc$ms_volume_owner =
        volume_owner: ost$user_identification,

      = dmc$ms_device_file_list_table =
        p_dflt: gft$system_file_identifier,

      = dmc$ms_volume_login_table =
        p_vlgt: gft$system_file_identifier,

      = dmc$ms_volume_unavailable =
        volume_unavailable: boolean,

      casend,
    recend;

*copyc rmd$volume_declarations
*copyc amt$file_byte_address
*copyc dmt$active_volume_table_index
*copyc dmt$internal_vsn
*copyc dmt$mainframe_assigned
*copyc gft$system_file_identifier
*copyc ost$user_identification
