|
Lines 134-140
for my $order ( @orders ) {
Link Here
|
| 134 |
$order->{ecost} = $order->{ecostgsti}; |
134 |
$order->{ecost} = $order->{ecostgsti}; |
| 135 |
$order->{unitprice} = $order->{unitpricegsti}; |
135 |
$order->{unitprice} = $order->{unitpricegsti}; |
| 136 |
} |
136 |
} |
| 137 |
$order->{total} = $order->{ecost} * $order->{quantity}; |
137 |
$order->{total} = $order->{unitprice} * $order->{quantity}; |
| 138 |
|
138 |
|
| 139 |
my %line = %{ $order }; |
139 |
my %line = %{ $order }; |
| 140 |
$line{invoice} = $invoice->{invoicenumber}; |
140 |
$line{invoice} = $invoice->{invoicenumber}; |
| 141 |
- |
|
|