|
Lines 90-95
foreach my $biblionumber ( @bibs ) {
Link Here
|
| 90 |
$num++; |
90 |
$num++; |
| 91 |
$dat->{biblionumber} = $biblionumber; |
91 |
$dat->{biblionumber} = $biblionumber; |
| 92 |
$dat->{ITEM_RESULTS} = $biblio->items->search_ordered; |
92 |
$dat->{ITEM_RESULTS} = $biblio->items->search_ordered; |
|
|
93 |
if ($dat->{ITEM_RESULTS}->count == 0) { |
| 94 |
$dat->{ITEM_RESULTS} = $biblio->host_items->search_ordered; |
| 95 |
} |
| 93 |
$dat->{MARCNOTES} = $marcnotesarray; |
96 |
$dat->{MARCNOTES} = $marcnotesarray; |
| 94 |
$dat->{MARCSUBJCTS} = $marcsubjctsarray; |
97 |
$dat->{MARCSUBJCTS} = $marcsubjctsarray; |
| 95 |
$dat->{MARCAUTHORS} = $marcauthorsarray; |
98 |
$dat->{MARCAUTHORS} = $marcauthorsarray; |