@@ -, +, @@ prove t/db_dependent/Acquisition/CancelReceipt.t commit 20d9ed618fbe3cdcb9c04444a1f8a584b0364069 Bug 13321: Rename variables --- C4/Acquisition.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) --- a/C4/Acquisition.pm +++ a/C4/Acquisition.pm @@ -1460,7 +1460,7 @@ sub ModReceiveOrder { $query .= q| where biblionumber=? and ordernumber=?|; my $sth = $dbh->prepare( $query ); - my @params = ( $quantrec, $datereceived, $invoice->{invoiceid}, $budget_id ); + my @params = ( $quantrec, $datereceived, $invoice->{invoiceid}, ( $budget_id ? $budget_id : $order->{budget_id} ) ); if ( defined $order->{unitprice} ) { push @params, $order->{unitprice}, $order->{unitprice_tax_included}, $order->{unitprice_tax_excluded}; --