From: Thomas Heck <theck@linet-services.de> Date: Thu, 8 Nov 2012 14:13:37 +0000 (+0100) Subject: Falschmeldung beim Speichern eines vorhandenen Kontos unterdrücken. X-Git-Tag: release-3.0.0beta1~21^2^2 X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=f72c4ff407800ddd608cf7946165a374f6b3b409;p=kivitendo-erp.git Falschmeldung beim Speichern eines vorhandenen Kontos unterdrücken. behebt #2041 --- diff --git a/SL/AM.pm b/SL/AM.pm index 6862eb773..0e64e5a66 100644 --- a/SL/AM.pm +++ b/SL/AM.pm @@ -244,11 +244,18 @@ sub save_account { } $query = ' - SELECT - accno + SELECT accno FROM chart WHERE accno = ?'; - my ($accno) = selectrow_query($form, $dbh, $query, $form->{accno}); + + my @values = ($form->{accno}); + + if ( $form->{id} ) { + $query .= ' AND NOT id = ?'; + push(@values, $form->{id}); + } + + my ($accno) = selectrow_query($form, $dbh, $query, @values); if ($accno) { $form->error($::locale->text('Account number not unique!'));