Revision fd69a37d
Von Jan Büren vor fast 14 Jahren hinzugefügt
SL/Form.pm | ||
---|---|---|
2459 | 2459 |
$self->{$key} = selectall_hashref_query($self, $dbh, $query); |
2460 | 2460 |
|
2461 | 2461 |
if ($bins_key) { |
2462 |
$query = qq|SELECT id, description FROM bin WHERE warehouse_id = ?|; |
|
2462 |
$query = qq|SELECT id, description FROM bin WHERE warehouse_id = ? |
|
2463 |
ORDER BY description|; |
|
2463 | 2464 |
my $sth = prepare_query($self, $dbh, $query); |
2464 | 2465 |
|
2465 | 2466 |
foreach my $warehouse (@{ $self->{$key} }) { |
Auch abrufbar als: Unified diff
Bei vielen Lagerplätzen ist es hilfreich die Liste der bin(s) alphabetisch vorzusortieren