From: jeff Date: Thu, 24 Jun 2010 08:18:21 +0000 (+0000) Subject: get section subtotalling right X-Git-Tag: root_of_svc_elec_features~121 X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=commitdiff_plain;h=368a18b893fef80720277b12342ca6d178a9fd31 get section subtotalling right --- diff --git a/FS/FS/cust_bill.pm b/FS/FS/cust_bill.pm index 8c81d0cf4..cefbfac81 100644 --- a/FS/FS/cust_bill.pm +++ b/FS/FS/cust_bill.pm @@ -2621,6 +2621,12 @@ sub print_generic { foreach my $section (@sections, @$late_sections) { + # begin some normalization + $section->{'subtotal'} = $section->{'amount'} + if $multisection + && !exists($section->{subtotal}) + && exists($section->{amount}); + $invoice_data{finance_amount} = sprintf('%.2f', $section->{'subtotal'} ) if ( $invoice_data{finance_section} && $section->{'description'} eq $invoice_data{finance_section} ); @@ -2629,7 +2635,7 @@ sub print_generic { sprintf('%.2f', $section->{'subtotal'}) if $multisection; - # begin some normalization + # continue some normalization $section->{'amount'} = $section->{'subtotal'} if $multisection;