X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FIR.pm;h=22c1a286631e55cf3da5dc97d5e92c6431aa1918;hb=cae6316e718234083b892b042e61714ceb13b0ca;hp=12add2af13ef867415b17d3498df6b600050d056;hpb=18567de558741ddb195c8731b12c2e70f14c51fc;p=kivitendo-erp.git diff --git a/SL/IR.pm b/SL/IR.pm index 12add2af1..22c1a2866 100644 --- a/SL/IR.pm +++ b/SL/IR.pm @@ -725,11 +725,11 @@ sub retrieve_invoice { my ($query, $sth, $ref, $q_invdate); if (!$form->{id}) { - $q_invdate = qq|, COALESCE((SELECT MAX(transdate) FROM ar), current_date) AS invdate|; + $q_invdate = qq|, COALESCE((SELECT transdate FROM ar WHERE id = (SELECT MAX(id) FROM ar)), current_date) AS invdate|; if ($form->{vendor_id}) { my $vendor_id = $dbh->quote($form->{vendor_id} * 1); $q_invdate .= - qq|, COALESCE((SELECT MAX(transdate) FROM ar), current_date) + + qq|, COALESCE((SELECT transdate FROM ar WHERE id = (SELECT MAX(id) FROM ar)), current_date) + COALESCE((SELECT pt.terms_netto FROM vendor v LEFT JOIN payment_terms pt ON (v.payment_id = pt.id)