|
Lines 462-471
sub marcrecord2csv {
Link Here
|
| 462 |
my $biblio = Koha::Biblios->find($biblionumber); |
462 |
my $biblio = Koha::Biblios->find($biblionumber); |
| 463 |
return unless $biblio; |
463 |
return unless $biblio; |
| 464 |
my $record = eval { |
464 |
my $record = eval { |
| 465 |
$biblio->metadata->record( |
465 |
$biblio->metadata->record; |
| 466 |
{ embed_items => 1, itemnumbers => $itemnumbers } ); |
|
|
| 467 |
}; |
466 |
}; |
| 468 |
return unless $record; |
467 |
return unless $record; |
|
|
468 |
|
| 469 |
# Embed items |
| 470 |
my $items = $biblio->items; |
| 471 |
$items = $items->search( { itemnumber => { -in => $itemnumbers } } ) |
| 472 |
if (@$itemnumber); |
| 473 |
my $rp = Koha::RecordProcessor->new( |
| 474 |
{ |
| 475 |
filters => ['EmbedItems'], |
| 476 |
options => { items => $items } |
| 477 |
} |
| 478 |
); |
| 479 |
$rp->process($record); |
| 480 |
|
| 469 |
# Getting the framework |
481 |
# Getting the framework |
| 470 |
my $frameworkcode = $biblio->frameworkcode; |
482 |
my $frameworkcode = $biblio->frameworkcode; |
| 471 |
|
483 |
|
| 472 |
- |
|
|