Revision 43e21b93
Von Sven Schöling vor etwa 8 Jahren hinzugefügt
| SL/GoBD.pm | ||
|---|---|---|
| 448 | 448 |
$haben->{notes} //= '';
|
| 449 | 449 |
$haben->{notes} = SL::HTML::Util->strip($haben->{notes});
|
| 450 | 450 |
|
| 451 |
my $net_amount = defined $amount->{net_amount}
|
|
| 452 |
? $::form->format_amount($myconfig, abs($amount->{net_amount}), 5)
|
|
| 453 |
: 0; |
|
| 454 | 451 |
my $tax_amount = defined $amount->{net_amount}
|
| 455 | 452 |
? $::form->format_amount($myconfig, abs($amount->{amount}) - abs($amount->{net_amount}), 5)
|
| 456 | 453 |
: 0; |
| ... | ... | |
| 459 | 456 |
amount => $::form->format_amount($myconfig, abs($amount->{amount}),5),
|
| 460 | 457 |
debit_accno => $soll->{accno},
|
| 461 | 458 |
debit_accname => $soll->{accname},
|
| 462 |
debit_amount => -$soll->{amount},
|
|
| 459 |
debit_amount => $::form->format_amount($myconfig, abs(-$soll->{amount}),5),
|
|
| 463 | 460 |
debit_tax => $soll->{tax_accno} ? $tax_amount : 0,
|
| 464 | 461 |
credit_accno => $haben->{accno},
|
| 465 | 462 |
credit_accname => $haben->{accname},
|
| 466 |
credit_amount => $haben->{amount},
|
|
| 463 |
credit_amount => $::form->format_amount($myconfig, abs($haben->{amount}),5),,
|
|
| 467 | 464 |
credit_tax => $haben->{tax_accno} ? $tax_amount : 0,
|
| 468 | 465 |
tax => $tax_amount, |
| 469 | 466 |
notes => $haben->{notes},
|
Auch abrufbar als: Unified diff
GoBD: credit/debit_amount formatieren