Revision 73e9f6e3
Von Bernd Bleßmann vor mehr als 1 Jahr hinzugefügt
SL/DB/GLTransaction.pm | ||
---|---|---|
152 | 152 |
$taxamount *= -1; |
153 | 153 |
}; |
154 | 154 |
|
155 |
next unless $netamount; # skip entries with netamount 0
|
|
155 |
return unless $netamount; # skip entries with netamount 0
|
|
156 | 156 |
|
157 | 157 |
# initialise transactions if it doesn't exist yet |
158 | 158 |
$self->transactions([]) unless $self->transactions; |
SL/DB/Invoice.pm | ||
---|---|---|
380 | 380 |
if ( $tax and $tax->rate != 0 ) { |
381 | 381 |
($netamount, $taxamount) = Form->calculate_tax($params{amount}, $tax->rate, $self->taxincluded, $roundplaces); |
382 | 382 |
}; |
383 |
next unless $netamount; # netamount mustn't be zero |
|
383 |
|
|
384 |
return unless $netamount; # netamount mustn't be zero |
|
385 |
|
|
384 | 386 |
my $sign = $self->customer_id ? 1 : -1; |
385 | 387 |
my $acc = SL::DB::AccTransaction->new( |
386 | 388 |
amount => $netamount * $sign, |
SL/DB/PurchaseInvoice.pm | ||
---|---|---|
187 | 187 |
if ( $tax and $tax->rate != 0 ) { |
188 | 188 |
($netamount, $taxamount) = Form->calculate_tax($params{amount}, $tax->rate, $self->taxincluded, $roundplaces); |
189 | 189 |
}; |
190 |
next unless $netamount; # netamount mustn't be zero |
|
190 |
|
|
191 |
return unless $netamount; # netamount mustn't be zero |
|
191 | 192 |
|
192 | 193 |
my $sign = $self->vendor_id ? -1 : 1; |
193 | 194 |
my $acc = SL::DB::AccTransaction->new( |
Auch abrufbar als: Unified diff
"return" statt "next", um subroutine zu verlassen