From: Niclas Zimmermann <niclas@kivitendo-premium.de>
Date: Tue, 30 Oct 2012 10:03:44 +0000 (+0100)
Subject: Verständliche Fehlermeldung bei doppelten Kontonummern
X-Git-Tag: release-3.0.0beta1~38^2~2
X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=0e494483d38354fdfac2364ef4d0de0874f1ada7;p=kivitendo-erp.git

Verständliche Fehlermeldung bei doppelten Kontonummern

Bisher kam es nur zu einer verständlichen Fehlermeldung, wenn
man die geänderte Kontonummer speichern wollte. Jetzt wird auch
eine verständliche Fehlermeldung ausgegeben, wenn man das Konto
als neues Konto speichern will.

Siehe auch Ticket #2030
---

diff --git a/SL/AM.pm b/SL/AM.pm
index 1a085b8bd..6862eb773 100644
--- a/SL/AM.pm
+++ b/SL/AM.pm
@@ -243,6 +243,18 @@ sub save_account {
     $form->{id} = "";
   }
 
+  $query = '
+    SELECT
+    accno
+    FROM chart
+    WHERE accno = ?';
+  my ($accno) = selectrow_query($form, $dbh, $query, $form->{accno});
+
+  if ($accno) {
+    $form->error($::locale->text('Account number not unique!'));
+  }
+
+
   if (!$form->{id} || $form->{id} eq "") {
     $query = qq|SELECT nextval('id')|;
     ($form->{"id"}) = selectrow_query($form, $dbh, $query);
@@ -269,17 +281,6 @@ sub save_account {
       $form->{valid_from} = '';
     };
 
-    $query = '
-      SELECT
-        accno
-      FROM chart
-      WHERE accno = ?';
-    my ($accno) = selectrow_query($form, $dbh, $query, $form->{accno});
-
-    if ($accno) {
-      $form->error($::locale->text('Account number not unique!'));
-    }
-
     $query = qq|UPDATE chart SET
                   accno = ?,
                   description = ?,