|
Lines 174-186
if ($quantityrec > $origquantityrec ) {
Link Here
|
| 174 |
my $new_order_object = Koha::Acquisition::Orders->find( $new_ordernumber ); # FIXME we should not need to refetch it |
174 |
my $new_order_object = Koha::Acquisition::Orders->find( $new_ordernumber ); # FIXME we should not need to refetch it |
| 175 |
my $items = $new_order_object->items; |
175 |
my $items = $new_order_object->items; |
| 176 |
while ( my $item = $items->next ) { |
176 |
while ( my $item = $items->next ) { |
| 177 |
$item->booksellerid($booksellerid); # TODO This should be done using ->set, but bug 21761 is not resolved |
177 |
$item->update({ |
| 178 |
$item->dateaccessioned($datereceived); |
178 |
booksellerid => $booksellerid, |
| 179 |
$item->datelastseen($datereceived); |
179 |
dateaccessioned => $datereceived, |
| 180 |
$item->price($unitprice); |
180 |
datelastseen => $datereceived, |
| 181 |
$item->replacementprice($replacementprice); |
181 |
price => $unitprice, |
| 182 |
$item->replacementpricedate($datereceived); |
182 |
replacementprice => $replacementprice, |
| 183 |
$item->store; |
183 |
replacementpricedate => $datereceived, |
|
|
184 |
}); |
| 184 |
} |
185 |
} |
| 185 |
|
186 |
|
| 186 |
if ($suggestion_id) { |
187 |
if ($suggestion_id) { |
| 187 |
- |
|
|