X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=httemplate%2Fmisc%2Fconfirm-censustract.html;h=0f115e5d7c8c79fbd9b3eaade4b01c7a5139e360;hp=ae0ae3a6ad9636de8dd555d3c84de95bf256f899;hb=HEAD;hpb=468c9e660eb0edb2033f0f8dbb4458f20280082c
diff --git a/httemplate/misc/confirm-censustract.html b/httemplate/misc/confirm-censustract.html
index ae0ae3a6a..02847f869 100644
--- a/httemplate/misc/confirm-censustract.html
+++ b/httemplate/misc/confirm-censustract.html
@@ -1,3 +1,10 @@
+% if ( !$error and !$new_tract ) {
+% # then set_censustract returned nothing
+% # because it's not relevant for this address
+% # so output nothing (forces confirm_censustract() to continue)
+% $m->clear_buffer;
+% $m->abort;
+% }
% if ( $error ) {
Census tract error
@@ -6,13 +13,23 @@ Census tract error
Confirm census tract
% }
-% my $querystring = "census_year=$year&latitude=".$cache->get('latitude').'&longitude='.$cache->get('longitude');
-Map service module location
-% $querystring = "census_year=$year&zip_code=".$cache->get('zip');
-Map zip code center
+<% $location{address1} |h %> <% $location{address2} |h %>
+<% $location{city} |h %>, <% $location{state} |h %> <% $location{zip} |h %>
+
+% my $address1 = $location{address1};
+% $address1 =~ s/(apt|ste|suite|unit)[\s\d]\w*\s*$//i;
+% my $querystring = "census_year=$year&address=$address1, $location{address2}, $location{city}, $location{state}";
+Map service location
+% $querystring = "census_year=$year&pre=$pre&zip_code=" . $cache->get('zip');
+Map zip code center
+
Entered census tract
@@ -21,33 +38,55 @@ Confirm census tract
<% $old_tract %>
% if ( $error ) {
-
<% $error %>
+
<% $error %>
% } else {
-
<% $new_tract %>
+
<% $new_tract %>
% }
-
+
- Cancel submission
+ Cancel submission
+
+
<%init>
local $SIG{__DIE__}; #disable Mason error trap
@@ -61,15 +100,16 @@ warn $cgi->param('q') if $DEBUG;
my $q = decode_json($cgi->param('q'))
or die "bad argument '".$cgi->param('q')."'";
+my $pre = $q->{prefix} || '';
my %location = (
- map { $_ => $q->{'ship_'.$_} }
+ map { $_ => $q->{$pre.$_} }
qw( company address1 address2 city state zip country latitude longitude )
);
-my $old_tract = $q->{'ship_censustract'};
+my $old_tract = $q->{$pre.'censustract'};
my $cache = eval { FS::GeocodeCache->new(%location) };
$cache->set_censustract;
-my $year = FS::Conf->new->config('census_year');
+my $year = FS::Conf->new->config('census_legacy') || '2020';
my $new_tract = $cache->get('censustract');
my $error = $cache->get('censustract_error');