View | Details | Raw Unified | Return to bug 32171
Collapse All | Expand All

(-)a/acqui/addorderiso2709.pl (-2 / +2 lines)
Lines 291-299 if ($op eq ""){ Link Here
291
                    # remove uncertainprice flag if we have found a price in the MARC record
291
                    # remove uncertainprice flag if we have found a price in the MARC record
292
                    $orderinfo{uncertainprice} = 0 if $orderinfo{listprice};
292
                    $orderinfo{uncertainprice} = 0 if $orderinfo{listprice};
293
293
294
                    my $order = Koha::Acquisition::Order->new( \%orderinfo )->store;
294
                    my $order = Koha::Acquisition::Order->new( \%orderinfo );
295
                    $order->populate_with_prices_for_ordering();
295
                    $order->populate_with_prices_for_ordering();
296
                    $order->populate_with_prices_for_receiving();
296
                    $order->populate_with_prices_for_receiving();
297
                    $order->store;
297
                    $order->add_item( $_ ) for @{ $budget_hash->{$budget_id}->{itemnumbers} };
298
                    $order->add_item( $_ ) for @{ $budget_hash->{$budget_id}->{itemnumbers} };
298
                }
299
                }
299
            }
300
            }
300
- 

Return to bug 32171