Lines 410-422
foreach my $biblioNum (@biblionumbers) {
Link Here
|
410 |
} |
410 |
} |
411 |
|
411 |
|
412 |
foreach my $itemInfo (@{$biblioData->{itemInfos}}) { |
412 |
foreach my $itemInfo (@{$biblioData->{itemInfos}}) { |
413 |
$debug and warn $itemInfo->{'notforloan'}; |
|
|
414 |
|
415 |
# Get reserve fee. |
416 |
my $fee = GetReserveFee(undef, $borrowernumber, $itemInfo->{'biblionumber'}, 'a', |
417 |
( $itemInfo->{'biblioitemnumber'} ) ); |
418 |
$itemInfo->{'reservefee'} = sprintf "%.02f", ($fee ? $fee : 0.0); |
419 |
|
420 |
if ($itemLevelTypes && $itemInfo->{itype}) { |
413 |
if ($itemLevelTypes && $itemInfo->{itype}) { |
421 |
$itemInfo->{description} = $itemTypes->{$itemInfo->{itype}}{description}; |
414 |
$itemInfo->{description} = $itemTypes->{$itemInfo->{itype}}{description}; |
422 |
$itemInfo->{imageurl} = getitemtypeimagesrc() . "/". $itemTypes->{$itemInfo->{itype}}{imageurl}; |
415 |
$itemInfo->{imageurl} = getitemtypeimagesrc() . "/". $itemTypes->{$itemInfo->{itype}}{imageurl}; |
423 |
- |
|
|