summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorivan <ivan>2008-03-26 03:04:34 +0000
committerivan <ivan>2008-03-26 03:04:34 +0000
commit1944cee570d56d2fae579da4ea54ee28fee051a1 (patch)
tree328686555c9554c851e5331142e90e26e11b01a2
parent96704cdedc2350daaeb6945efe6a0697eee3d643 (diff)
don't granular-ize 0 billsec calls into having a minimum charge
-rw-r--r--FS/FS/part_pkg/voip_cdr.pm5
1 files changed, 3 insertions, 2 deletions
diff --git a/FS/FS/part_pkg/voip_cdr.pm b/FS/FS/part_pkg/voip_cdr.pm
index ea160315b..72ef55ff0 100644
--- a/FS/FS/part_pkg/voip_cdr.pm
+++ b/FS/FS/part_pkg/voip_cdr.pm
@@ -278,9 +278,10 @@ sub calc_recur {
unless exists $included_min{$regionnum};
my $granularity = $rate_detail->sec_granularity;
- my $seconds = $cdr->billsec; # |ength($cdr->billsec) ? $cdr->billsec : $cdr->duration;
+ my $seconds = $cdr->billsec; # length($cdr->billsec) ? $cdr->billsec : $cdr->duration;
$seconds += $granularity - ( $seconds % $granularity )
- if $granularity; # 0 is per call
+ if $seconds # don't granular-ize 0 billsec calls (bills them)
+ && $granularity; # 0 is per call
my $minutes = sprintf("%.1f", $seconds / 60);
$minutes =~ s/\.0$// if $granularity == 60;