Ungültige Lager aus dem Warenbestand filtern
authorJan Büren <jan@lx-office-hosting.de>
Sat, 4 Feb 2012 16:20:31 +0000 (17:20 +0100)
committerJan Büren <jan@lx-office-hosting.de>
Sat, 4 Feb 2012 16:20:31 +0000 (17:20 +0100)
Setzt man Lager auf ungültig, so werden diese in der Auswahlliste bei
Lagerbestand und bei Lagerbewegungen rausgefiltert, lässt man die Auswahl
allerdings leer, so werden auch ungültige Lager inkl. Bestand angezeigt.
Zumindestens für Bestand einen entsprechenden Filter gesetzt.

SL/WH.pm
bin/mozilla/wh.pl
locale/de/all
templates/webpages/wh/report_filter.html

index eb37626..cc53427 100644 (file)
--- a/SL/WH.pm
+++ b/SL/WH.pm
@@ -626,6 +626,9 @@ sub get_warehouse_report {
     push @filter_ary, "i.itime <= ?";
     push @filter_vars, $filter{date};
   }
+  if (!$filter{include_invalid_warehouses}){
+    push @filter_ary,  "NOT (w.invalid)";
+  }
 
   # prepare qty comparison for later filtering
   my ($f_qty_op, $f_qty, $f_qty_base_unit);
index 62be1d1..b3550b2 100644 (file)
@@ -824,7 +824,7 @@ sub generate_report {
   my @columns = qw(warehousedescription bindescription partnumber partdescription chargenumber bestbefore qty stock_value);
 
   # filter stuff
-  map { $filter{$_} = $form->{$_} if ($form->{$_}) } qw(warehouse_id bin_id partnumber description chargenumber bestbefore date);
+  map { $filter{$_} = $form->{$_} if ($form->{$_}) } qw(warehouse_id bin_id partnumber description chargenumber bestbefore date include_invalid_warehouses);
 
   $filter{qty_op} = WH->convert_qty_op($form->{qty_op});
   if ($filter{qty_op}) {
@@ -842,7 +842,7 @@ sub generate_report {
 
   my @hidden_variables = map { "l_${_}" } @columns;
   push @hidden_variables, qw(warehouse_id bin_id partnumber description chargenumber bestbefore qty_op qty qty_unit l_warehousedescription l_bindescription);
-  push @hidden_variables, qw(include_empty_bins subtotal);
+  push @hidden_variables, qw(include_empty_bins subtotal include_invalid_warehouses);
 
   my %column_defs = (
     'warehousedescription' => { 'text' => $locale->text('Warehouse'), },
index 8b5a094..7b1e4ab 100644 (file)
@@ -939,6 +939,7 @@ $self->{texts} = {
   'Include empty bins'          => 'Leere Lagerpl&auml;tze anzeigen',
   'Include in Report'           => 'In Bericht aufnehmen',
   'Include in drop-down menus'  => 'In Aufklappmenü aufnehmen',
+  'Include invalid warehouses ' => 'Ungültige Lager berücksichtigen',
   'Includeable in reports'      => 'In Berichten anzeigbar',
   'Including'                   => 'Enthaltene',
   'Income Statement'            => 'GuV',
index a5cbe12..53d0842 100644 (file)
         <td nowrap><label for="subtotal">[% 'Subtotal' | $T8 %]</label></td>
         <td align="right"><input name="include_empty_bins" id="include_empty_bins" class="checkbox" type="checkbox" value="Y"></td>
         <td nowrap><label for="include_empty_bins">[% 'Include empty bins' | $T8 %]</label></td>
+        <td align="right"><input name="include_invalid_warehouses" id="include_invalid_warehouses" class="checkbox" type="checkbox" value="Y"></td>
+        <td nowrap><label for="include_invalid_warehouses">[% 'Include invalid warehouses ' | $T8 %]</label></td>
        </tr>
 
        <tr>