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