Lines 117-122
my ( $template, $borrowernumber, $cookie, $userflags ) = get_template_and_user(
Link Here
|
117 |
|
117 |
|
118 |
$borrowernumber = $input->param('borrowernumber') if ( $input->param('borrowernumber') ); |
118 |
$borrowernumber = $input->param('borrowernumber') if ( $input->param('borrowernumber') ); |
119 |
$template->param('borrowernumber' => $borrowernumber); |
119 |
$template->param('borrowernumber' => $borrowernumber); |
|
|
120 |
my $branchfilter = $input->param('branchcode') || C4::Context->userenv->{'branch'}; |
120 |
|
121 |
|
121 |
######################################### |
122 |
######################################### |
122 |
## Operations |
123 |
## Operations |
Lines 255-261
if ($op=~/else/) {
Link Here
|
255 |
$op='else'; |
256 |
$op='else'; |
256 |
|
257 |
|
257 |
$displayby||="STATUS"; |
258 |
$displayby||="STATUS"; |
258 |
delete $$suggestion_ref{'branchcode'} if($displayby eq "branchcode"); |
|
|
259 |
# distinct values of display by |
259 |
# distinct values of display by |
260 |
my $criteria_list=GetDistinctValues("suggestions.".$displayby); |
260 |
my $criteria_list=GetDistinctValues("suggestions.".$displayby); |
261 |
my (@criteria_dv, $criteria_has_empty); |
261 |
my (@criteria_dv, $criteria_has_empty); |
Lines 269-274
if ($op=~/else/) {
Link Here
|
269 |
# aggregate null and empty values under empty value |
269 |
# aggregate null and empty values under empty value |
270 |
push @criteria_dv, '' if $criteria_has_empty; |
270 |
push @criteria_dv, '' if $criteria_has_empty; |
271 |
|
271 |
|
|
|
272 |
# Hack to not modify GetDistinctValues for this specific case |
273 |
if ( $displayby eq 'branchcode' |
274 |
&& C4::Context->preference('IndependentBranches') |
275 |
&& not C4::Context->IsSuperLibrarian ) |
276 |
{ |
277 |
@criteria_dv = ( C4::Context->userenv->{'branch'} ); |
278 |
} |
279 |
|
272 |
my @allsuggestions; |
280 |
my @allsuggestions; |
273 |
foreach my $criteriumvalue ( @criteria_dv ) { |
281 |
foreach my $criteriumvalue ( @criteria_dv ) { |
274 |
# By default, display suggestions from current working branch |
282 |
# By default, display suggestions from current working branch |
Lines 277-283
if ($op=~/else/) {
Link Here
|
277 |
} |
285 |
} |
278 |
my $definedvalue = defined $$suggestion_ref{$displayby} && $$suggestion_ref{$displayby} ne ""; |
286 |
my $definedvalue = defined $$suggestion_ref{$displayby} && $$suggestion_ref{$displayby} ne ""; |
279 |
|
287 |
|
280 |
next if ( $definedvalue && $$suggestion_ref{$displayby} ne $criteriumvalue ); |
288 |
next if ( $definedvalue && $$suggestion_ref{$displayby} ne $criteriumvalue ) and ($displayby ne 'branchcode' or $branchfilter ne '__ANY__' ); |
281 |
$$suggestion_ref{$displayby} = $criteriumvalue; |
289 |
$$suggestion_ref{$displayby} = $criteriumvalue; |
282 |
|
290 |
|
283 |
my $suggestions = &SearchSuggestion($suggestion_ref); |
291 |
my $suggestions = &SearchSuggestion($suggestion_ref); |
Lines 332-339
if(defined($returnsuggested) and $returnsuggested ne "noone")
Link Here
|
332 |
print $input->redirect("/cgi-bin/koha/members/moremember.pl?borrowernumber=".$returnsuggested."#suggestions"); |
340 |
print $input->redirect("/cgi-bin/koha/members/moremember.pl?borrowernumber=".$returnsuggested."#suggestions"); |
333 |
} |
341 |
} |
334 |
|
342 |
|
335 |
my $branchfilter = ($displayby ne "branchcode") ? $input->param('branchcode') : C4::Context->userenv->{'branch'}; |
|
|
336 |
|
337 |
$template->param( |
343 |
$template->param( |
338 |
branchfilter => $branchfilter, |
344 |
branchfilter => $branchfilter, |
339 |
); |
345 |
); |
340 |
- |
|
|