|
Lines 446-459
foreach my $biblionumber (@biblionumbers) {
Link Here
|
| 446 |
} |
446 |
} |
| 447 |
); |
447 |
); |
| 448 |
} |
448 |
} |
| 449 |
my @branchloop; |
|
|
| 450 |
foreach my $br ( sort {$branches->{$a}->{'branchname'} cmp $branches->{$b}->{'branchname'}} keys %$branches ) { |
| 451 |
my %abranch; |
| 452 |
$abranch{'selected'} = ( $br eq $res->{'branchcode'} ); |
| 453 |
$abranch{'branch'} = $br; |
| 454 |
$abranch{'branchname'} = $branches->{$br}->{'branchname'}; |
| 455 |
push( @branchloop, \%abranch ); |
| 456 |
} |
| 457 |
|
449 |
|
| 458 |
if ( ( $res->{'found'} eq 'W' ) ) { |
450 |
if ( ( $res->{'found'} eq 'W' ) ) { |
| 459 |
my $item = $res->{'itemnumber'}; |
451 |
my $item = $res->{'itemnumber'}; |
|
Lines 497-503
foreach my $biblionumber (@biblionumbers) {
Link Here
|
| 497 |
$reserve{'ccode'} = $res->{'ccode'}; |
489 |
$reserve{'ccode'} = $res->{'ccode'}; |
| 498 |
$reserve{'barcode'} = $res->{'barcode'}; |
490 |
$reserve{'barcode'} = $res->{'barcode'}; |
| 499 |
$reserve{'priority'} = $res->{'priority'}; |
491 |
$reserve{'priority'} = $res->{'priority'}; |
| 500 |
$reserve{'branchloop'} = \@branchloop; |
492 |
$reserve{'branchloop'} = GetBranchesLoop($res->{'branchcode'}); |
| 501 |
$reserve{'optionloop'} = \@optionloop; |
493 |
$reserve{'optionloop'} = \@optionloop; |
| 502 |
|
494 |
|
| 503 |
push( @reserveloop, \%reserve ); |
495 |
push( @reserveloop, \%reserve ); |
| 504 |
- |
|
|