USTVA: Toter Code: auch totes Template entfernen

[mfinanz.git] / SL / VK.pm

diff --git a/SL/VK.pm b/SL/VK.pm
index 1dcf44a7d7077c30c6d41969fe0a19248f3d7fd4..5a3db9cdc8c79c2c22ede16a5bdf4a200b745126 100644 (file)
--- a/SL/VK.pm
+++ b/SL/VK.pm
@@ -85,7 +85,7 @@ sub invoice_transactions {
   $where .= " AND i.assemblyitem is not true ";
 
   # filter allowed parameters for mainsort and subsort as passed by POST
   $where .= " AND i.assemblyitem is not true ";
 
   # filter allowed parameters for mainsort and subsort as passed by POST

-  my @databasefields = qw(description customername country partsgroup business salesman month);
+  my @databasefields = qw(description customername country partsgroup business salesman month shipvia);

   my ($mainsort) = grep { /^$form->{mainsort}$/ } @databasefields;
   my ($subsort) = grep { /^$form->{subsort}$/ } @databasefields;
   die "illegal parameter for mainsort or subsort" unless $mainsort and $subsort;
   my ($mainsort) = grep { /^$form->{mainsort}$/ } @databasefields;
   my ($subsort) = grep { /^$form->{subsort}$/ } @databasefields;
   die "illegal parameter for mainsort or subsort" unless $mainsort and $subsort;