X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/kivitendo-erp.git/blobdiff_plain/03f9eac39d30ffe348947910e98929292ef42617..418a7036d511164bbfd0395084cd7158c4ab32d0:/SL/IS.pm diff --git a/SL/IS.pm b/SL/IS.pm index 6e9e96012..7d6413094 100644 --- a/SL/IS.pm +++ b/SL/IS.pm @@ -1244,6 +1244,8 @@ SQL $query = qq|UPDATE ar SET paid = ? WHERE id = ?|; do_query($form, $dbh, $query, $form->{paid}, conv_i($form->{id})); + $form->new_lastmtime('ar'); + $dbh->commit if !$provided_dbh; $main::lxdebug->leave_sub(); @@ -1299,6 +1301,8 @@ SQL do_query($form, $dbh, qq|UPDATE ar SET paid = amount WHERE id = ?|, conv_i($form->{"id"})); } + $form->new_lastmtime('ar'); + $form->{name} = $form->{customer}; $form->{name} =~ s/--\Q$form->{customer_id}\E//;