Revision ab77e6ef
Von Sven Schöling vor etwa 8 Jahren hinzugefügt
SL/GDPDU.pm | ||
---|---|---|
400 | 400 |
my $is_payment = any { $_->{link} =~ m{A[PR]_paid} } @{ $transaction }; |
401 | 401 |
|
402 | 402 |
my ($soll, $haben) = map { $transaction->[$_] } ($transaction->[0]->{amount} > 0 ? (1, 0) : (0, 1)); |
403 |
my $tax = defined($soll->{tax_accno}) ? $soll : $haben;
|
|
403 |
my $tax = defined($soll->{tax_amount}) ? $soll : defined($haben->{tax_amount}) ? $haben : {};
|
|
404 | 404 |
my $amount = defined($soll->{net_amount}) ? $soll : $haben; |
405 | 405 |
$haben->{notes} = ($haben->{memo} || $soll->{memo}) if $haben->{memo} || $soll->{memo}; |
406 | 406 |
$haben->{notes} //= ''; |
Auch abrufbar als: Unified diff
GDPDU: Behandlung von Skonto-Steuerrückbuchungen
In diesem Fall konkret:
- 3308.73 Umsatzsteuer
+ 0.10 Erlösminderung
+ 3308.63 gewährte Skonti