- #}\r
-\r
- $OUT .= '\hline';\r
- $OUT .= '\endlastfoot';\r
-\r
- my $lastref = 0;\r
- foreach my $line (\r
- grep { ( scalar( @sections ) > 1 \r
- ? $section->{'description'} eq $_->{'section'}->{'description'}\r
- : 1\r
- ) }\r
- @detail_items )\r
- {\r
- my $ext_description = $line->{'ext_description'};\r
+ $OUT .= '\endfirsthead';\r
+ $OUT .= '\multicolumn{7}{r}{\rule{0pt}{2.5ex}'.emt('Continued from previous page').'}\\\\';\r
+ if ($section->{header_generator}) {\r
+ $OUT .= &{$section->{header_generator}}();\r
+ } else {\r
+ $OUT .= '\FShead';\r
+ }\r
+ $OUT .= '\endhead';\r
+ $OUT .= '\multicolumn{7}{r}{\rule{0pt}{2.5ex}'.emt('Continued on next page...').'}\\\\';\r
+ $OUT .= '\endfoot';\r
+ $OUT .= '\hline';\r
+\r
+ if (scalar(@sections) > 1 and !$section->{no_subtotal}) {\r
+ if ($section->{total_generator}) {\r
+ $OUT .= &{$section->{total_generator}}($section);\r
+ } else {\r
+ $OUT .= '\FStotaldesc{' . $section->{'description'} . ' Total}' .\r
+ '{' . $section->{'subtotal'} . '}' . "\n";\r
+ }\r
+ }\r
+\r
+ #if ($section == $sections[$#sections]) {\r
+ foreach my $line (grep {$_->{section}->{description} eq $section->{description}} @total_items) {\r
+ if ($section->{total_line_generator}) {\r
+ $OUT .= &{$section->{total_line_generator}}($line);\r
+ } else {\r
+ $OUT .= '\FStotaldesc{' . $line->{'total_item'} . '}' .\r
+ '{' . $line->{'total_amount'} . '}' . "\n";\r
+ }\r
+ }\r
+ #}\r
+\r
+ $OUT .= '\hline';\r
+ $OUT .= '\endlastfoot';\r
+\r
+ my $lastref = 0;\r
+ foreach my $line (\r
+ grep { ( scalar( @sections ) > 1 \r
+ ? $section->{'description'} eq $_->{'section'}->{'description'}\r
+ : 1\r
+ ) }\r
+ @detail_items )\r
+ {\r
+ my $ext_description = $line->{'ext_description'};\r