summaryrefslogtreecommitdiff
path: root/FS/FS/cust_class.pm
diff options
context:
space:
mode:
Diffstat (limited to 'FS/FS/cust_class.pm')
-rw-r--r--FS/FS/cust_class.pm15
1 files changed, 15 insertions, 0 deletions
diff --git a/FS/FS/cust_class.pm b/FS/FS/cust_class.pm
index a811be7..7cbc9b8 100644
--- a/FS/FS/cust_class.pm
+++ b/FS/FS/cust_class.pm
@@ -44,6 +44,11 @@ Text name of this customer class
Number of associated cust_category (see L<FS::cust_category>)
+=item tax
+
+Tax exempt flag, empty or 'Y'. Used when the cust_class-tax_exempt
+configuration setting is turned on.
+
=item disabled
Disabled flag, empty or 'Y'
@@ -86,6 +91,16 @@ Checks all fields to make sure this is a valid customer class. If there is
an error, returns the error, otherwise returns false. Called by the insert
and replace methods.
+=cut
+
+sub check {
+ my $self = shift;
+
+ $self->ut_enum('tax', [ '', 'Y' ])
+ || $self->SUPER::check;
+
+}
+
=item cust_category
=item category