From 7e6d7935ef67bfb97d4aa8b6fb44b26e9a3d3e04 Mon Sep 17 00:00:00 2001 From: Moritz Bunkus Date: Thu, 12 Jul 2007 14:54:25 +0000 Subject: [PATCH] Zahlungskonditionen: Zahlenwerte auf zwei Stellen gerundet ausgeben. --- SL/Form.pm | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/SL/Form.pm b/SL/Form.pm index 7e5c8736d..5a9272465 100644 --- a/SL/Form.pm +++ b/SL/Form.pm @@ -1392,7 +1392,10 @@ sub set_payment_options { $amounts{invtotal_wo_skonto} = $amounts{invtotal} * (1 - $self->{percent_skonto}); $amounts{total_wo_skonto} = $amounts{total} * (1 - $self->{percent_skonto}); - map { $formatted_amounts{$_} = $self->format_amount($myconfig, $amounts{$_}, 2) } keys %amounts; + foreach (keys %amounts) { + $amounts{$_} = $self->round_amount($amounts{$_}, 2); + $formatted_amounts{$_} = $self->format_amount($myconfig, $amounts{$_}, 2); + } if ($self->{"language_id"}) { $query = -- 2.20.1