
  TYPE
    amt$find_record_space = record
      space: amt$file_length,
      where: amt$put_locality,
      wait: ost$wait,
    recend;

*copyc amt$file_length
*copyc amt$put_locality
*copyc ost$wait
