Revision bc40bcab
Von Moritz Bunkus vor mehr als 8 Jahren hinzugefügt
SL/RP.pm | ||
---|---|---|
1521 | 1521 |
my $invnumber; |
1522 | 1522 |
my $reference; |
1523 | 1523 |
if ($form->{reference}) { |
1524 |
$reference = $dbh->quote('%' . $form->{reference} . '%');
|
|
1524 |
$reference = $dbh->quote(like($form->{reference}));
|
|
1525 | 1525 |
$invnumber = " AND (a.invnumber LIKE $reference)"; |
1526 | 1526 |
$reference = " AND (a.reference LIKE $reference)"; |
1527 | 1527 |
} |
1528 | 1528 |
if ($form->{source}) { |
1529 |
$where .= " AND (ac.source ILIKE " . $dbh->quote('%' . $form->{source} . '%') . ") ";
|
|
1529 |
$where .= " AND (ac.source ILIKE " . $dbh->quote(like($form->{source})) . ") ";
|
|
1530 | 1530 |
} |
1531 | 1531 |
if ($form->{memo}) { |
1532 |
$where .= " AND (ac.memo ILIKE " . $dbh->quote('%' . $form->{memo} . '%') . ") ";
|
|
1532 |
$where .= " AND (ac.memo ILIKE " . $dbh->quote(like($form->{memo})) . ") ";
|
|
1533 | 1533 |
} |
1534 | 1534 |
|
1535 | 1535 |
my %sort_columns = ( |
Auch abrufbar als: Unified diff
(I)LIKE-Argumente immer mit Funktion SL::DBUtils::like erstellen