Lines 88-93
if ( $op eq 'validate' ) {
Link Here
|
88 |
for (my $i=0; $i < $count; $i++) { |
88 |
for (my $i=0; $i < $count; $i++) { |
89 |
my $order = pop(@orders); |
89 |
my $order = pop(@orders); |
90 |
my $ordernumber = $order->{ordernumber}; |
90 |
my $ordernumber = $order->{ordernumber}; |
|
|
91 |
next unless ($input->param('qty'.$ordernumber)); |
91 |
my $order_as_from_db=GetOrder($order->{ordernumber}); |
92 |
my $order_as_from_db=GetOrder($order->{ordernumber}); |
92 |
$order->{'listprice'} = $input->param('price'.$ordernumber); |
93 |
$order->{'listprice'} = $input->param('price'.$ordernumber); |
93 |
$order->{'ecost'}= $input->param('price'.$ordernumber) - (($input->param('price'.$ordernumber) /100) * $bookseller->discount); |
94 |
$order->{'ecost'}= $input->param('price'.$ordernumber) - (($input->param('price'.$ordernumber) /100) * $bookseller->discount); |
94 |
- |
|
|