Revision acf478a3
Von Sven Schöling vor etwa 4 Jahren hinzugefügt
SL/Helper/Inventory.pm | ||
---|---|---|
168 | 168 |
return () if $qty <= 0; |
169 | 169 |
|
170 | 170 |
my $results = get_stock(part => $part, by => 'for_allocate'); |
171 |
my %bin_whitelist = map { (ref $_ ? $_->id : $_) => 1 } listify($params{bin}); |
|
172 |
my %wh_whitelist = map { (ref $_ ? $_->id : $_) => 1 } listify($params{warehouse}); |
|
173 |
my %chargenumbers = map { (ref $_ ? $_->id : $_) => 1 } listify($params{chargenumber}); |
|
171 |
my %bin_whitelist = map { (ref $_ ? $_->id : $_) => 1 } grep defined, listify($params{bin});
|
|
172 |
my %wh_whitelist = map { (ref $_ ? $_->id : $_) => 1 } grep defined, listify($params{warehouse});
|
|
173 |
my %chargenumbers = map { (ref $_ ? $_->id : $_) => 1 } grep defined, listify($params{chargenumber});
|
|
174 | 174 |
my %reserve_whitelist; |
175 | 175 |
if ($params{reserve_for}) { |
176 | 176 |
$reserve_whitelist{ $_->meta->table }{ $_->id } = 1 for listify($params{reserve_for}); |
Auch abrufbar als: Unified diff
Inventory: warnings