X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Fsearch%2Fcust_main.html;h=644e0932aa75b09cee287f991627f5efa98a43c3;hb=7a7bcda9d75c951df9c911ce60d5b0551765daf2;hp=cd5e51f256e2318698fb07ecbd8277b31066cbda;hpb=7153190ee1bfeb6d3ad9e6da270a41a949333a7e;p=freeside.git diff --git a/httemplate/search/cust_main.html b/httemplate/search/cust_main.html index cd5e51f25..644e0932a 100755 --- a/httemplate/search/cust_main.html +++ b/httemplate/search/cust_main.html @@ -43,15 +43,19 @@ my %search_hash = (); #$search_hash{'query'} = $cgi->keywords; #scalars -for my $param (qw( agentnum status cancelled_pkgs cust_fields flattened_pkgs)) { +my @scalars = qw ( + agentnum status cancelled_pkgs cust_fields flattened_pkgs custbatch + no_censustract paydate_year paydate_month invoice_terms +); + +for my $param ( @scalars ) { $search_hash{$param} = scalar( $cgi->param($param) ) if $cgi->param($param); } #lists -for my $param (qw( payby )) { - $search_hash{$param} = [ $cgi->param($param) ] - if $cgi->param($param); +for my $param (qw( classnum payby )) { + $search_hash{$param} = [ $cgi->param($param) ]; } ### @@ -80,7 +84,7 @@ $search_hash{'current_balance'} = # etc ### -my $sql_query = FS::cust_main->search_sql(\%search_hash); +my $sql_query = FS::cust_main->search(\%search_hash); my $count_query = delete($sql_query->{'count_query'}); my @extra_headers = @{ delete($sql_query->{'extra_headers'}) }; my @extra_fields = @{ delete($sql_query->{'extra_fields'}) }; @@ -95,7 +99,7 @@ my $menubar = []; if ( $FS::CurrentUser::CurrentUser->access_right('Bulk send customer notices') ) { - my $uri = new URI::URL; + my $uri = new URI; $uri->query_form( \%search_hash ); my $query = $uri->query;