X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Fmisc%2Fconfirm-censustract.html;h=f3fd0383ecfad8a5672c480c1c65dc6d579bd9c5;hb=850f7e02ff0ca9f3514989d7d6c2a0ab96ac4e06;hp=9e0af498fc901989c69808f76f239c3fc067116f;hpb=acbc7e3c55a3d5a0e9999b0630653ad510d4b19a;p=freeside.git diff --git a/httemplate/misc/confirm-censustract.html b/httemplate/misc/confirm-censustract.html index 9e0af498f..f3fd0383e 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,21 @@ 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 $querystring = "census_year=$year&address=$location{address1}, $location{address2}, $location{city}, $location{state}"; +Map service module location
+% $querystring = "census_year=$year&pre=$pre&zip_code=" . $cache->get('zip'); +Map zip code center

+ @@ -21,33 +36,55 @@ Confirm census tract % if ( $error ) { - + % } else { - + % }
Entered census tract
<% $old_tract %><% $error %>
<% $error %>
<% $new_tract %>
<% $new_tract %>
- + +
+
+ <%init> local $SIG{__DIE__}; #disable Mason error trap @@ -61,11 +98,7 @@ warn $cgi->param('q') if $DEBUG; my $q = decode_json($cgi->param('q')) or die "bad argument '".$cgi->param('q')."'"; -my $pre = ''; -if ($q->{billship}) { - # this still isn't quite correct - $pre = $q->{'same'} ? 'bill_' : 'ship_'; -} +my $pre = $q->{prefix} || ''; my %location = ( map { $_ => $q->{$pre.$_} } qw( company address1 address2 city state zip country latitude longitude ) @@ -74,7 +107,7 @@ my %location = ( 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');