[freeside-commits] freeside/FS/FS pkg_class.pm, 1.4, 1.5 Schema.pm, 1.310, 1.311

[Erik Levinson]

Update of /home/cvs/cvsroot/freeside/FS/FS
In directory wavetail.420.am:/tmp/cvs-serv28813/FS/FS

Modified Files:
	pkg_class.pm Schema.pm 
Log Message:
add optional fcc_ds0s to pkg_class, RT13057

Index: Schema.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/Schema.pm,v
retrieving revision 1.310
retrieving revision 1.311
diff -u -w -d -r1.310 -r1.311
--- Schema.pm	22 Jun 2011 17:01:44 -0000	1.310
+++ Schema.pm	23 Jun 2011 01:55:51 -0000	1.311
@@ -2780,6 +2780,7 @@
         'classname',   'varchar',  '', $char_d, '', '', 
         'categorynum', 'int',  'NULL',      '', '', '', 
         'disabled',    'char', 'NULL',       1, '', '', 
+        'fcc_ds0s',      'int',     'NULL', '', '', '', 
       ],
       'primary_key' => 'classnum',
       'unique' => [],

Index: pkg_class.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/pkg_class.pm,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -w -d -r1.4 -r1.5
--- pkg_class.pm	29 Oct 2009 01:08:32 -0000	1.4
+++ pkg_class.pm	23 Jun 2011 01:55:51 -0000	1.5
@@ -49,6 +49,8 @@
 
 Disabled flag, empty or 'Y'
 
+=item fcc_ds0s - Optional DS0 equivalency number for FCC form 477
+
 =back
 
 =head1 METHODS
@@ -65,6 +67,16 @@
 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