
  TYPE
    avt$field_kind_set = set of avt$field_kind;

*copyc avt$field_kind
