Revision b3089c09
Von Bernd Bleßmann vor mehr als 4 Jahren hinzugefügt
| SL/DB/Helper/ZUGFeRD.pm | ||
|---|---|---|
| 214 | 214 |
$info->{taxkey} //= SL::DB::TaxKey->load_cached($item->{taxkey_id});
|
| 215 | 215 |
$info->{tax} //= SL::DB::Tax->load_cached($info->{taxkey}->tax_id);
|
| 216 | 216 |
$info->{linetotal} += $item->{linetotal};
|
| 217 |
$info->{tax_amount} += $item->{tax_amount};
|
|
| 218 | 217 |
} |
| 219 | 218 |
|
| 220 | 219 |
foreach my $taxkey_id (sort keys %taxkey_info) {
|
| ... | ... | |
| 223 | 222 |
|
| 224 | 223 |
# <ram:ApplicableTradeTax> |
| 225 | 224 |
$params{xml}->startTag("ram:ApplicableTradeTax");
|
| 226 |
$params{xml}->dataElement("ram:CalculatedAmount", _r2($params{ptc_data}->{taxes}->{$info->{tax}->{chart_id}}));
|
|
| 225 |
$params{xml}->dataElement("ram:CalculatedAmount", _r2($params{ptc_data}->{taxes_by_tax_id}->{$info->{taxkey}->tax_id}));
|
|
| 227 | 226 |
$params{xml}->dataElement("ram:TypeCode", "VAT");
|
| 228 | 227 |
$params{xml}->dataElement("ram:BasisAmount", _r2($info->{linetotal}));
|
| 229 | 228 |
$params{xml}->dataElement("ram:CategoryCode", $tax_info{code});
|
Auch abrufbar als: Unified diff
ZUGFeRD: Steuerwerte pro Steuer, nicht pro Steuerkonto ausweisen