Signed-off-by: Benjamin Daeuber <bdaeuber@cityoffargo.com>
Signed-off-by: Kyle M Hall <kyle@bywatersolutions.com>
Signed-off-by: Nick Clemens <nick@bywatersolutions.com>
Signed-off-by: Kyle M Hall <kyle@bywatersolutions.com>
# remove uncertainprice flag if we have found a price in the MARC record
$orderinfo{uncertainprice} = 0 if $orderinfo{listprice};
+
+ %orderinfo = %{
+ C4::Acquisition::populate_order_with_prices(
+ {
+ order => \%orderinfo,
+ booksellerid => $booksellerid,
+ ordering => 1,
+ receiving => 1,
+ }
+ )
+ };
+
my $order = Koha::Acquisition::Order->new( \%orderinfo )->insert;
}
}