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 09:16:57 -0400
commit5e7e3ee22f4d0cfe2f1e677322285349955969a4 (patch)
treedcbb4f187c8d4f9e0ff92974b1ab9af724f8c620 /httemplate/misc/xmlhttp-censustract.html
parent5e57e76cd2951e685e9205d8aa533087d5a74a0e (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