use Carp;
use List::Util qw(max);
-use SL::Form;
use SL::Common;
use SL::MoreCommon;
use SL::ReportGenerator;
sub action_report_generator_export_as_pdf {
my ($self) = @_;
+
+ delete $::form->{action_report_generator_export_as_pdf};
+
if ($::form->{report_generator_pdf_options_set}) {
my $saved_form = save_form();
sub action_report_generator_export_as_csv {
my ($self) = @_;
+
+ delete $::form->{action_report_generator_export_as_csv};
+
if ($::form->{report_generator_csv_options_set}) {
$self->report_generator_do('CSV');
return;
$params{layout} //= 1;
my $column_defs = $params{report}->{columns};
- my @columns = $params{report}->get_visible_columns;
+ my @columns = $params{report}->get_visible_columns('HTML');
for my $obj (@{ $params{objects} || [] }) {
my %data = map {