Lines 59-66
my $bookfund = $input->param("bookfund");
Link Here
|
59 |
my $order = GetOrder($ordernumber); |
59 |
my $order = GetOrder($ordernumber); |
60 |
my $new_ordernumber = $ordernumber; |
60 |
my $new_ordernumber = $ordernumber; |
61 |
|
61 |
|
62 |
$unitprice = Koha::Number::Price->new( $unitprice )->unformat(); |
|
|
63 |
$replacementprice = Koha::Number::Price->new( $replacementprice )->unformat(); |
64 |
my $basket = Koha::Acquisition::Orders->find( $ordernumber )->basket; |
62 |
my $basket = Koha::Acquisition::Orders->find( $ordernumber )->basket; |
65 |
|
63 |
|
66 |
#need old receivedate if we update the order, parcel.pl only shows the right parcel this way FIXME |
64 |
#need old receivedate if we update the order, parcel.pl only shows the right parcel this way FIXME |