Lines 307-314
sub _handle_one_result {
Link Here
|
307 |
my $row; |
307 |
my $row; |
308 |
if( $breedingid ){ |
308 |
if( $breedingid ){ |
309 |
my @kohafields = ('biblio.title','biblio.author','biblioitems.isbn','biblioitems.lccn','biblioitems.editionstatement'); |
309 |
my @kohafields = ('biblio.title','biblio.author','biblioitems.isbn','biblioitems.lccn','biblioitems.editionstatement'); |
310 |
push @kohafields, C4::Context->preference('marcflavour') eq "MARC21" ? 'biblio.copyrightdate' : 'biblioitems.publicationyear'; |
310 |
my $date_label = C4::Context->preference('marcflavour') eq "MARC21" ? 'biblio.copyrightdate' : 'biblioitems.publicationyear'; |
|
|
311 |
push @kohafields, $date_label; |
311 |
$row = C4::Biblio::TransformMarcToKoha({ record => $marcrecord, kohafields => \@kohafields, limit_table => 'no_items' }); |
312 |
$row = C4::Biblio::TransformMarcToKoha({ record => $marcrecord, kohafields => \@kohafields, limit_table => 'no_items' }); |
|
|
313 |
$row->{date} = $row->{ substr( $date_label, index( $date_label, '.' ) + 1 ) }; |
312 |
$row->{biblionumber} = $bib; |
314 |
$row->{biblionumber} = $bib; |
313 |
$row->{server} = $servhref->{servername}; |
315 |
$row->{server} = $servhref->{servername}; |
314 |
$row->{breedingid} = $breedingid; |
316 |
$row->{breedingid} = $breedingid; |