X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=FS%2FFS%2Fcust_main%2FBilling.pm;h=37eae8c7158dececba938c471187356b43729f44;hp=3ebc87da3ed5906f1bd2c7ad5e81d1bcc8c3d9db;hb=197c503fbe112896332e9ca5f17c9c5a2ea4bb87;hpb=343befcb41d5ab76173645ceb8ac235ca7b92d35 diff --git a/FS/FS/cust_main/Billing.pm b/FS/FS/cust_main/Billing.pm index 3ebc87da3..37eae8c71 100644 --- a/FS/FS/cust_main/Billing.pm +++ b/FS/FS/cust_main/Billing.pm @@ -3,6 +3,7 @@ package FS::cust_main::Billing; use strict; use vars qw( $conf $DEBUG $me ); use Carp; +use Data::Dumper; use List::Util qw( min ); use FS::UID qw( dbh ); use FS::Record qw( qsearch qsearchs dbdef ); @@ -628,6 +629,7 @@ jurisdictions (i.e. Texas) have tax exemptions which are date sensitive. =back =cut + sub calculate_taxes { my ($self, $cust_bill_pkg, $taxlisthash, $invoice_time) = @_;