|
Lines 166-177
foreach my $item (@items){
Link Here
|
| 166 |
|
166 |
|
| 167 |
# item has a host number if its biblio number does not match the current bib |
167 |
# item has a host number if its biblio number does not match the current bib |
| 168 |
if ($item->biblionumber ne $biblionumber){ |
168 |
if ($item->biblionumber ne $biblionumber){ |
| 169 |
$item_info->{hostbiblionumber} = $item->{biblionumber}; |
169 |
$item_info->{hostbiblionumber} = $item->biblionumber; |
| 170 |
$item_info->{hosttitle} = $item->biblio->title; |
170 |
$item_info->{hosttitle} = $item->biblio->title; |
| 171 |
} |
171 |
} |
| 172 |
|
172 |
|
| 173 |
# FIXME The acquisition code below could be improved using methods from Koha:: objects |
173 |
# FIXME The acquisition code below could be improved using methods from Koha:: objects |
| 174 |
my $order = GetOrderFromItemnumber( $item->{'itemnumber'} ); |
174 |
my $order = GetOrderFromItemnumber( $item->itemnumber ); |
| 175 |
$item_info->{'basketno'} = $order->{'basketno'}; |
175 |
$item_info->{'basketno'} = $order->{'basketno'}; |
| 176 |
$item_info->{'orderdate'} = $order->{'entrydate'}; |
176 |
$item_info->{'orderdate'} = $order->{'entrydate'}; |
| 177 |
if ($item_info->{'basketno'}){ |
177 |
if ($item_info->{'basketno'}){ |
| 178 |
- |
|
|