X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FReportGenerator.pm;h=402f89d434709e02623ff3101c4437de222ce583;hb=863306157cee10bd58abb8f032083f04cea4e72b;hp=6c61acbc0a992acf4564aac7dfc0f2eb25d10160;hpb=e3b43a8c921b96ebf56e15479ce28fefdac481c3;p=kivitendo-erp.git diff --git a/SL/ReportGenerator.pm b/SL/ReportGenerator.pm index 6c61acbc0..402f89d43 100644 --- a/SL/ReportGenerator.pm +++ b/SL/ReportGenerator.pm @@ -1,7 +1,6 @@ package SL::ReportGenerator; -#use strict; - +use Data::Dumper; use Encode; use IO::Wrap; use List::Util qw(max); @@ -338,7 +337,7 @@ sub prepare_html_content { next; } - my $col = $row->{$col_name}; + my $col = $row->{$col_name} || { data => [] }; $col->{CELL_ROWS} = [ ]; foreach my $i (0 .. scalar(@{ $col->{data} }) - 1) { push @{ $col->{CELL_ROWS} }, {