From 429297b41e844d85dbf102c58aedd4575d69733c Mon Sep 17 00:00:00 2001 From: Waldemar Toews Date: Thu, 28 May 2015 16:57:07 +0200 Subject: [PATCH] BUG-Fix: Verkaufslieferscheine: Preis Faktor Formatierung angepasst. Beim Lesen des Preisfaktors wurde die Formatierung in eine Zahl vergessen. --- SL/DO.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/SL/DO.pm b/SL/DO.pm index f953b6bc5..a012ddb13 100644 --- a/SL/DO.pm +++ b/SL/DO.pm @@ -311,7 +311,7 @@ sub save { my $items_reqdate; $form->get_lists('price_factors' => 'ALL_PRICE_FACTORS'); - my %price_factors = map { $_->{id} => $_->{factor} } @{ $form->{ALL_PRICE_FACTORS} }; + my %price_factors = map { $_->{id} => $_->{factor} *1 } @{ $form->{ALL_PRICE_FACTORS} }; my $price_factor; my %part_id_map = map { $_ => 1 } grep { $_ } map { $form->{"id_$_"} } (1 .. $form->{rowcount}); @@ -913,7 +913,7 @@ sub order_details { push @arrays, map { "project_cvar_$_->{name}" } @{ $project_cvar_configs }; $form->get_lists('price_factors' => 'ALL_PRICE_FACTORS'); - my %price_factors = map { $_->{id} => $_->{factor} } @{ $form->{ALL_PRICE_FACTORS} }; + my %price_factors = map { $_->{id} => $_->{factor} *1 } @{ $form->{ALL_PRICE_FACTORS} }; my $totalweight = 0; my $sameitem = ""; -- 2.20.1