X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Fsearch%2Fcust_main.html;h=24348ff8a551588fddd6d5a59b1fb58e85abc2fa;hb=63973c641c4be00765fa27e55c57cc5b9aa4da19;hp=bb5eae7e331af6d645cb2acc98d0a4fe3913bdad;hpb=cfcc4c14a40c84d1603c707066e7644aefef5690;p=freeside.git diff --git a/httemplate/search/cust_main.html b/httemplate/search/cust_main.html index bb5eae7e3..24348ff8a 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,11 +41,12 @@ my %search_hash = (); #scalars my @scalars = qw ( - agentnum status address paydate_year paydate_month invoice_terms - no_censustract with_geocode custbatch usernum + agentnum 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 ) { @@ -56,7 +55,7 @@ for my $param ( @scalars ) { } #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);