
  TYPE
    stt$volume_activity_descriptor = record
      case volume_activity_status: stt$vol_activity_status of
      = stc$active =
        avt_index: dmt$active_volume_table_index,
      = stc$inactive =
        ,
      casend,
    recend;

*copyc dmt$active_volume_table_index
*copyc stt$vol_activity_status
