|
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 |
- |
|
|