

  TYPE
    rmt$volume_descriptor = record
      recorded_vsn: rmt$recorded_vsn,
      external_vsn: rmt$external_vsn,
    recend;

*copyc rmt$external_vsn
*copyc rmt$recorded_vsn
