
  TYPE
    avt$validation_record_info = record
      record_id: ost$name,
      work_area: amt$segment_pointer,
      key: avt$validation_key,
      description_record_name: ost$name,
      data_record: ^avt$template_file_record,
      description_record: ^avt$template_file_record,
      record_utility_information: ^avt$utility_information,
      caller_authority: avt$validation_authority,
      field_value_list: avt$field_value_list,
      backward: ^avt$validation_record_info,
      forward: ^avt$validation_record_info,
    recend;

*copyc amt$segment_pointer
*copyc avt$field_value_list
*copyc avt$utility_information
*copyc avt$template_file_record
*copyc avt$validation_key
*copyc ost$name
