Auftrags-Controller: vorhandene orderitems vor Neu-Schreiben nicht löschen …

[kivitendo-erp.git] / SL / AR.pm

diff --git a/SL/AR.pm b/SL/AR.pm
index 625812223f4f7050f6f964fe3b948b35077acab6..405a7f2fca050b6525921f5c110af0f888a652f4 100644 (file)
--- 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);