Lines 743-752
sub _host_itemnumbers {
Link Here
|
743 |
my ($self) = @_; |
743 |
my ($self) = @_; |
744 |
|
744 |
|
745 |
my $marcflavour = C4::Context->preference("marcflavour"); |
745 |
my $marcflavour = C4::Context->preference("marcflavour"); |
|
|
746 |
return [] if $marcflavour eq 'UNIMARC'; |
747 |
|
746 |
my $analyticfield = '773'; |
748 |
my $analyticfield = '773'; |
747 |
if ( $marcflavour eq 'UNIMARC' ) { |
|
|
748 |
$analyticfield = '461'; |
749 |
} |
750 |
my $marc_record = $self->metadata->record; |
749 |
my $marc_record = $self->metadata->record; |
751 |
my @itemnumbers; |
750 |
my @itemnumbers; |
752 |
foreach my $field ( $marc_record->field($analyticfield) ) { |
751 |
foreach my $field ( $marc_record->field($analyticfield) ) { |
753 |
- |
|
|