From: Moritz Bunkus <m.bunkus@linet-services.de>
Date: Mon, 7 May 2007 13:02:34 +0000 (+0000)
Subject: Zwei Fixes:
X-Git-Tag: release-2.4.3^2~368
X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=a426a83959cee5ffc733f14d120677330f873e30;p=kivitendo-erp.git

Zwei Fixes:
1. Bei Angeboten/Aufträgen wird ständig wieder das Formular angezeigt, wenn die Drop-Down-Box zur Auswahl der Kunden/Lieferanten angezeigt wird (weil check_name() in arap.pl auf jeden Fall oldcustomer/oldvendor überprüft, was aber seit einem der letzten Commits nicht mehr gesetzt ist; in ir.pl und is.pl wird es noch gesetzt).
2. Einkaufs-/Verkaufsmasken: Beim Speichern werden Leerzeichen am Anfang und Ende der Angebots-/Auftrags-/Rechnungsnummer gelöscht, damit Lx-Office selber Nummern vergibt. Damit wird verhindert, das nur aus Leerzeichen bestehende Nummern erzeugt werden können, die aus Berichten dann nicht mehr ausgewählt werden können. Fix für Bug 637.
---

diff --git a/bin/mozilla/ir.pl b/bin/mozilla/ir.pl
index 9dd0076c5..e5b698db8 100644
--- a/bin/mozilla/ir.pl
+++ b/bin/mozilla/ir.pl
@@ -1099,6 +1099,9 @@ sub post {
   $form->isblank("invdate", $locale->text('Invoice Date missing!'));
   $form->isblank("vendor",  $locale->text('Vendor missing!'));
 
+  $form->{invnumber} =~ s/^\s*//g;
+  $form->{invnumber} =~ s/\s*$//g;
+
   # if the vendor changed get new values
   if (&check_name(vendor)) {
     &update;
diff --git a/bin/mozilla/is.pl b/bin/mozilla/is.pl
index 7eb339804..e22ab4c40 100644
--- a/bin/mozilla/is.pl
+++ b/bin/mozilla/is.pl
@@ -1412,6 +1412,9 @@ sub post {
   $form->isblank("invdate",  $locale->text('Invoice Date missing!'));
   $form->isblank("customer", $locale->text('Customer missing!'));
 
+  $form->{invnumber} =~ s/^\s*//g;
+  $form->{invnumber} =~ s/\s*$//g;
+
   # if oldcustomer ne customer redo form
   if (&check_name(customer)) {
     &update;
diff --git a/bin/mozilla/oe.pl b/bin/mozilla/oe.pl
index 640fb37e5..2b3ee832c 100644
--- a/bin/mozilla/oe.pl
+++ b/bin/mozilla/oe.pl
@@ -436,6 +436,7 @@ sub form_header {
   }
 
   my $vc = qq|
+      <input type="hidden" name="old$form->{vc}" value="| . H($form->{"old$form->{vc}"}) . qq|">
       <th align="right">| . $locale->text(ucfirst($form->{vc})) . qq|</th>
       <td>| . 
         (($myconfig{vclimit} == 1 ) 
@@ -1927,6 +1928,10 @@ sub save_and_close {
     $form->isblank("transdate", $locale->text('Quotation Date missing!'));
   }
 
+  my $idx = $form->{type} =~ /_quotation$/ ? "quonumber" : "ordnumber";
+  $form->{$idx} =~ s/^\s*//g;
+  $form->{$idx} =~ s/\s*$//g;
+
   $msg = ucfirst $form->{vc};
   $form->isblank($form->{vc}, $locale->text($msg . " missing!"));
 
@@ -2018,6 +2023,10 @@ sub save {
     $form->isblank("transdate", $locale->text('Quotation Date missing!'));
   }
 
+  my $idx = $form->{type} =~ /_quotation$/ ? "quonumber" : "ordnumber";
+  $form->{$idx} =~ s/^\s*//g;
+  $form->{$idx} =~ s/\s*$//g;
+
   $msg = ucfirst $form->{vc};
   $form->isblank($form->{vc}, $locale->text($msg . " missing!"));
 
@@ -2495,6 +2504,8 @@ sub save_as_new {
   # Let Lx-Office assign a new order number if the user hasn't changed the
   # previous one. If it has been changed manually then use it as-is.
   my $idx = $form->{type} =~ /_quotation$/ ? "quonumber" : "ordnumber";
+  $form->{$idx} =~ s/^\s*//g;
+  $form->{$idx} =~ s/\s*$//g;
   if ($form->{saved_xyznumber} &&
       ($form->{saved_xyznumber} eq $form->{$idx})) {
     delete($form->{$idx});