From 14cb0d372f4a99e49fd1097850f076709820d1f3 Mon Sep 17 00:00:00 2001 From: "G. Richardson" Date: Thu, 19 May 2011 11:17:21 +0200 Subject: [PATCH] Bug in Verkaufsbericht bei leerem Eingabefeld Kundenname behoben MIME-Version: 1.0 Content-Type: text/plain; charset=utf8 Content-Transfer-Encoding: 8bit Betraf nur Fälle, wo Textbox statt Drop-Down-Box aktiv war und das Kundennamenfeld leer gelassen wurde. --- bin/mozilla/vk.pl | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) diff --git a/bin/mozilla/vk.pl b/bin/mozilla/vk.pl index 5dba978d7..652a0cd24 100644 --- a/bin/mozilla/vk.pl +++ b/bin/mozilla/vk.pl @@ -90,8 +90,8 @@ sub invoice_transactions { if ( $form->{customer} =~ /--/ ) { # Felddaten kommen aus Dropdownbox ($form->{customername}, $form->{customer_id}) = split(/--/, $form->{customer}); - } else { - # Felddaten kommen aus Freitextfeld + } elsif ($form->{customer}) { + # es wurde ein Wert im Freitextfeld übergeben, auf Eindeutigkeit überprüfen # check_name wird mit no_select => 1 ausgeführt, ist die Abfrage nicht eindeutig kommt ein Fehler # und die Abfrage muß erneut ausgeführt werden @@ -100,10 +100,11 @@ sub invoice_transactions { # Nichts führt, daher diese Zwischenlösung &check_name('customer', no_select => 1); - + # $form->{customer_id} wurde schon von check_name gesetzt $form->{customername} = $form->{customer}; }; + # ist $form->{customer} leer passiert hier nichts weiter # decimalplaces überprüfen oder auf Default 2 setzen $form->{decimalplaces} = 2 unless $form->{decimalplaces} > 0 && $form->{decimalplaces} < 6; -- 2.20.1