X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=FS%2FFS%2Fpart_pkg%2Fvoip_cdr.pm;h=420026dcb51abc89e06158969fe748589d41a36b;hp=50ae0af7cc959db0314d4eb10df1e532589d8cff;hb=29ed5abdfcc723bf8a3c29a0ae71775a07477033;hpb=17956978685bcc30c8532c94b89b4d481d337c4e diff --git a/FS/FS/part_pkg/voip_cdr.pm b/FS/FS/part_pkg/voip_cdr.pm index 50ae0af7c..420026dcb 100644 --- a/FS/FS/part_pkg/voip_cdr.pm +++ b/FS/FS/part_pkg/voip_cdr.pm @@ -325,7 +325,8 @@ tie my %accountcode_tollfree_field, 'Tie::IxHash', cdr_svc_method rating_method rounding ratenum intrastate_ratenum calls_included - min_charge min_included sec_granularity + min_charge min_included + sec_granularity ignore_unrateable default_prefix disable_src @@ -401,10 +402,11 @@ sub calc_usage { my $charges = 0; - my $included_min = $self->option('min_included', 1) || 0; + my $included_min_total = ($self->option('min_included', 1) || 0) + * ($cust_pkg->quantity || 1); #single price rating #or region group - $included_min *= ($cust_pkg->quantity || 1); + my $included_min_left = $included_min_total; my $included_calls = $self->option('calls_included', 1) || 0; $included_calls *= ($cust_pkg->quantity || 1); @@ -500,7 +502,7 @@ sub calc_usage { 'part_pkg' => $self, 'cust_pkg' => $cust_pkg, 'svcnum' => $svc_x->svcnum, - 'plan_included_min' => \$included_min, + 'plan_included_min' => \$included_min_left, 'detail_included_min_hashref' => \%detail_included_min, ); die $error if $error; #?? @@ -541,6 +543,15 @@ sub calc_usage { $formatter->finish; #writes into $details unshift @$details, $formatter->header if @$details; + if ( $included_min_total > 0 ) { + + my $min_detail = sprintf('%d / %d ', + $included_min_total - $included_min_left, + $included_min_total + ) . $cust_pkg->mt('included minutes used'); + unshift @$details, $min_detail; + } + $charges; }