|
Lines 2015-2032
sub searchResults {
Link Here
|
| 2015 |
my $hostbiblionumber = $hostfield->subfield("0"); |
2015 |
my $hostbiblionumber = $hostfield->subfield("0"); |
| 2016 |
my $linkeditemnumber = $hostfield->subfield("9"); |
2016 |
my $linkeditemnumber = $hostfield->subfield("9"); |
| 2017 |
if( $hostbiblionumber ) { |
2017 |
if( $hostbiblionumber ) { |
| 2018 |
my $hostbiblio = GetMarcBiblio({ |
2018 |
my $linkeditemmarc = C4::Items::GetMarcItem( $hostbiblionumber, $linkeditemnumber ); |
| 2019 |
biblionumber => $hostbiblionumber, |
2019 |
if ($linkeditemmarc) { |
| 2020 |
embed_items => 1 }); |
2020 |
my $linkeditemfield = $linkeditemmarc->field($itemtag); |
| 2021 |
my ($itemfield, undef) = GetMarcFromKohaField( 'items.itemnumber', GetFrameworkCode($hostbiblionumber) ); |
2021 |
if ($linkeditemfield) { |
| 2022 |
if( $hostbiblio ) { |
2022 |
push( @fields, $linkeditemfield ); |
| 2023 |
my @hostitems = $hostbiblio->field($itemfield); |
|
|
| 2024 |
foreach my $hostitem (@hostitems){ |
| 2025 |
if ($hostitem->subfield("9") eq $linkeditemnumber){ |
| 2026 |
my $linkeditem =$hostitem; |
| 2027 |
# append linked items if they exist |
| 2028 |
push @fields, $linkeditem if $linkeditem; |
| 2029 |
} |
| 2030 |
} |
2023 |
} |
| 2031 |
} |
2024 |
} |
| 2032 |
} |
2025 |
} |
| 2033 |
- |
|
|