From c14eb2d1f09e910bcb08de2a6ce8ec70f6dd28ba Mon Sep 17 00:00:00 2001 From: =?utf8?q?Sven=20Sch=C3=B6ling?= Date: Wed, 4 Feb 2015 16:54:57 +0100 Subject: [PATCH] PriceSource: Bei item_selected Preisequellen nur in Belegen pollen. --- bin/mozilla/io.pl | 24 ++++++++++++------------ 1 file changed, 12 insertions(+), 12 deletions(-) diff --git a/bin/mozilla/io.pl b/bin/mozilla/io.pl index 99ba934ff..54e480373 100644 --- a/bin/mozilla/io.pl +++ b/bin/mozilla/io.pl @@ -556,23 +556,23 @@ sub item_selected { map { $form->{"${_}_$i"} = $new_item->{$_} } @new_fields; - my $record = _make_record(); - my $price_source = SL::PriceSource->new(record_item => $record->items->[$i-1], record => $record); - my $best_price = $price_source->best_price; + if (my $record = _make_record()) { + my $price_source = SL::PriceSource->new(record_item => $record->items->[$i-1], record => $record); + my $best_price = $price_source->best_price; - if ($best_price) { - $::form->{"sellprice_$i"} = $best_price->price; - $::form->{"active_price_source_$i"} = $best_price->source; - } + if ($best_price) { + $::form->{"sellprice_$i"} = $best_price->price; + $::form->{"active_price_source_$i"} = $best_price->source; + } - my $best_discount = $price_source->best_discount; + my $best_discount = $price_source->best_discount; - if ($best_discount) { - $::form->{"discount_$i"} = $best_discount->discount; - $::form->{"active_discount_source_$i"} = $best_discount->source; + if ($best_discount) { + $::form->{"discount_$i"} = $best_discount->discount; + $::form->{"active_discount_source_$i"} = $best_discount->source; + } } - $form->{"marge_price_factor_$i"} = $new_item->{price_factor}; if ($form->{"part_payment_id_$i"} ne "") { -- 2.20.1