add "payment expiration before" to customer report, RT#6447

[freeside.git] / httemplate / search / cust_main.html

diff --git a/httemplate/search/cust_main.html b/httemplate/search/cust_main.html
index cd5e51f..d6586e8 100755 (executable)
--- 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
+);
+
+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) ];
 }
 
 ###
@@ -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;