X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;ds=sidebyside;f=httemplate%2Fsearch%2F477partVI_census.html;h=b6a213665b4d9ea58e49b9b1051887d9b758012a;hb=5bb3332639ffadd71b00ad41fd2a7cbb038092ab;hp=be3a9c057592b809bd0842fd9b3066383cd1ab92;hpb=64df4aadbe83844c3eb91f9e45bd66531e4ffeef;p=freeside.git

diff --git a/httemplate/search/477partVI_census.html b/httemplate/search/477partVI_census.html
index be3a9c057..b6a213665 100755
--- a/httemplate/search/477partVI_census.html
+++ b/httemplate/search/477partVI_census.html
@@ -1,4 +1,4 @@
-<% include( 'elements/search.html',
+<& elements/search.html,
                   'html_init'       => '<H2>Part VI</H2>',
                   'html_foot'       => $html_foot,
                   'name'            => 'regions',
@@ -23,8 +23,9 @@
                   'links'           => \@links,
                   'url'             => $opt{url} || '',
                   'xml_row_element' => 'Datarow',
-              )
-%>
+                  'really_disable_download' => 1,
+              
+&>
 <%init>
 
 my $curuser = $FS::CurrentUser::CurrentUser;
@@ -76,14 +77,14 @@ push @fields,
       },
   sub { my $row = shift; sprintf "%.2f", $row->residential },
 ;
-push @links, ( [ $link, $link_suffix ] x 8 );
 
 my %search_hash = ();
 my @sql_query = ();
   
-for ( qw(agentnum magic) ) {
+for ( qw(agentnum magic state) ) {
   $search_hash{$_} = $cgi->param($_) if $cgi->param($_);
 }
+$search_hash{'country'} = 'US';
 $search_hash{'classnum'} = [ $cgi->param('classnum') ]
   if grep { $_ eq 'classnum' } $cgi->param;
 
@@ -132,11 +133,13 @@ my $count_query = 'SELECT count(*) FROM ( ('.
       map { my $addl_from = $_->{addl_from};
             my $extra_sql = $_->{extra_sql};
             my $order_by  = $_->{order_by};
-            "SELECT censustract from cust_pkg $addl_from $extra_sql $order_by";
+            "SELECT censustract from cust_pkg $addl_from 
+            $extra_sql $order_by";
           }
       @sql_query
    ). ') ) AS foo';
 
+
 my $link = 'cust_pkg.cgi?'. join(';',
                                       map { my $key = $_;
                                             my @values = ref($search_hash{$_}) 
@@ -158,6 +161,9 @@ my $link_suffix = sub { my $row = shift;
                         $result;
                       };
 
+for (1..8) { push @links, [ $link, $link_suffix ]; }
+
+
 my $html_foot = sub {
   if (scalar(keys %state_hash) > 1) {