diff options
-rw-r--r-- | FS/FS/tax_rate.pm | 23 | ||||
-rwxr-xr-x | httemplate/search/report_newtax.cgi | 19 |
2 files changed, 24 insertions, 18 deletions
diff --git a/FS/FS/tax_rate.pm b/FS/FS/tax_rate.pm index 12cdc4ff3..c0e8c890e 100644 --- a/FS/FS/tax_rate.pm +++ b/FS/FS/tax_rate.pm @@ -1892,10 +1892,15 @@ sub generate_liability_report { $taxes{$label}->{'url_param'} = join(';', map { "$_=". uri_escape($t->$_) } @params); - my $taxwhere = "FROM cust_bill_pkg $addl_from $where AND payby != 'COMP' ". - "AND ". FS::tax_rate_location->location_sql( map { $_ => $t->$_ } - @taxparams - ); + my $payby_itemdesc_loc = + " payby != 'COMP' ". + "AND itemdesc = ? OR ? = '' AND itemdesc IS NULL ". + "AND ". FS::tax_rate_location->location_sql( map { $_ => $t->$_ } + @taxparams + ); + + my $taxwhere = + "FROM cust_bill_pkg $addl_from $where AND $payby_itemdesc_loc"; my $sql = "SELECT SUM(amount) $taxwhere AND cust_bill_pkg.pkgnum = 0"; @@ -1903,12 +1908,10 @@ sub generate_liability_report { $tax += $x; $taxes{$label}->{'tax'} += $x; - my $creditfrom = " JOIN cust_credit_bill_pkg USING (billpkgnum,billpkgtaxratelocationnum) "; - my $creditwhere = "FROM cust_bill_pkg $addl_from $creditfrom $where ". - "AND payby != 'COMP' ". - "AND ". FS::tax_rate_location->location_sql( map { $_ => $t->$_ } - @taxparams - ); + my $creditfrom = + "JOIN cust_credit_bill_pkg USING (billpkgnum,billpkgtaxratelocationnum)"; + my $creditwhere = + "FROM cust_bill_pkg $addl_from $creditfrom $where $payby_itemdesc_loc"; $sql = "SELECT SUM(cust_credit_bill_pkg.amount) ". " $creditwhere AND cust_bill_pkg.pkgnum = 0"; diff --git a/httemplate/search/report_newtax.cgi b/httemplate/search/report_newtax.cgi index ade33c75b..b5371a642 100755 --- a/httemplate/search/report_newtax.cgi +++ b/httemplate/search/report_newtax.cgi @@ -119,23 +119,26 @@ foreach my $t (qsearch({ table => 'cust_bill_pkg', $taxes{$label}->{'url_param'} = join(';', map { "$_=". uri_escape($t->$_) } @params); - my $taxwhere = "FROM cust_bill_pkg $addl_from $where AND payby != 'COMP' ". + my $payby_itemdesc_loc = + " payby != 'COMP' ". + "AND itemdesc = ? OR ? = '' AND itemdesc IS NULL ". "AND ". FS::tax_rate_location->location_sql( map { $_ => $t->$_ } @taxparams ); + my $taxwhere = + "FROM cust_bill_pkg $addl_from $where AND $payby_itemdesc_loc"; + my $sql = "SELECT SUM(amount) $taxwhere AND cust_bill_pkg.pkgnum = 0"; - my $x = scalar_sql($t, [], $sql ); + my $x = scalar_sql($t, [ $itemdesc, $itemdesc ], $sql ); $tax += $x; $taxes{$label}->{'tax'} += $x; - my $creditfrom = " JOIN cust_credit_bill_pkg USING (billpkgnum,billpkgtaxratelocationnum) "; - my $creditwhere = "FROM cust_bill_pkg $addl_from $creditfrom $where ". - "AND payby != 'COMP' ". - "AND ". FS::tax_rate_location->location_sql( map { $_ => $t->$_ } - @taxparams - ); + my $creditfrom = + "JOIN cust_credit_bill_pkg USING (billpkgnum,billpkgtaxratelocationnum)"; + my $creditwhere = + "FROM cust_bill_pkg $addl_from $creditfrom $where $payby_itemdesc_loc"; $sql = "SELECT SUM(cust_credit_bill_pkg.amount) ". " $creditwhere AND cust_bill_pkg.pkgnum = 0"; |