Revision 6798d5bb
Von Jan Büren vor 12 Monaten hinzugefügt
SL/Controller/Inventory.pm | ||
---|---|---|
722 | 722 |
my ($self) = @_; |
723 | 723 |
|
724 | 724 |
$self->warehouse($self->warehouses->[0]) if !$self->warehouse || !$self->warehouse->id; |
725 |
$self->bin ($self->warehouse->bins->[0]) if !$self->bin || !$self->bin->id; |
|
725 |
$self->bin ($self->warehouse->bins_sorted_naturally->[0]) if !$self->bin || !$self->bin->id;
|
|
726 | 726 |
# foreach my $warehouse ( $self->warehouses ) { |
727 | 727 |
# $warehouse->{BINS} = []; |
728 | 728 |
# foreach my $bin ( $self->bins ) { |
... | ... | |
768 | 768 |
} |
769 | 769 |
|
770 | 770 |
sub build_bin_select { |
771 |
select_tag('bin_id', [ $_[0]->warehouse->bins ], |
|
771 |
select_tag('bin_id', [ $_[0]->warehouse->bins_sorted_naturally ],
|
|
772 | 772 |
title_key => 'description', |
773 | 773 |
default => $_[0]->bin->id, |
774 | 774 |
); |
Auch abrufbar als: Unified diff
Lagerplätze natürlich nach Beschreibung in Listen sortieren
Für alle Lagerfunktionen und für den Standardlagerplatz der Waren