@@ -, +, @@ --- .../prog/en/modules/members/guarantor_search.tmpl | 1 + .../prog/en/modules/members/memberentrygen.tmpl | 4 ++-- members/guarantor_search.pl | 12 +++++++++--- members/memberentry.pl | 1 + 4 files changed, 13 insertions(+), 5 deletions(-) --- a/koha-tmpl/intranet-tmpl/prog/en/modules/members/guarantor_search.tmpl +++ a/koha-tmpl/intranet-tmpl/prog/en/modules/members/guarantor_search.tmpl @@ -48,6 +48,7 @@

Search for guarantor

+ " /> " class="focus" /> Ordered by + ');" /> - + ');" /> --- a/members/guarantor_search.pl +++ a/members/guarantor_search.pl @@ -46,6 +46,7 @@ my $theme = $input->param('theme') || "default"; my $member=$input->param('member'); my $orderby=$input->param('orderby'); +my $category_type=$input->param('category_type'); $orderby = "surname,firstname" unless $orderby; $member =~ s/,//g; #remove any commas from search string $member =~ s/\*/%/g; @@ -55,6 +56,11 @@ if ($member eq ''){ $template->param(results=>1); } +my $search_category = 'A'; +if ($category_type eq 'P'){ + $search_category = 'I'; +} + my ($count,$results); my @resultsdata; my $background = 0; @@ -62,11 +68,11 @@ my $background = 0; if ($member ne ''){ if(length($member) == 1) { - ($count,$results)=SearchMember($member,$orderby,"simple",'A'); + ($count,$results)=SearchMember($member,$orderby,"simple",$search_category); } else { - ($count,$results)=SearchMember($member,$orderby,"advanced",'A'); + ($count,$results)=SearchMember($member,$orderby,"advanced",$search_category); } for (my $i=0; $i < $count; $i++){ #find out stats @@ -101,7 +107,7 @@ if ($member ne ''){ $template->param( member => $member, numresults => $count, - + category_type => $category_type, resultsloop => \@resultsdata ); output_html_with_http_headers $input, $cookie, $template->output; --- a/members/memberentry.pl +++ a/members/memberentry.pl @@ -648,6 +648,7 @@ $template->param( dateformat => C4::Dates->new()->visual(), C4::Context->preference('dateformat') => 1, check_categorytype =>$check_categorytype,#to recover the category type with checkcategorytype function + category_type =>$category_type, modify => $modify, nok => $nok,#flag to konw if an error CGIbranch => $CGIbranch, --