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