summaryrefslogtreecommitdiff
path: root/FS/FS/rate_detail.pm
diff options
context:
space:
mode:
authorivan <ivan>2006-03-20 19:13:27 +0000
committerivan <ivan>2006-03-20 19:13:27 +0000
commitff24bc786a5fd479f2252260e0da580a736f97be (patch)
tree6d3496500bebd4f17f754ab79478c53dea1b5daf /FS/FS/rate_detail.pm
parent96fde39e747fdc5c618b5a92ec354384931cf317 (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.pm30
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