From d98812a8f430bfd298d01b8c47bcad2276e4f051 Mon Sep 17 00:00:00 2001 From: =?utf8?q?Jan=20B=C3=BCren?= Date: Tue, 22 Jul 2014 18:30:03 +0200 Subject: [PATCH] =?utf8?q?Standardm=C3=A4ssiges=20Ein-=20und=20Auslagern?= =?utf8?q?=20von=20Dienstleistungen=20per=20Mandantenkonfiguration=20einge?= =?utf8?q?stellt?= MIME-Version: 1.0 Content-Type: text/plain; charset=utf8 Content-Transfer-Encoding: 8bit --- bin/mozilla/do.pl | 3 +++ 1 file changed, 3 insertions(+) diff --git a/bin/mozilla/do.pl b/bin/mozilla/do.pl index c16f772d1..55e6cf2fa 100644 --- a/bin/mozilla/do.pl +++ b/bin/mozilla/do.pl @@ -1591,6 +1591,9 @@ sub transfer_in_out_default { next unless ($form->{"id_$i"}); my $base_unit_factor = $units->{ $part_info_map{$form->{"id_$i"}}->{unit} }->{factor} || 1; my $qty = $form->parse_amount(\%myconfig, $form->{"qty_$i"}) * $units->{$form->{"unit_$i"}}->{factor} / $base_unit_factor; + + # if we do not want to transfer services and this part is a service, set qty to zero + $qty = 0 if (!$::instance_conf->get_transfer_default_services && !defined($part_info_map{$form->{"id_$i"}}->{inventory_accno_id}) && !$part_info_map{$form->{"id_$i"}}->{assembly}); $qty_parts{$form->{"id_$i"}} += $qty; -- 2.20.1