Multibox: Einen weiteren Parameter ergänzt, mit dem gesteuert wird, ob überhaupt...

[kivitendo-erp.git] / bin / mozilla / wh.pl

diff --git a/bin/mozilla/wh.pl b/bin/mozilla/wh.pl
index 19f9d98..a853c8a 100644 (file)
--- a/bin/mozilla/wh.pl
+++ b/bin/mozilla/wh.pl
@@ -78,7 +78,7 @@ sub transfer_warehouse_selection {
 
   show_no_warehouses_error() if (!scalar @{ $form->{WAREHOUSES} });
 
-  my $units      = AM->retrieve_units(\%myconfig, $form, 'dimension');
+  my $units      = AM->retrieve_units(\%myconfig, $form);
   $form->{UNITS} = AM->unit_select_data($units, $form->{unit}, 0, $form->{partunit});
 
   if (scalar @{ $form->{WAREHOUSES} }) {
@@ -158,7 +158,7 @@ sub transfer_or_removal_prepare_contents {
 
   $form->show_generic_error($locale->text("The selected warehouse is empty.")) if (0 == scalar(@contents));
 
-  my $all_units = AM->retrieve_units(\%myconfig, $form, 'dimension');
+  my $all_units = AM->retrieve_units(\%myconfig, $form);
 
   foreach (@contents) {
     $_->{qty} = $form->format_amount_units('amount'     => $_->{qty},
@@ -201,7 +201,7 @@ sub transfer_parts {
 
   $form->{sort} = 'bindescription';
   my @contents  = WH->get_warehouse_report("warehouse_id" => $form->{warehouse_id});
-  my $all_units = AM->retrieve_units(\%myconfig, $form, 'dimension');
+  my $all_units = AM->retrieve_units(\%myconfig, $form);
 
   my @transfers;
 
@@ -285,7 +285,6 @@ sub transfer_stock_update_part {
 
     $form->{no_services}   = 1;
     $form->{no_assemblies} = 1;
-    $form->{stockable}     = 1;
 
     my $parts = Common->retrieve_parts(\%myconfig, $form, 'description', 1);
 
@@ -403,7 +402,7 @@ sub remove_parts {
 
   $form->{sort} = 'bindescription';
   my @contents  = WH->get_warehouse_report("warehouse_id" => $form->{warehouse_id});
-  my $all_units = AM->retrieve_units(\%myconfig, $form, 'dimension');
+  my $all_units = AM->retrieve_units(\%myconfig, $form);
 
   my @transfers;