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 |
- |
|
|