From: Jan Büren Date: Tue, 19 Apr 2016 13:21:29 +0000 (+0200) Subject: Revert "Einheiten beim Fertigen beachten" X-Git-Tag: release-3.4.1~203 X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=80499f9da1fb349fd4ee2a5eef5a64c872240feb;p=kivitendo-erp.git Revert "Einheiten beim Fertigen beachten" This reverts commit be6eabfc4b62af1a8173e5cbcaff0b7f0d9b6db4. Nein, das war kein Fix für http://trac.kivitendo.de/ticket/2232 Implementiert wurde (imho): a) Wenn es eine gültige Einheit gibt b) Dann nimm das erstbeste Einzelteil einer Erzeugnis-Ware c) und konvertiere die ausgewählte Einheit des Erzeugnis in die Einheit der erstbesten Erzeugnis-Ware. Conflicts: SL/WH.pm --- diff --git a/SL/WH.pm b/SL/WH.pm index f1dd565c5..3cc2e2375 100644 --- a/SL/WH.pm +++ b/SL/WH.pm @@ -39,9 +39,6 @@ use SL::DBUtils; use SL::Form; use SL::Util qw(trim); -use SL::DB::Unit; -use SL::DB::Assembly; - use warnings; use strict; @@ -162,17 +159,6 @@ sub transfer_assembly { my %params = @_; Common::check_params(\%params, qw(assembly_id dst_warehouse_id login qty unit dst_bin_id chargenumber bestbefore comment)); - - my $unit = SL::DB::Manager::Unit->find_by(name => $params{unit}); - if ($unit) { - my $assembly = SL::DB::Manager::Assembly->get_all( - query => [ id => $params{assembly_id} ], - with_objects => ['part'], - limit => 1, - )->[0]; - $params{qty} = $unit->convert_to($params{qty}, $assembly->part->unit_obj); - } - # my $maxcreate=WH->check_assembly_max_create(assembly_id =>$params{'assembly_id'}, dbh => $my_dbh); my $myconfig = \%main::myconfig;