diff options
| author | levinse <levinse> | 2011-06-05 16:31:18 +0000 | 
|---|---|---|
| committer | levinse <levinse> | 2011-06-05 16:31:18 +0000 | 
| commit | fe701f764318c657a15e1e0720f4766aaaa63e8f (patch) | |
| tree | 1b28082d3f0a3ec97271a59a9874a0a40036efe5 | |
| parent | 5e1f39e15ecc20adfafddcae758cbf5764c71ca7 (diff) | |
sqlradacct_hour.pm: don't truncate per byte/hour overage charges at 2 decimal places
| -rw-r--r-- | FS/FS/part_pkg/sqlradacct_hour.pm | 8 | 
1 files changed, 4 insertions, 4 deletions
diff --git a/FS/FS/part_pkg/sqlradacct_hour.pm b/FS/FS/part_pkg/sqlradacct_hour.pm index 1c198a1c2..a2b64c740 100644 --- a/FS/FS/part_pkg/sqlradacct_hour.pm +++ b/FS/FS/part_pkg/sqlradacct_hour.pm @@ -106,25 +106,25 @@ sub calc_recur {    $output = 0 if $output < 0;    my $totalcharge = -    $total  * sprintf('%.2f', $self->option('recur_total_charge')); +     sprintf('%.2f', $total * $self->option('recur_total_charge'));    $totalcharge = $self->option('recur_total_cap')      if $self->option('recur_total_cap')      && $totalcharge > $self->option('recur_total_cap');    my $inputcharge = -    $input  * sprintf('%.2f', $self->option('recur_input_charge')); +     sprintf('%.2f', $input * $self->option('recur_input_charge'));    $inputcharge = $self->option('recur_input_cap')      if $self->option('recur_input_cap')      && $inputcharge > $self->option('recur_input_cap');    my $outputcharge =  -    $output * sprintf('%.2f', $self->option('recur_output_charge')); +    sprintf('%.2f', $output * $self->option('recur_output_charge'));    $outputcharge = $self->option('recur_output_cap')      if $self->option('recur_output_cap')      && $outputcharge > $self->option('recur_output_cap');    my $hourscharge = -    $hours * sprintf('%.2f', $self->option('recur_hourly_charge')); +    sprintf('%.2f', $hours * $self->option('recur_hourly_charge'));    $hourscharge = $self->option('recur_hourly_cap')      if $self->option('recur_hourly_cap')      && $hourscharge > $self->option('recur_hourly_cap');  | 
