Revision 5aaac4ce
Von Martin Helmling vor etwa 3 Jahren hinzugefügt
| SL/DB/PaymentTerm.pm | ||
|---|---|---|
| 35 | 35 |
} |
| 36 | 36 |
|
| 37 | 37 |
my $terms = ($params{terms} // 'net') eq 'discount' ? 'terms_skonto' : 'terms_netto';
|
| 38 |
my $date = $reference_date->add(days => $self->$terms); |
|
| 38 |
my $date = $reference_date->clone->add(days => $self->$terms);
|
|
| 39 | 39 |
|
| 40 | 40 |
my $dow = $date->day_of_week; |
| 41 | 41 |
$date = $date->add(days => 8 - $dow) if $dow > 5; |
Auch abrufbar als: Unified diff
Zahlungsbedingungen: "calc_date" überschreibt Referenzdatum
Die Methode "calc_date" erzeugt das neue Datum ohne ein neues Objekt zu
erzeugen.
Deshalb wird ggf der Parameter "reference_date" überschrieben.
Nun wird ein neues Datumsobjekt per "clone" erzeugt.
gefunden bei egw 13209
(cherry picked from commit ac77e995e74bef6f408045eda95ebc775430b17d)
(cherry-pick vonm odyn)