Lines 205-213
sub GetRecords {
Link Here
|
205 |
$biblioitem->{marcxml} = $record->as_xml_record(); |
205 |
$biblioitem->{marcxml} = $record->as_xml_record(); |
206 |
} |
206 |
} |
207 |
|
207 |
|
208 |
# We don't want MARC to be displayed |
|
|
209 |
delete $biblioitem->{'marc'}; |
210 |
|
211 |
# Get most of the needed data |
208 |
# Get most of the needed data |
212 |
my $biblioitemnumber = $biblioitem->{'biblioitemnumber'}; |
209 |
my $biblioitemnumber = $biblioitem->{'biblioitemnumber'}; |
213 |
my $reserves = GetReservesFromBiblionumber({ biblionumber => $biblionumber }); |
210 |
my $reserves = GetReservesFromBiblionumber({ biblionumber => $biblionumber }); |
Lines 414-420
sub GetPatronInfo {
Link Here
|
414 |
my $branchname = $library ? $library->branchname : ''; |
411 |
my $branchname = $library ? $library->branchname : ''; |
415 |
|
412 |
|
416 |
# Remove unwanted fields |
413 |
# Remove unwanted fields |
417 |
delete $item->{'marc'}; |
|
|
418 |
delete $item->{'marcxml'}; |
414 |
delete $item->{'marcxml'}; |
419 |
delete $item->{'more_subfields_xml'}; |
415 |
delete $item->{'more_subfields_xml'}; |
420 |
|
416 |
|
421 |
- |
|
|