X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/d94820d09f4848d06bf3b74bb85c2c52820fbc48..cbebaf93b5864f5314ccee0ebc0a235d2d58b662:/SL/IR.pm diff --git a/SL/IR.pm b/SL/IR.pm index 875059bfa..98a53536f 100644 --- a/SL/IR.pm +++ b/SL/IR.pm @@ -1007,7 +1007,7 @@ sub retrieve_item { foreach my $table_column (qw(p.partnumber p.description pg.partsgroup)) { my $field = (split m{\.}, $table_column)[1]; next unless $form->{"${field}_${i}"}; - $where .= " AND lower(${table_column}) LIKE ?"; + $where .= " AND lower(${table_column}) LIKE lower(?)"; push @values, '%' . $form->{"${field}_${i}"} . '%'; }