Revision 7b38e23d
Von Bernd Bleßmann vor mehr als 11 Jahren hinzugefügt
| SL/Controller/CsvImport.pm | ||
|---|---|---|
| 152 | 152 |
my $page = $::form->{page} || 1;
|
| 153 | 153 |
my $pages = {};
|
| 154 | 154 |
$pages->{per_page} = $::form->{per_page} || 20;
|
| 155 |
$pages->{max} = SL::DB::Helper::Paginated::ceil($num_rows / ($num_cols || 1), $pages->{per_page}) || 1;
|
|
| 155 |
$pages->{max} = SL::DB::Helper::Paginated::ceil($num_rows, $pages->{per_page}) || 1;
|
|
| 156 | 156 |
$pages->{cur} = $page < 1 ? 1
|
| 157 | 157 |
: $page > $pages->{max} ? $pages->{max}
|
| 158 | 158 |
: $page; |
| ... | ... | |
| 162 | 162 |
0, |
| 163 | 163 |
$pages->{per_page} * ($pages->{cur}-1) + 1
|
| 164 | 164 |
.. |
| 165 |
min($pages->{per_page} * $pages->{cur}, $num_rows / ($num_cols || 1) - 1)
|
|
| 165 |
min($pages->{per_page} * $pages->{cur}, $num_rows)
|
|
| 166 | 166 |
]; |
| 167 | 167 |
|
| 168 | 168 |
my @query = ( |
Auch abrufbar als: Unified diff
Beim CSV-Import im Report alle Zeilen anzeigen.
Fixt #2175.