Lines 1460-1466
sub ModReceiveOrder {
Link Here
|
1460 |
$query .= q| where biblionumber=? and ordernumber=?|; |
1460 |
$query .= q| where biblionumber=? and ordernumber=?|; |
1461 |
|
1461 |
|
1462 |
my $sth = $dbh->prepare( $query ); |
1462 |
my $sth = $dbh->prepare( $query ); |
1463 |
my @params = ( $quantrec, $datereceived, $invoice->{invoiceid}, $budget_id ); |
1463 |
my @params = ( $quantrec, $datereceived, $invoice->{invoiceid}, ( $budget_id ? $budget_id : $order->{budget_id} ) ); |
1464 |
|
1464 |
|
1465 |
if ( defined $order->{unitprice} ) { |
1465 |
if ( defined $order->{unitprice} ) { |
1466 |
push @params, $order->{unitprice}, $order->{unitprice_tax_included}, $order->{unitprice_tax_excluded}; |
1466 |
push @params, $order->{unitprice}, $order->{unitprice_tax_included}, $order->{unitprice_tax_excluded}; |
1467 |
- |
|
|