X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/f46bab538d8953b357098ca4ff9ace670d9b0d55..c6be179d8db02c2704dd9d59005297837f19b37a:/SL/Controller/CsvImport.pm diff --git a/SL/Controller/CsvImport.pm b/SL/Controller/CsvImport.pm index dda08821f..c3b9d99cc 100644 --- a/SL/Controller/CsvImport.pm +++ b/SL/Controller/CsvImport.pm @@ -152,7 +152,7 @@ sub action_report { my $page = $::form->{page} || 1; my $pages = {}; $pages->{per_page} = $::form->{per_page} || 20; - $pages->{max} = SL::DB::Helper::Paginated::ceil($num_rows / ($num_cols || 1), $pages->{per_page}) || 1; + $pages->{max} = SL::DB::Helper::Paginated::ceil($num_rows, $pages->{per_page}) || 1; $pages->{cur} = $page < 1 ? 1 : $page > $pages->{max} ? $pages->{max} : $page; @@ -162,7 +162,7 @@ sub action_report { 0, $pages->{per_page} * ($pages->{cur}-1) + 1 .. - min($pages->{per_page} * $pages->{cur}, $num_rows / ($num_cols || 1) - 1) + min($pages->{per_page} * $pages->{cur}, $num_rows) ]; my @query = ( @@ -272,10 +272,11 @@ sub test_and_import_deferred { } $self->{background_job} = SL::BackgroundJob::CsvImport->create_job( - file => $self->csv_file_name, - profile => $self->profile, - type => $self->profile->type, - test => $params{test}, + file => $self->csv_file_name, + profile => $self->profile, + type => $self->profile->type, + test => $params{test}, + employee_id => SL::DB::Manager::Employee->current->id, )->save; if ($self->task_server->is_running) { @@ -416,7 +417,7 @@ sub save_report { my (@headers, @info_methods, @raw_methods, @methods); for my $i (0 .. $#{ $self->info_headers->{headers} }) { - next unless $self->info_headers->{used}->{ $self->info_headers->{headers}->[$i] }; + next unless $self->info_headers->{used}->{ $self->info_headers->{methods}->[$i] }; push @headers, $self->info_headers->{headers}->[$i]; push @info_methods, $self->info_headers->{methods}->[$i]; }