Revision dc262059
Von Jan Büren vor fast 11 Jahren hinzugefügt
| SL/Form.pm | ||
|---|---|---|
| 1955 | 1955 |
my $terms = $self->{payment_id} ? SL::DB::PaymentTerm->new(id => $self->{payment_id}) ->load
|
| 1956 | 1956 |
: $self->{customer_id} ? SL::DB::Customer ->new(id => $self->{customer_id})->load->payment
|
| 1957 | 1957 |
: $self->{vendor_id} ? SL::DB::Vendor ->new(id => $self->{vendor_id}) ->load->payment
|
| 1958 |
: croak("Missing field in \$::form: payment_id, customer_id or vendor_id");
|
|
| 1959 |
|
|
| 1958 |
: $self->{invdate} ? undef # no payment terms, therefore invdate == duedate
|
|
| 1959 |
: croak("Missing field in \$::form: payment_id, customer_id, vendor_id or invdate");
|
|
| 1960 | 1960 |
my $duedate = $terms ? $terms->calc_date(reference_date => $reference_date)->to_kivitendo : undef; |
| 1961 | 1961 |
|
| 1962 | 1962 |
$main::lxdebug->leave_sub(); |
Auch abrufbar als: Unified diff
Fälligkeitsdatum auf Rechnungsdatum setzen, falls nichts weiter konfiguriert (#2440)
Ist in io.pl auch schon so vorgesehen:
print $form->ajax_response_header() . ($duedate || $invdate);
Allerdings schmeißt die get_duedate-Funktion in Form.pm einen Fehler, weil keine
der benötigten Parameter übergeben werden. S.a. Debug von $self:
'script' => 'is.pl',
'titlebar' => 'kivitendo Version 3.0.0',
'version' => '3.0.0',
'action' => 'set_duedate',
'payment_id' => '',
'invdate' => '14.01.2014',
'login' => 'jan_skr04'
}, 'Form' );
Von daher die Erweiterung, ob invdate existiert und enstprechend ein undef als Rückgabewert
closes #2440