Revision 2b5c7398
Von Moritz Bunkus vor etwa 4 Jahren hinzugefügt
| SL/DB/Invoice.pm | ||
|---|---|---|
| 173 | 173 |
$terms = $source->customer->payment_terms if !defined $terms && $source->customer; |
| 174 | 174 |
|
| 175 | 175 |
my %args = ( map({ ( $_ => $source->$_ ) } qw(customer_id taxincluded shippingpoint shipvia notes intnotes salesman_id cusordnumber ordnumber department_id
|
| 176 |
cp_id language_id taxzone_id globalproject_id transaction_description currency_id delivery_term_id), @columns), |
|
| 176 |
cp_id language_id taxzone_id tax_point globalproject_id transaction_description currency_id delivery_term_id), @columns),
|
|
| 177 | 177 |
transdate => $params{transdate} // DateTime->today_local,
|
| 178 | 178 |
gldate => DateTime->today_local, |
| 179 | 179 |
duedate => $terms ? $terms->calc_date(reference_date => DateTime->today_local) : DateTime->today_local, |
Auch abrufbar als: Unified diff
SL::DB::Invoice->new_from: auch Leistungsdatum (tax_point) übernehmen