|
Lines 221-226
if ($op eq ""){
Link Here
|
| 221 |
$price = Koha::Number::Price->new($price)->unformat; |
221 |
$price = Koha::Number::Price->new($price)->unformat; |
| 222 |
$orderinfo{tax_rate} = $bookseller->{tax_rate}; |
222 |
$orderinfo{tax_rate} = $bookseller->{tax_rate}; |
| 223 |
my $c = $c_discount ? $c_discount : $bookseller->{discount} / 100; |
223 |
my $c = $c_discount ? $c_discount : $bookseller->{discount} / 100; |
|
|
224 |
$orderinfo{discount} = $c; |
| 224 |
if ( $bookseller->{listincgst} ) { |
225 |
if ( $bookseller->{listincgst} ) { |
| 225 |
if ( $c_discount ) { |
226 |
if ( $c_discount ) { |
| 226 |
$orderinfo{ecost} = $price; |
227 |
$orderinfo{ecost} = $price; |
| 227 |
- |
|
|