X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=httemplate%2Fsearch%2Fcust_main.html;h=672c201747fb4ccc7166d233290067c64be0e979;hp=bb5eae7e331af6d645cb2acc98d0a4fe3913bdad;hb=f822e27a1e00594332ffa487a1c284234c5580a6;hpb=cfcc4c14a40c84d1603c707066e7644aefef5690 diff --git a/httemplate/search/cust_main.html b/httemplate/search/cust_main.html index bb5eae7e3..672c20174 100755 --- a/httemplate/search/cust_main.html +++ b/httemplate/search/cust_main.html @@ -33,9 +33,7 @@ <%init> die "access denied" - unless ( $FS::CurrentUser::CurrentUser->access_right('List customers') && - $FS::CurrentUser::CurrentUser->access_right('List packages') - ); + unless $FS::CurrentUser::CurrentUser->access_right('Advanced customer search'); my %search_hash = (); @@ -43,20 +41,24 @@ my %search_hash = (); #scalars my @scalars = qw ( - agentnum status address paydate_year paydate_month invoice_terms - no_censustract with_geocode custbatch usernum + agentnum salesnum status address city county state zip country + invoice_terms + no_censustract with_geocode with_email tax no_tax POST no_POST + custbatch usernum cancelled_pkgs cust_fields flattened_pkgs - refnum + all_tags + all_pkg_classnums + any_pkg_status ); for my $param ( @scalars ) { $search_hash{$param} = scalar( $cgi->param($param) ) - if $cgi->param($param); + if length($cgi->param($param)); } #lists -for my $param (qw( classnum payby tagnum )) { +for my $param (qw( classnum refnum tagnum pkg_classnum )) { $search_hash{$param} = [ $cgi->param($param) ]; } @@ -64,7 +66,7 @@ for my $param (qw( classnum payby tagnum )) { # parse dates ### -foreach my $field (qw( signupdate birthdate spouse_birthdate )) { +foreach my $field (qw( signupdate birthdate spouse_birthdate anniversary_date )) { my($beginning, $ending) = FS::UI::Web::parse_beginning_ending($cgi, $field);