| Lines 288-293
          sub process_invoice {
      
      
        Link Here | 
        
          | 288 |                     } | 288 |                     } | 
        
          | 289 |  | 289 |  | 
        
          | 290 |                     my $price = _get_invoiced_price($line); | 290 |                     my $price = _get_invoiced_price($line); | 
            
              |  |  | 291 |                     my $tax_rate = $line->tax_rate; | 
            
              | 292 |                     if ($tax_rate && $tax_rate->{rate} != 0) { | 
            
              | 293 |                        $tax_rate->{rate} /= 100; | 
            
              | 294 |                     } | 
        
          | 291 |  | 295 |  | 
        
          | 292 |                     if ( $order->quantity > $line->quantity ) { | 296 |                     if ( $order->quantity > $line->quantity ) { | 
        
          | 293 |                         my $ordered = $order->quantity; | 297 |                         my $ordered = $order->quantity; | 
  
    | Lines 305-310
          sub process_invoice {
      
      
        Link Here | 
        
          | 305 |                                 unitprice        => $price, | 309 |                                 unitprice        => $price, | 
        
          | 306 |                                 invoiceid        => $invoiceid, | 310 |                                 invoiceid        => $invoiceid, | 
        
          | 307 |                                 datereceived     => $msg_date, | 311 |                                 datereceived     => $msg_date, | 
            
              |  |  | 312 |                                 tax_rate_on_receiving => $tax_rate->{rate}, | 
        
          | 308 |                             } | 313 |                             } | 
        
          | 309 |                         ); | 314 |                         ); | 
        
          | 310 |                         my $p_updates = | 315 |                         my $p_updates = | 
  
    | Lines 324-329
          sub process_invoice {
      
      
        Link Here | 
        
          | 324 |                         $order->datereceived($msg_date); | 329 |                         $order->datereceived($msg_date); | 
        
          | 325 |                         $order->invoiceid($invoiceid); | 330 |                         $order->invoiceid($invoiceid); | 
        
          | 326 |                         $order->unitprice($price); | 331 |                         $order->unitprice($price); | 
            
              |  |  | 332 |                         $order->tax_rate_on_receiving($tax_rate->{rate}); | 
        
          | 327 |                         $order->orderstatus('complete'); | 333 |                         $order->orderstatus('complete'); | 
        
          | 328 |                         my $p_updates = update_price_from_invoice( $order, | 334 |                         my $p_updates = update_price_from_invoice( $order, | 
        
          | 329 |                             $invoice_message->vendor_id ); | 335 |                             $invoice_message->vendor_id ); |