Revision 0e04ddd7
Von Rolf Fluehmann vor mehr als 7 Jahren hinzugefügt
| SL/RP.pm | ||
|---|---|---|
| 1914 | 1914 |
foreach my $account (@{$category{accounts}}) {
|
| 1915 | 1915 |
$account->{total} += get_total_ch($account->{id}, $fromdate, $todate);
|
| 1916 | 1916 |
$category{total} += $account->{total};
|
| 1917 |
$account->{total} = $form->format_amount($myconfig, $form->parse_amount($myconfig, $account->{total}), 2);
|
|
| 1917 |
$account->{total} = $form->format_amount($myconfig, $form->round_amount($account->{total}, 2), 2);
|
|
| 1918 | 1918 |
} |
| 1919 | 1919 |
$form->{total} += $category{total};
|
| 1920 |
$category{total} = $form->format_amount($myconfig, $form->parse_amount($myconfig, $category{total}), 2);
|
|
| 1920 |
$category{total} = $form->format_amount($myconfig, $form->round_amount($category{total}, 2), 2);
|
|
| 1921 | 1921 |
push(@{$form->{categories}}, \%category);
|
| 1922 | 1922 |
} |
| 1923 |
$form->{total} = $form->format_amount($myconfig, $form->parse_amount($myconfig, $form->{total}), 2);
|
|
| 1923 |
$form->{total} = $form->format_amount($myconfig, $form->round_amount($form->{total}, 2), 2);
|
|
| 1924 | 1924 |
|
| 1925 | 1925 |
$main::lxdebug->leave_sub(); |
| 1926 | 1926 |
return {};
|
Auch abrufbar als: Unified diff
Anpassung der CH-Erfolgsrechnung für nicht CH-Ausgabeformate