
  TYPE
    amt$store_item = record
      case key: amt$file_attribute_keys of
      = amc$error_exit_procedure =
        error_exit_procedure: amt$error_exit_procedure,
      = amc$error_options =
        error_options: amt$tape_error_options,
      = amc$label_exit_procedure =
        label_exit_procedure: amt$label_exit_procedure,
      = amc$label_options =
        label_options: amt$label_options,
      = amc$null_attribute =
        ,
{}
{ The following attributes are only used to describe files which}
{ are accessed with the Advanced Access Method (AAM). The}
{ documentation of the AAM attributes are found in the AAM ERS.}
{}
      = amc$error_limit =
        error_limit: amt$error_limit,
      = amc$message_control =
        message_control: amt$message_control,
      casend,
    recend;

*copyc amt$error_exit_procedure
*copyc amt$error_limit
*copyc amt$file_attribute_keys
*copyc amt$label_exit_procedure
*copyc amt$label_options
*copyc amt$message_control
*copyc amt$tape_error_options
