X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/kivitendo-erp.git/blobdiff_plain/60de0703a74f40f6b49ba7f47fc2b5e54937e5d3..5dd5e97bc9fe0aee0be2621fe11d48c86be40a5d:/SL/AR.pm diff --git a/SL/AR.pm b/SL/AR.pm index 625812223..405a7f2fc 100644 --- a/SL/AR.pm +++ b/SL/AR.pm @@ -772,6 +772,8 @@ sub storno { $query = qq|UPDATE ar SET paid = amount + paid, storno = 't' WHERE id = ?|; do_query($form, $dbh, $query, $id); + $form->new_lastmtime('ar') if $id == $form->{id}; + # now copy acc_trans entries $query = qq|SELECT a.*, c.link FROM acc_trans a LEFT JOIN chart c ON a.chart_id = c.id WHERE a.trans_id = ? ORDER BY a.acc_trans_id|; my $rowref = selectall_hashref_query($form, $dbh, $query, $id);