+=head2 category_code
+
+my $category_code = $attr_type->category_code();
+$attr_type->category_code($category_code);
+
+Accessor.
+
+=cut
+
+sub category_code {
+ my $self = shift;
+ @_ ? $self->{'category_code'} = shift : $self->{'category_code'};
+}
+
+=head2 category_description
+
+my $category_description = $attr_type->category_description();
+$attr_type->category_description($category_description);
+
+Accessor.
+
+=cut
+
+sub category_description {
+ my $self = shift;
+ @_ ? $self->{'category_description'} = shift : $self->{'category_description'};
+}
+
+=head2 class
+
+my $class = $attr_type->class();
+$attr_type->class($class);
+
+Accessor.
+
+=cut
+
+sub class {
+ my $self = shift;
+ @_ ? $self->{'class'} = shift : $self->{'class'};
+}
+
+