Kleiner Bug bei Splittbuchungen
# amount for total AP
$form->{payables} = $form->{invtotal};
- print(STDERR $form->{payables},
- " Payables\n",
- $form->{invtotal},
- " Invtotal\n",
- $form->{netamount},
- " Netamount\n",
- $form->{total_tax},
- " Total_Tax\n\n");
+
my ($query, $sth);
# if we have an id delete old records
$form->{netamount} += $form->{"amount_$i"};
} else {
$form->{"tax_$i"} = $form->{"amount_$i"} * $form->{"taxrate_$i"};
- $form->{"tax_$i"} =
- $form->round_amount($form->{"tax_$i"} * $form->{exchangerate}, 2);
+ $form->{"tax_$i"} = $form->round_amount($form->{"tax_$i"} * $form->{exchangerate}, 2);
+ $form->{netamount} += $form->{"amount_$i"};
}
}
$form->{total_tax} += $form->{"tax_$i"};