|
Lines 402-409
foreach my $biblionumber (@biblionumbers) {
Link Here
|
| 402 |
$biblioloopiter{noitems} = 1; |
402 |
$biblioloopiter{noitems} = 1; |
| 403 |
} |
403 |
} |
| 404 |
|
404 |
|
| 405 |
## Here we go backwards again to create hash of biblioitemnumber to itemnumbers, |
405 |
## Here we go backwards again to create hash of biblioitemnumber to itemnumbers |
| 406 |
## when by definition all of the itemnumber have the same biblioitemnumber |
406 |
## this is important when we have analytic items which may be on another record |
| 407 |
my ( $iteminfos_of ); |
407 |
my ( $iteminfos_of ); |
| 408 |
while ( my $item = $items->next ) { |
408 |
while ( my $item = $items->next ) { |
| 409 |
$item = $item->unblessed; |
409 |
$item = $item->unblessed; |
|
Lines 413-419
foreach my $biblionumber (@biblionumbers) {
Link Here
|
| 413 |
$iteminfos_of->{$itemnumber} = $item; |
413 |
$iteminfos_of->{$itemnumber} = $item; |
| 414 |
} |
414 |
} |
| 415 |
|
415 |
|
| 416 |
## Should be same as biblionumber |
|
|
| 417 |
my @biblioitemnumbers = keys %itemnumbers_of_biblioitem; |
416 |
my @biblioitemnumbers = keys %itemnumbers_of_biblioitem; |
| 418 |
|
417 |
|
| 419 |
my $biblioiteminfos_of = { |
418 |
my $biblioiteminfos_of = { |
|
Lines 461-467
foreach my $biblionumber (@biblionumbers) {
Link Here
|
| 461 |
# (before this loop was inside that sub loop so it was O(n^2) ) |
460 |
# (before this loop was inside that sub loop so it was O(n^2) ) |
| 462 |
my $items_any_available; |
461 |
my $items_any_available; |
| 463 |
|
462 |
|
| 464 |
$items_any_available = ItemsAnyAvailableAndNotRestricted( { biblionumber => $biblioitemnumber, patron => $patron }) |
463 |
$items_any_available = ItemsAnyAvailableAndNotRestricted( { biblionumber => $biblioitem->{biblionumber}, patron => $patron }) |
| 465 |
if $patron; |
464 |
if $patron; |
| 466 |
|
465 |
|
| 467 |
foreach my $itemnumber ( @{ $itemnumbers_of_biblioitem{$biblioitemnumber} } ) { |
466 |
foreach my $itemnumber ( @{ $itemnumbers_of_biblioitem{$biblioitemnumber} } ) { |
| 468 |
- |
|
|