Lines 72-78
foreach my $biblionumber ( @bibs ) {
Link Here
|
72 |
my $biblio = Koha::Biblios->find( $biblionumber ); |
72 |
my $biblio = Koha::Biblios->find( $biblionumber ); |
73 |
my $record = &GetMarcBiblio({ biblionumber => $biblionumber }); |
73 |
my $record = &GetMarcBiblio({ biblionumber => $biblionumber }); |
74 |
my $marcnotesarray = $biblio->get_marc_notes({ marcflavour => $marcflavour }); |
74 |
my $marcnotesarray = $biblio->get_marc_notes({ marcflavour => $marcflavour }); |
75 |
my $marcauthorsarray = $biblio->get_authors_from_MARC; |
75 |
my $marcauthorsarray = $biblio->get_marc_authors; |
76 |
my $marcsubjctsarray = GetMarcSubjects( $record, $marcflavour ); |
76 |
my $marcsubjctsarray = GetMarcSubjects( $record, $marcflavour ); |
77 |
my $marcseriesarray = GetMarcSeries ($record,$marcflavour); |
77 |
my $marcseriesarray = GetMarcSeries ($record,$marcflavour); |
78 |
my $marcurlsarray = GetMarcUrls ($record,$marcflavour); |
78 |
my $marcurlsarray = GetMarcUrls ($record,$marcflavour); |