Lines 113-121
if ($authid) {
Link Here
|
113 |
# Manual (online ed., 1.0.0, 2023), pp. 350, 363, 385. |
113 |
# Manual (online ed., 1.0.0, 2023), pp. 350, 363, 385. |
114 |
if ( C4::Context->preference('marcflavour') eq 'UNIMARC' ) { |
114 |
if ( C4::Context->preference('marcflavour') eq 'UNIMARC' ) { |
115 |
my $isnifield = $record->field('010'); |
115 |
my $isnifield = $record->field('010'); |
116 |
my $isnisubfield = $isnifield->subfield('a') if defined $isnifield; |
116 |
my $isnisubfield = $isnifield ? $isnifield->subfield('a') : undef; |
117 |
my $isninumber = $isnisubfield |
117 |
my $isninumber = |
118 |
if defined $isnisubfield && ( $auth_type->auth_tag_to_report =~ /^(200|210|220)$/ ); |
118 |
defined $isnisubfield && ( $auth_type->auth_tag_to_report =~ /^(200|210|220)$/ ) ? $isnisubfield : undef; |
119 |
push( @subfield_loop, { marc_subfield => 'o', marc_values => $isninumber } ) if defined $isninumber; |
119 |
push( @subfield_loop, { marc_subfield => 'o', marc_values => $isninumber } ) if defined $isninumber; |
120 |
} |
120 |
} |
121 |
|
121 |
|
122 |
- |
|
|