Lines 619-625
elsif ($op eq 'export'){
Link Here
|
619 |
my @sql_params = $input->multi_param('sql_params'); |
619 |
my @sql_params = $input->multi_param('sql_params'); |
620 |
my $format = $input->param('format'); |
620 |
my $format = $input->param('format'); |
621 |
my $reportname = $input->param('reportname'); |
621 |
my $reportname = $input->param('reportname'); |
622 |
my $reportfilename = $reportname ? "$reportname-reportresults.$format" : "reportresults.$format" ; |
622 |
my $reportfilename = $reportname ? "$report_id-$reportname-reportresults.$format" : "$report_id-reportresults.$format" ; |
623 |
|
623 |
|
624 |
($sql, undef) = $report->prep_report( \@param_names, \@sql_params ); |
624 |
($sql, undef) = $report->prep_report( \@param_names, \@sql_params ); |
625 |
my ( $sth, $q_errors ) = execute_query( { sql => $sql, report_id => $report_id } ); |
625 |
my ( $sth, $q_errors ) = execute_query( { sql => $sql, report_id => $report_id } ); |
626 |
- |
|
|