|
Lines 754-760
elsif ($phase eq 'Run this report'){
Link Here
|
| 754 |
my $quoted = $sql_params[$i]; |
754 |
my $quoted = $sql_params[$i]; |
| 755 |
# if there are special regexp chars, we must \ them |
755 |
# if there are special regexp chars, we must \ them |
| 756 |
$split[$i*2+1] =~ s/(\||\?|\.|\*|\(|\)|\%)/\\$1/g; |
756 |
$split[$i*2+1] =~ s/(\||\?|\.|\*|\(|\)|\%)/\\$1/g; |
| 757 |
if ($split[$i*2+1] =~ /|date>>/) { |
757 |
if ($split[$i*2+1] =~ /\|date$/) { |
| 758 |
$quoted = output_pref({ dt => dt_from_string($quoted), dateformat => 'iso', dateonly => 1 }) if $quoted; |
758 |
$quoted = output_pref({ dt => dt_from_string($quoted), dateformat => 'iso', dateonly => 1 }) if $quoted; |
| 759 |
} |
759 |
} |
| 760 |
$quoted = C4::Context->dbh->quote($quoted); |
760 |
$quoted = C4::Context->dbh->quote($quoted); |
| 761 |
- |
|
|