projekt kivitendo

  $self->{report} = $report;

  my @columns_order = qw(

    id

    record_number

    shipvia => {

      sub      => sub { $_[0]->shipvia },

    },

    #shipto_id => {

    #  sub      => sub { $_[0]->shipto ? $_[0]->shipto->shiptoname : '' },

    #},

  map { $column_defs{$_}->{visible} = $::form->{active_in_report}->{"$_"} }

    keys %column_defs;

  #my %cvar_column_defs = map {

  #  my $cfg = $_;

  #  (('cvar_' . $cfg->name) => {

  );

  $report->set_columns(%column_defs);

  $report->set_column_order(@columns_order);

  $report->set_export_options(qw(list filter active_in_report));

  $report->set_options_from_form;

  $self->models->set_report_generator_sort_options(report => $report, sortable_columns => \@sortable);