$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;
<option value="business">[% 'Customer type' | $T8 %]</option>
<option value="salesman" selected="selected">[% 'Salesman' | $T8 %]</option>
<option value="month">[% 'Month' | $T8 %]</option>
+ <option value="shipvia">[% 'Ship via' | $T8 %]</option>
</select>
</td>
<td align=left><input name="l_headers_mainsort" class=checkbox type=checkbox value=Y checked> [% 'Heading' | $T8 %]</td>