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