| 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 | -  |  |  |