X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/2a4f08f528db948afb887977278667db2784c0ee..3578314fb94f63b04ee3bf34e91f1bed898fc434:/SL/AP.pm

diff --git a/SL/AP.pm b/SL/AP.pm
index 6925c20d1..072c66529 100644
--- a/SL/AP.pm
+++ b/SL/AP.pm
@@ -480,8 +480,8 @@ sub get_transdate {
 
   my $query =
     "SELECT COALESCE(" .
-    "  (SELECT transdate FROM gl WHERE id = " .
-    "    (SELECT MAX(id) FROM gl) LIMIT 1), " .
+    "  (SELECT transdate FROM ap WHERE id = " .
+    "    (SELECT MAX(id) FROM ap) LIMIT 1), " .
     "  current_date)";
   ($form->{transdate}) = $dbh->selectrow_array($query);