};
}
- if ($self->maxtype != 0 && $self->maxtype != 9) {
+ my $maxtype = $self->maxtype || 0;
+ if ($maxtype != 0 && $maxtype != 9) {
return $self->_fatal_or_null( 'tax with "'.
$self->maxtype_name. '" threshold'
);
}
- if ($self->maxtype == 9) {
+ if ($maxtype == 9) {
return
$self->_fatal_or_null( 'tax with "'. $self->maxtype_name. '" threshold' );
# "texas" tax
my $taxable_units = 0;
unless ($self->recurtax =~ /^Y$/i) {
- if ($self->unittype == 0) {
+ if (( $self->unittype || 0 ) == 0) {
my %seen = ();
foreach (@cust_bill_pkg) {
$taxable_units += $_->units
eval "use XBase;";
die $@ if $@;
- my $conffile = '%%%FREESIDE_CONF%%%/cchconf';
- my $conffh = new IO::File "<$conffile" or die "can't open $conffile: $!\n";
- my ( $urls, $secret, $states ) =
- map { /^(.*)$/ or die "bad config line in $conffile: $_\n"; $1 }
- <$conffh>;
+ my $conf = new FS::Conf;
+ die "direct download of tax data not enabled\n"
+ unless $conf->exists('taxdatadirectdownload');
+ my ( $urls, $username, $secret, $states ) =
+ $conf->config('taxdatadirectdownload');
+ die "No tax download URL provided. ".
+ "Did you set the taxdatadirectdownload configuration value?\n"
+ unless $urls;
$dir .= '/cch';