X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/c3f06703233a890d50c5838d149e6d0d0e5a0e60..6561709b302945fb69be76c6a5b1b1236b06511c:/SL/AM.pm diff --git a/SL/AM.pm b/SL/AM.pm index 1a085b8bd..59e9c785c 100644 --- a/SL/AM.pm +++ b/SL/AM.pm @@ -269,17 +269,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 = ?,