Storno von Debitorenbuchungen: richtige Tabelle bzgl. 'paid' aktualisieren

diff --git a/SL/AR.pm b/SL/AR.pm
index 98a3029..a4d1000 100644 (file)
--- a/SL/AR.pm
+++ b/SL/AR.pm
@@ -697,7 +697,7 @@ sub storno {
     do_query($form, $dbh, $query, (values %$row));
   }
 
-  map { IO->set_datepaid(table => 'ap', id => $_, dbh => $dbh) } ($id, $new_id);
+  map { IO->set_datepaid(table => 'ar', id => $_, dbh => $dbh) } ($id, $new_id);
 
   $dbh->commit;