Revision bea5a6c5
Von Jan Büren vor mehr als 11 Jahren hinzugefügt
bin/mozilla/wh.pl | ||
---|---|---|
829 | 829 |
# filter stuff |
830 | 830 |
map { $filter{$_} = $form->{$_} if ($form->{$_}) } qw(warehouse_id bin_id partnumber description chargenumber bestbefore date include_invalid_warehouses); |
831 | 831 |
|
832 |
# show filter stuff also in report |
|
833 |
my @options; |
|
834 |
# dispatch all options |
|
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}"}, |
|
841 |
include_invalid_warehouses => sub { push @options, $locale->text('Include invalid warehouses ')}, |
|
842 |
}; |
|
843 |
foreach (keys %filter) { |
|
844 |
defined $dispatch_options->{$_} && $dispatch_options->{$_}->(); |
|
845 |
} |
|
846 |
# / end show filter stuff also in report |
|
847 |
|
|
832 | 848 |
$filter{qty_op} = WH->convert_qty_op($form->{qty_op}); |
833 | 849 |
if ($filter{qty_op}) { |
834 | 850 |
$form->isblank("qty", $locale->text('Quantity missing.')); |
... | ... | |
872 | 888 |
|
873 | 889 |
$report->set_sort_indicator($sort_col, $form->{order}); |
874 | 890 |
|
875 |
$report->set_options('output_format' => 'HTML', |
|
891 |
$report->set_options('top_info_text' => join("\n", @options), |
|
892 |
'output_format' => 'HTML', |
|
876 | 893 |
'title' => $form->{title}, |
877 | 894 |
'attachment_basename' => strftime($locale->text('warehouse_report_list') . '_%Y%m%d', localtime time)); |
878 | 895 |
$report->set_options_from_form(); |
Auch abrufbar als: Unified diff
Lagerbestand anzeigen, zeigt jetzt auch die Filteroptionen an
Analog wie bei allen anderen Berichten (report_generator)