Revision 71d8ea65
Von Jan Büren vor mehr als 11 Jahren hinzugefügt
bin/mozilla/wh.pl | ||
---|---|---|
833 | 833 |
my @options; |
834 | 834 |
# dispatch all options |
835 | 835 |
my $dispatch_options = { |
836 |
partnumber => sub { push @options, $locale->text('Partnumber') . " : $form->{partnumber}"}, |
|
837 |
description => sub { push @options, $locale->text('Description') . " : $form->{description}"}, |
|
838 |
chargenumber => sub { push @options, $locale->text('Charge Number') . " : $form->{chargenumber}"}, |
|
839 |
bestbefore => sub { push @options, $locale->text('Best Before') . " : $form->{bestbefore}"}, |
|
840 |
date => sub { push @options, $locale->text('Date') . " : $form->{date}"}, |
|
836 |
warehouse_id => sub { push @options, $locale->text('Warehouse') . " : " . |
|
837 |
SL::DB::Manager::Warehouse->find_by(id => $form->{warehouse_id})->description}, |
|
838 |
bin_id => sub { push @options, $locale->text('Bin') . " : " . |
|
839 |
SL::DB::Manager::Bin->find_by(id => $form->{bin_id})->description}, |
|
840 |
partnumber => sub { push @options, $locale->text('Partnumber') . " : $form->{partnumber}"}, |
|
841 |
description => sub { push @options, $locale->text('Description') . " : $form->{description}"}, |
|
842 |
chargenumber => sub { push @options, $locale->text('Charge Number') . " : $form->{chargenumber}"}, |
|
843 |
bestbefore => sub { push @options, $locale->text('Best Before') . " : $form->{bestbefore}"}, |
|
844 |
date => sub { push @options, $locale->text('Date') . " : $form->{date}"}, |
|
841 | 845 |
include_invalid_warehouses => sub { push @options, $locale->text('Include invalid warehouses ')}, |
842 | 846 |
}; |
843 | 847 |
foreach (keys %filter) { |
844 |
defined $dispatch_options->{$_} && $dispatch_options->{$_}->();
|
|
848 |
$dispatch_options->{$_}->() if $dispatch_options->{$_};
|
|
845 | 849 |
} |
846 | 850 |
# / end show filter stuff also in report |
847 | 851 |
|
Auch abrufbar als: Unified diff
Bei Lagerbestandsbericht auch Lager und Lagerplatz in Übersicht als Filter anzeigen