Revision 5a9d765f
Von Philip Reetz vor etwa 17 Jahren hinzugefügt
bin/mozilla/oe.pl | ||
---|---|---|
1761 | 1761 |
# escape callback for href |
1762 | 1762 |
$callback = $form->escape($href); |
1763 | 1763 |
|
1764 |
my @subtotal_columns = qw(netamount amount marge_total); |
|
1764 |
my @subtotal_columns = qw(netamount amount marge_total marge_percent);
|
|
1765 | 1765 |
|
1766 | 1766 |
my %totals = map { $_ => 0 } @subtotal_columns; |
1767 | 1767 |
my %subtotals = map { $_ => 0 } @subtotal_columns; |
... | ... | |
1779 | 1779 |
|
1780 | 1780 |
map { $subtotals{$_} += $oe->{$_}; |
1781 | 1781 |
$totals{$_} += $oe->{$_} } @subtotal_columns; |
1782 |
$subtotals{marge_percent} = $subtotals{marge_total} / $subtotals{netamount} * 100; |
|
1783 |
$totals{marge_percent} = $totals{marge_total} / $totals{netamount} * 100; |
|
1782 | 1784 |
|
1783 | 1785 |
map { $oe->{$_} = $form->format_amount(\%myconfig, $oe->{$_}, 2) } qw(netamount tax amount marge_total marge_percent); |
1784 | 1786 |
|
Auch abrufbar als: Unified diff
In Berichten ar und oe auch die prozentuale Marge bei Zwischensummen und Gesammtsummen ausgeben