X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Fsearch%2Fcust_main.html;h=66a3a982592f9c79f29d41f76ef4c30912a72790;hb=7427b3722522f049c9ebdb4ba3780a91b88c414f;hp=bb5eae7e331af6d645cb2acc98d0a4fe3913bdad;hpb=cfcc4c14a40c84d1603c707066e7644aefef5690;p=freeside.git diff --git a/httemplate/search/cust_main.html b/httemplate/search/cust_main.html index bb5eae7e3..66a3a9825 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,21 @@ 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 zip paydate_year paydate_month invoice_terms + no_censustract with_geocode with_email POST no_POST + custbatch usernum cancelled_pkgs cust_fields flattened_pkgs - refnum + all_tags ); 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 payby tagnum )) { $search_hash{$param} = [ $cgi->param($param) ]; } @@ -64,7 +63,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);