X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;ds=sidebyside;f=httemplate%2Fsearch%2Fcust_main.html;h=34aad5405c682c2b64b1d2ec8fcfea13294f8265;hb=1b62faeb0aa8734211c16fbac648d37cbda7c434;hp=0a43a82ddc1961d8ff6de24b2e4725e718dc5496;hpb=ccfb83fa0e77c8248191977e4b9d0195b7b67af7;p=freeside.git diff --git a/httemplate/search/cust_main.html b/httemplate/search/cust_main.html index 0a43a82dd..34aad5405 100755 --- a/httemplate/search/cust_main.html +++ b/httemplate/search/cust_main.html @@ -51,6 +51,7 @@ my %search_hash = (); my @scalars = qw ( agentnum salesnum status address city county state zip country location_history + daytime night mobile fax invoice_terms no_censustract with_geocode with_email tax no_tax POST no_POST custbatch usernum @@ -69,7 +70,7 @@ for my $param ( @scalars ) { #lists for my $param (qw( classnum refnum pkg_classnum )) { - $search_hash{$param} = [ $cgi->param($param) ]; + $search_hash{$param} = [ $cgi->multi_param($param) ]; } my $params = $cgi->Vars; @@ -143,6 +144,8 @@ if ( $FS::CurrentUser::CurrentUser->access_right('Bulk send customer notices') ) # URI::query_from does not support hashref # results in: ...&contacts=HASH(0x55e16cb81da8)&... my %query_hash = %search_hash; + foreach (keys %{$query_hash{contacts}}) { $query_hash{$_} = $query_hash{contacts}{$_}; } + delete $query_hash{contacts} if exists $query_hash{contacts} && ref $query_hash{contacts}; @@ -155,4 +158,13 @@ if ( $FS::CurrentUser::CurrentUser->access_right('Bulk send customer notices') ) } +### +# agent transfer link +### + +my $agent_transfer_link = include('/elements/agent_transfer_link.html', { + 'search' => \%search_hash, +}); +push @$menubar, emt('popup') => '
'.$agent_transfer_link.'
'; +