From: Martin Helmling mh@waldpark.octosoft.eu <martin.helmling@octosoft.eu>
Date: Wed, 2 Mar 2016 13:49:57 +0000 (+0100)
Subject: 4. Überarbeitung Prüfen beim Speichern, ob Dokument geändert ist(3)
X-Git-Tag: release-3.4.1~371
X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=44703001ea7d51f4e1eda2db2cc040713661bffc;p=kivitendo-erp.git

4. Überarbeitung Prüfen beim Speichern, ob Dokument geändert ist(3)

In der Ruhe liegt die Kraft.
Jetzt sind die Zeilen in den storno-Funktionen wieder eingebaut
---

diff --git a/SL/AP.pm b/SL/AP.pm
index 08dd54224..bbddd6e8c 100644
--- a/SL/AP.pm
+++ b/SL/AP.pm
@@ -811,6 +811,8 @@ sub storno {
   $query = qq|UPDATE ap SET paid = amount + paid, storno = 't' WHERE id = ?|;
   do_query($form, $dbh, $query, $id);
 
+  $form->new_lastmtime('ap') 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);
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);