X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=FS%2FFS%2Fcdr_cust_pkg_usage.pm;h=5d68d668d14f78ad629bdb052c815d038916740d;hp=6ef7f2dea9e92573d96f432462d387a2534c99d5;hb=8d0e8149e7b19ad8543ac6c8c663be63dbc34762;hpb=f3e0ac2b009c4edd5692cb587ff709dac2223ebe diff --git a/FS/FS/cdr_cust_pkg_usage.pm b/FS/FS/cdr_cust_pkg_usage.pm index 6ef7f2dea..5d68d668d 100644 --- 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 object that this usage allocation came from. Returns the L 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