Lines 1090-1096
sub get_prepped_report {
Link Here
|
1090 |
|
1090 |
|
1091 |
my %lookup; |
1091 |
my %lookup; |
1092 |
@lookup{@$param_names} = @$sql_params; |
1092 |
@lookup{@$param_names} = @$sql_params; |
1093 |
my @split = split /<<|>>/,$sql; |
1093 |
@split = split /<<|>>/,$sql; |
1094 |
my @tmpl_parameters; |
1094 |
my @tmpl_parameters; |
1095 |
for(my $i=0;$i<$#split/2;$i++) { |
1095 |
for(my $i=0;$i<$#split/2;$i++) { |
1096 |
my $quoted = @$param_names ? $lookup{ $split[$i*2+1] } : @$sql_params[$i]; |
1096 |
my $quoted = @$param_names ? $lookup{ $split[$i*2+1] } : @$sql_params[$i]; |
1097 |
- |
|
|