add skip_dcontext_suffix to skip CDRs with dcontext ending in a definable string...

[freeside.git] / FS / FS / cdr_cust_pkg_usage.pm

diff --git a/FS/FS/cdr_cust_pkg_usage.pm b/FS/FS/cdr_cust_pkg_usage.pm
index 6ef7f2d..5d68d66 100644 (file)
--- a/FS/FS/cdr_cust_pkg_usage.pm
+++ b/FS/FS/cdr_cust_pkg_usage.pm
@@ -1,8 +1,7 @@
 package FS::cdr_cust_pkg_usage;
+use base qw( FS::Record );
 
 use strict;
-use base qw( FS::Record );
-use FS::Record qw( qsearch qsearchs );
 
 =head1 NAME
 
@@ -87,7 +86,7 @@ sub check {
     $self->ut_numbern('cdrusagenum')
     || $self->ut_foreign_key('acctid', 'cdr', 'acctid')
     || $self->ut_foreign_key('pkgusagenum', 'cust_pkg_usage', 'pkgusagenum')
-    || $self->ut_number('minutes')
+    || $self->ut_float('minutes')
   ;
   return $error if $error;
 
@@ -102,16 +101,6 @@ Returns the L<FS::cust_pkg_usage> object that this usage allocation came from.
 
 Returns the L<FS::cdr> object that the usage was applied to.
 
-=cut
-
-sub cust_pkg_usage {
-  FS::cust_pkg_usage->by_key($_[0]->pkgusagenum);
-}
-
-sub cdr {
-  FS::cdr->by_key($_[0]->acctid);
-}
-
 =back
 
 =head1 SEE ALSO