summaryrefslogtreecommitdiff
path: root/FS
diff options
context:
space:
mode:
authorjeff <jeff>2009-12-21 14:36:50 +0000
committerjeff <jeff>2009-12-21 14:36:50 +0000
commit250e277720fbe288875736c7f5f957668f4c1880 (patch)
tree36d9a1084bcef8b3addbe3fb32be0edfe073f46c /FS
parent45c6b7021b30c49742b578a2f3ba13fb35f5222c (diff)
move cch conf into database and add a couple small tools for processing updates more manually
Diffstat (limited to 'FS')
-rw-r--r--FS/FS/Conf.pm4
-rw-r--r--FS/FS/tax_rate.pm13
2 files changed, 10 insertions, 7 deletions
diff --git a/FS/FS/Conf.pm b/FS/FS/Conf.pm
index 07c25c46a..47555a348 100644
--- a/FS/FS/Conf.pm
+++ b/FS/FS/Conf.pm
@@ -1677,8 +1677,8 @@ worry that config_items is freeside-specific and icky.
{
'key' => 'taxdatadirectdownload',
'section' => 'billing', #well
- 'description' => 'Enable downloading tax data directly from the vendor site',
- 'type' => 'checkbox',
+ 'description' => 'Enable downloading tax data directly from the vendor site. at least three lines: URL, username, and password.j',
+ 'type' => 'textarea',
},
{
diff --git a/FS/FS/tax_rate.pm b/FS/FS/tax_rate.pm
index 58be8cba6..93550b178 100644
--- a/FS/FS/tax_rate.pm
+++ b/FS/FS/tax_rate.pm
@@ -1398,11 +1398,14 @@ sub process_download_and_update {
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';