X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2Fpkg_class.pm;h=8132dd514b06cc95c20e8bff0770b246fe35b4bf;hb=4de19e4303d8d692fb772b0a332be325bab50db3;hp=51d0455a546520be0bb3a46622086576187f38ec;hpb=8dce92bbb74580a86dcbf2ee47dbf6d143e16177;p=freeside.git

diff --git a/FS/FS/pkg_class.pm b/FS/FS/pkg_class.pm
index 51d0455a5..8132dd514 100644
--- a/FS/FS/pkg_class.pm
+++ b/FS/FS/pkg_class.pm
@@ -49,6 +49,8 @@ Number of associated pkg_category (see L<FS::pkg_category>)
 
 Disabled flag, empty or 'Y'
 
+=item fcc_ds0s - Optional DS0 equivalency number for FCC form 477
+
 =back
 
 =head1 METHODS
@@ -65,6 +67,16 @@ L<"insert">.
 sub table { 'pkg_class'; }
 sub _target_table { 'part_pkg'; }
 
+sub check {
+    my $self = shift;
+    my $error = $self->ut_numbern('fcc_ds0s')
+        || $self->SUPER::check
+    ;
+    return $error if $error;
+
+    '';
+}
+
 =item insert
 
 Adds this package class to the database.  If there is an error, returns the