[Koha-patches] [PATCH] Bug 5003: Can not search for organisation by name

[Katrin Fischer]

---
 .../prog/en/modules/members/guarantor_search.tmpl  |    1 +
 .../prog/en/modules/members/memberentrygen.tmpl    |    4 ++--
 members/guarantor_search.pl                        |   13 ++++++++++---
 members/memberentry.pl                             |    1 +
 4 files changed, 14 insertions(+), 5 deletions(-)

diff --git a/koha-tmpl/intranet-tmpl/prog/en/modules/members/guarantor_search.tmpl b/koha-tmpl/intranet-tmpl/prog/en/modules/members/guarantor_search.tmpl
index 7fa5099..13fb052 100644
--- a/koha-tmpl/intranet-tmpl/prog/en/modules/members/guarantor_search.tmpl
+++ b/koha-tmpl/intranet-tmpl/prog/en/modules/members/guarantor_search.tmpl
@@ -48,6 +48,7 @@
 <h3>Search for guarantor</h3>
 	<form action="/cgi-bin/koha/members/guarantor_search.pl" method="post">
 		<fieldset>
+		<input type="hidden" name="category_type" id="category_type" value="<!-- TMPL_VAR NAME="category_type" -->" />
 		<input type="text" name="member" id="member" value="<!-- TMPL_VAR NAME="member" -->" class="focus" /> Ordered by
 		<select name="orderby">
 			<option value="surname,firstname">Surname</option>
diff --git a/koha-tmpl/intranet-tmpl/prog/en/modules/members/memberentrygen.tmpl b/koha-tmpl/intranet-tmpl/prog/en/modules/members/memberentrygen.tmpl
index b21d35a..05d97f0 100644
--- a/koha-tmpl/intranet-tmpl/prog/en/modules/members/memberentrygen.tmpl
+++ b/koha-tmpl/intranet-tmpl/prog/en/modules/members/memberentrygen.tmpl
@@ -340,9 +340,9 @@
         <li>
             <span class="label">&nbsp;</span>
             <!-- TMPL_IF NAME="guarantorid" -->
-            <input id="guarantorsearch" type="button" value="Change" onclick="Dopopguarantor('guarantor_search.pl');" />
+            <input id="guarantorsearch" type="button" value="Change" onclick="Dopopguarantor('guarantor_search.pl?category_type=<!-- TMPL_VAR NAME="category_type" -->');" />
             <!-- TMPL_ELSE -->
-            <input id="guarantorsearch" type="button" value="Set to Patron" onclick="Dopopguarantor('guarantor_search.pl');" />
+            <input id="guarantorsearch" type="button" value="Set to Patron" onclick="Dopopguarantor('guarantor_search.pl?category_type=<!-- TMPL_VAR NAME="category_type" -->');" />
             <!-- /TMPL_IF -->
             <input id="guarantordelete" type="button" value="Delete" />
         </li>
diff --git a/members/guarantor_search.pl b/members/guarantor_search.pl
index d25d71f..79bb9ba 100755
--- a/members/guarantor_search.pl
+++ b/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,16 +68,17 @@ 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
 	my ($od,$issue,$fines)=GetMemberIssuesAndFines($results->[$i]{'borrowerid'});
 	my $guarantorinfo=uc($results->[$i]{'surname'})." , ".ucfirst($results->[$i]{'firstname'});
+	if 
 	my %row = (
 		background => $background,
 		count => $i+1,
@@ -101,7 +108,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;
diff --git a/members/memberentry.pl b/members/memberentry.pl
index 6ec6d8e..bb14c10 100755
--- a/members/memberentry.pl
+++ b/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,
-- 
1.6.3.3