diff options
Diffstat (limited to 'FS')
| -rw-r--r-- | FS/FS/cust_main/Billing.pm | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/FS/FS/cust_main/Billing.pm b/FS/FS/cust_main/Billing.pm index bab94c31d..85cafd62c 100644 --- a/FS/FS/cust_main/Billing.pm +++ b/FS/FS/cust_main/Billing.pm @@ -1227,6 +1227,8 @@ sub _handle_taxes { $taxhash{'taxclass'} = $part_pkg->taxclass; + warn "taxhash:\n". Dumper(\%taxhash) if $DEBUG > 2; + my @taxes = (); # entries are cust_main_county objects my %taxhash_elim = %taxhash; my @elim = qw( district city county state ); @@ -1246,10 +1248,12 @@ sub _handle_taxes { } while ( !scalar(@taxes) && scalar(@elim) ); - @taxes = grep { ! $_->taxname or ! $self->tax_exemption($_->taxname) } + @taxes = grep { ! $_->taxname || ! $self->tax_exemption($_->taxname) } @taxes if $self->cust_main_exemption; #just to be safe + warn "using taxes:\n". Dumper(@taxes) if $DEBUG > 2; + # all packages now have a locationnum and should get a # cust_bill_pkg_tax_location record. The tax_locationnum # may be the package's locationnum, or the customer's bill |