Ungültige Lager beim Einlagern ausblenden.
authorSven Schöling <s.schoeling@linet-services.de>
Fri, 11 Oct 2013 12:25:00 +0000 (14:25 +0200)
committerSven Schöling <s.schoeling@linet-services.de>
Fri, 11 Oct 2013 12:25:00 +0000 (14:25 +0200)
behebt #2377

SL/Controller/Inventory.pm

index 2a5b8de..f3f2938 100644 (file)
@@ -123,7 +123,7 @@ sub _check_warehouses {
 }
 
 sub init_warehouses {
-  SL::DB::Manager::Warehouse->get_all;
+  SL::DB::Manager::Warehouse->get_all(query => [ or => [ invalid => 0, invalid => undef ]]);
 }
 
 sub init_units {
@@ -150,8 +150,8 @@ sub set_target_from_part {
 sub sanitize_target {
   my ($self) = @_;
 
-  $self->warehouse(SL::DB::Manager::Warehouse->get_first) if !$self->warehouse || !$self->warehouse->id;
-  $self->bin      ($self->warehouse->bins->[0])           if !$self->bin       || !$self->bin->id;
+  $self->warehouse($self->warehouses->[0])       if !$self->warehouse || !$self->warehouse->id;
+  $self->bin      ($self->warehouse->bins->[0])  if !$self->bin       || !$self->bin->id;
 }
 
 sub load_part_from_form {