Kontoeinstellungen: Folgekonto kann nicht das Konto selbst sein.

behebt #329
"Konto mit identischem Folgekonto führt zu Endlosschlaufe"

diff --git a/SL/AM.pm b/SL/AM.pm
index a8a6d3d..e48f55a 100644 (file)
--- a/SL/AM.pm
+++ b/SL/AM.pm
@@ -114,7 +114,7 @@ sub get_account {
     }
 
     # get new accounts (Folgekonto). Find all charts with the same link
-    $form->{NEWACCOUNT} = $chart_obj->db->dbh->selectall_arrayref('select id, accno,description from chart where link = ? order by accno', {Slice => {}}, $chart_obj->link);
+    $form->{NEWACCOUNT} = $chart_obj->db->dbh->selectall_arrayref('select id, accno,description from chart where link = ? and id != ? order by accno', {Slice => {}}, $chart_obj->link, $form->{id});
 
   } else { # set to orphaned for new charts, so chart_type can be changed (needed by $AccountIsPosted)
     $form->{orphaned} = 1;