X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Fsearch%2Fcust_main.html;h=84eee1b8056d6697f6b2eb0944dc72b17b0ad4ba;hb=3b50b841a272a5cd55497958d572dd73a3339e7b;hp=bb5eae7e331af6d645cb2acc98d0a4fe3913bdad;hpb=cfcc4c14a40c84d1603c707066e7644aefef5690;p=freeside.git diff --git a/httemplate/search/cust_main.html b/httemplate/search/cust_main.html index bb5eae7e3..84eee1b80 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,25 @@ 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 + select_referral ); 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 +67,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);