diff options
author | ivan <ivan> | 2006-03-20 19:13:27 +0000 |
---|---|---|
committer | ivan <ivan> | 2006-03-20 19:13:27 +0000 |
commit | ff24bc786a5fd479f2252260e0da580a736f97be (patch) | |
tree | 6d3496500bebd4f17f754ab79478c53dea1b5daf /FS/FS/rate_detail.pm | |
parent | 96fde39e747fdc5c618b5a92ec354384931cf317 (diff) |
add price plan to bill on internal or external CDRs directly, add option to export CDRs to a per-customer downstream file
Diffstat (limited to 'FS/FS/rate_detail.pm')
-rw-r--r-- | FS/FS/rate_detail.pm | 30 |
1 files changed, 29 insertions, 1 deletions
diff --git a/FS/FS/rate_detail.pm b/FS/FS/rate_detail.pm index 1964be2..6f023f5 100644 --- a/FS/FS/rate_detail.pm +++ b/FS/FS/rate_detail.pm @@ -114,7 +114,11 @@ sub check { || $self->ut_foreign_keyn('orig_regionnum', 'rate_region', 'regionnum' ) || $self->ut_foreign_key('dest_regionnum', 'rate_region', 'regionnum' ) || $self->ut_number('min_included') - || $self->ut_money('min_charge') + + #|| $self->ut_money('min_charge') + #good enough for now... + || $self->ut_float('min_charge') + || $self->ut_number('sec_granularity') ; return $error if $error; @@ -122,6 +126,30 @@ sub check { $self->SUPER::check; } +=item orig_region + +Returns the origination region (see L<FS::rate_region>) associated with this +call plan rate. + +=cut + +sub orig_region { + my $self = shift; + qsearchs('rate_region', { 'regionnum' => $self->orig_regionnum } ); +} + +=item dest_region + +Returns the destination region (see L<FS::rate_region>) associated with this +call plan rate. + +=cut + +sub dest_region { + my $self = shift; + qsearchs('rate_region', { 'regionnum' => $self->dest_regionnum } ); +} + =back =head1 BUGS |