summaryrefslogtreecommitdiff
path: root/httemplate/misc/xmlhttp-censustract.html
diff options
context:
space:
mode:
authorChristopher Burger <burgerc@freeside.biz>2017-09-10 19:07:30 -0400
committerChristopher Burger <burgerc@freeside.biz>2017-10-05 10:49:13 -0400
commit773a599e85493e20e0a8de911ec151ec69507bcb (patch)
tree7330ab196b91e2309963c2b9d3e775c707b80f9a /httemplate/misc/xmlhttp-censustract.html
parentfdc037ba12d1f365d756ed11937a6bfd3e66af0b (diff)
RT# 76968 - Created new interactive map to select census tract
Diffstat (limited to 'httemplate/misc/xmlhttp-censustract.html')
-rw-r--r--httemplate/misc/xmlhttp-censustract.html14
1 files changed, 14 insertions, 0 deletions
diff --git a/httemplate/misc/xmlhttp-censustract.html b/httemplate/misc/xmlhttp-censustract.html
new file mode 100644
index 000000000..8a7686047
--- /dev/null
+++ b/httemplate/misc/xmlhttp-censustract.html
@@ -0,0 +1,14 @@
+<% $return %>\
+<%init>
+
+my $DEBUG = 0;
+
+my $conf = new FS::Conf;
+
+my $return = {};
+my $url = "http://data.fcc.gov/api/block/find?format=json&censusYear=" . $cgi->param('census_year') . "&latitude=" . $cgi->param('lat') . "&longitude=" . $cgi->param('lon');
+
+use LWP::Simple;
+my $return = get $url;
+
+</%init> \ No newline at end of file