|
Lines 311-317
foreach my $biblionumber (@biblionumbers) {
Link Here
|
| 311 |
|
311 |
|
| 312 |
## Here we go backwards again to create hash of biblioitemnumber to itemnumbers, |
312 |
## Here we go backwards again to create hash of biblioitemnumber to itemnumbers, |
| 313 |
## when by definition all of the itemnumber have the same biblioitemnumber |
313 |
## when by definition all of the itemnumber have the same biblioitemnumber |
| 314 |
my ( $itemnumbers_of_biblioitem, $iteminfos_of); |
314 |
my ( %itemnumbers_of_biblioitem, $iteminfos_of); |
| 315 |
while ( my $item = $items->next ) { |
315 |
while ( my $item = $items->next ) { |
| 316 |
$item = $item->unblessed; |
316 |
$item = $item->unblessed; |
| 317 |
my $biblioitemnumber = $item->{biblioitemnumber}; |
317 |
my $biblioitemnumber = $item->{biblioitemnumber}; |
| 318 |
- |
|
|