Revision 6c9677e4
Von Stephan Köhler vor mehr als 18 Jahren hinzugefügt
| SL/IC.pm | ||
|---|---|---|
| 825 | 825 |
my $group; |
| 826 | 826 |
my $limit; |
| 827 | 827 |
|
| 828 |
foreach my $item (qw(partnumber drawing microfiche make)) {
|
|
| 828 |
foreach my $item (qw(partnumber drawing microfiche)) {
|
|
| 829 | 829 |
if ($form->{$item}) {
|
| 830 | 830 |
$var = $form->like(lc $form->{$item});
|
| 831 |
|
|
| 832 |
# make will build later Bugfix 145 |
|
| 833 |
# model will build later too - Bugfix 331 |
|
| 834 |
if ($item ne 'make') {
|
|
| 835 |
$where .= " AND lower(p.$item) LIKE '$var'"; |
|
| 836 |
} |
|
| 831 |
$where .= " AND lower(p.$item) LIKE '$var'"; |
|
| 837 | 832 |
} |
| 838 | 833 |
} |
| 839 | 834 |
|
Auch abrufbar als: Unified diff
Nachtrag r1002, Quellcode bereinigt