diff options
author | Ivan Kohler <ivan@freeside.biz> | 2014-05-15 14:59:14 -0700 |
---|---|---|
committer | Ivan Kohler <ivan@freeside.biz> | 2014-05-15 14:59:14 -0700 |
commit | 881215feafc01aeee19864c39f0d98d3d6909e65 (patch) | |
tree | 2b050555839739dfa3ab1180ebd08217c9127096 /FS/FS/rate.pm | |
parent | fb03e9179814686b5c3665ce35b90cfeadb16fb9 (diff) |
agent-virtualize VoIP rates, RT#29183
Diffstat (limited to 'FS/FS/rate.pm')
-rw-r--r-- | FS/FS/rate.pm | 15 |
1 files changed, 11 insertions, 4 deletions
diff --git a/FS/FS/rate.pm b/FS/FS/rate.pm index 4052807..b2348ca 100644 --- a/FS/FS/rate.pm +++ b/FS/FS/rate.pm @@ -4,6 +4,7 @@ use base qw(FS::Record); use strict; use vars qw( $DEBUG ); use FS::Record qw( qsearch qsearchs dbh fields ); +#use FS::agent; #causes a weird dep loop in freeside-cdrrated, only needed for v3-style manual FK-checking, so, probably not bother use FS::rate_detail; $DEBUG = 0; @@ -34,10 +35,18 @@ FS::Record. The following fields are currently supported: =over 4 -=item ratenum - primary key +=item ratenum + +primary key =item ratename +Rate name + +=item agentnum + +Optional agent (see L<FS::agent>) for agent-virtualized rates. + =back =head1 METHODS @@ -253,15 +262,13 @@ and replace methods. =cut -# the check method should currently be supplied - FS::Record contains some -# data checking routines - sub check { my $self = shift; my $error = $self->ut_numbern('ratenum') || $self->ut_text('ratename') + #|| $self->ut_foreign_keyn('agentnum', 'agent', 'agentnum') ; return $error if $error; |