Bugfix 1771 - Zahlungsausgang: Lieferant wird nicht ausgewählt, wenn Name 2 Leerzeich...

Im Browser werden 2 Leerzeichen zu einem zusammengefasst, allerdings bleiben alle Werte die mit value="asdf  jkl"
entsprechend definiert werden erhalten. Somit die Auswahlliste(n) entsprechend um value erweitert und
ferner mit schliessenden </option> versehen.

diff --git a/bin/mozilla/cp.pl b/bin/mozilla/cp.pl
index 86a5890bd5153c9c50689497fd486e99e73d9f60..1f061ad8e6c44bad3a660e10471c9882fa0176bc 100644 (file)
--- a/bin/mozilla/cp.pl
+++ b/bin/mozilla/cp.pl
@@ -66,13 +66,15 @@ sub payment {
   } else {
     CP->get_openvc(\%myconfig, \%$form);
   }
   } else {
     CP->get_openvc(\%myconfig, \%$form);
   }

-
+  # Auswahlliste für vc zusammenbauen
+  # Erweiterung für schliessende option und erweiterung um value
+  # für bugfix 1771 (doppelte Leerzeichen werden nicht 'gepostet')

   $form->{"select$form->{vc}"} = "";
 
   if ($form->{"all_$form->{vc}"}) {
     # s.o. jb 12.10.2010
     $form->{"$form->{vc}_id"} = $form->{"all_$form->{vc}"}->[0]->{id};
   $form->{"select$form->{vc}"} = "";
 
   if ($form->{"all_$form->{vc}"}) {
     # s.o. jb 12.10.2010
     $form->{"$form->{vc}_id"} = $form->{"all_$form->{vc}"}->[0]->{id};

-    map { $form->{"select$form->{vc}"} .= "<option>$_->{name}--$_->{id}\n" }
+    map { $form->{"select$form->{vc}"} .= "<option value=\"$_->{name}--$_->{id}\">$_->{name}--$_->{id}</option>\n" }

       @{ $form->{"all_$form->{vc}"} };
   }
 
       @{ $form->{"all_$form->{vc}"} };
   }
 


@@ -80,11 +82,14 @@ sub payment {
 
   # Standard Konto für Umlaufvermögen
   my $accno_arap = IS->get_standard_accno_current_assets(\%myconfig, \%$form);
 
   # Standard Konto für Umlaufvermögen
   my $accno_arap = IS->get_standard_accno_current_assets(\%myconfig, \%$form);

-
+  # Entsprechend präventiv die Auswahlliste für Kontonummer 
+  # auch mit value= zusammenbauen (s.a. oben bugfix 1771)
+  # Wichtig: Auch das Template anpassen, damit hidden input korrekt die "
+  # escaped.

   $form->{selectaccount} = "";
   $form->{"select$form->{ARAP}"} = "";
 
   $form->{selectaccount} = "";
   $form->{"select$form->{ARAP}"} = "";
 

-  map { $form->{selectaccount} .= "<option>$_->{accno}--$_->{description}\n";
+  map { $form->{selectaccount} .= "<option value=\"$_->{accno}--$_->{description}\">$_->{accno}--$_->{description}</option>\n";

         $form->{account}        = "$_->{accno}--$_->{description}" if ($_->{accno} eq $accno_arap) } @{ $form->{PR}{"$form->{ARAP}_paid"} };
 
   # Braucht man das hier überhaupt? Erstmal auskommentieren .. jan 18.12.2010
         $form->{account}        = "$_->{accno}--$_->{description}" if ($_->{accno} eq $accno_arap) } @{ $form->{PR}{"$form->{ARAP}_paid"} };
 
   # Braucht man das hier überhaupt? Erstmal auskommentieren .. jan 18.12.2010


@@ -107,8 +112,10 @@ sub payment {
   $form->{defaultcurrency} = $form->{currency} = $form->{oldcurrency} =
     $curr[0];
 
   $form->{defaultcurrency} = $form->{currency} = $form->{oldcurrency} =
     $curr[0];
 

+  # Entsprechend präventiv die Auswahlliste für Währungen 
+  # auch mit value= zusammenbauen (s.a. oben bugfix 1771)

   $form->{selectcurrency} = "";
   $form->{selectcurrency} = "";

-  map { $form->{selectcurrency} .= "<option>$_\n" } @curr;
+  map { $form->{selectcurrency} .= "<option value=\"$_\">$_</option>\n" } @curr;

 
 
   &form_header;
 
 
   &form_header;


@@ -128,10 +135,14 @@ sub form_header {
   if ($form->{ $form->{vc} } eq "") {
     map { $form->{"addr$_"} = "" } (1 .. 4);
   }
   if ($form->{ $form->{vc} } eq "") {
     map { $form->{"addr$_"} = "" } (1 .. 4);
   }

-
+  # bugfix 1771
+  # geändert von <option>asdf--2929
+  # nach:
+  #              <option value="asdf--2929">asdf--2929</option>
+  # offen: $form->{ARAP} kann raus?

   for my $item ($form->{vc}, "account", "currency", $form->{ARAP}) {
     $form->{"select$item"} =~ s/ selected//;
   for my $item ($form->{vc}, "account", "currency", $form->{ARAP}) {
     $form->{"select$item"} =~ s/ selected//;

-    $form->{"select$item"} =~ s/option>\Q$form->{$item}\E/option selected>$form->{$item}/;
+    $form->{"select$item"} =~ s/option value="\Q$form->{$item}\E">\Q$form->{$item}\E/option selected value="$form->{$item}">$form->{$item}/;

   }
 
   $vc =
   }
 
   $vc =

diff --git a/doc/changelog b/doc/changelog
index 7f34433389e4d866675a59152b9e69388085d5ee..21ca5a6c04c8e2554811bc50f6661169c07d4a06 100644 (file)
--- a/doc/changelog
+++ b/doc/changelog
@@ -68,6 +68,7 @@
   - Bugfix 1738:  Entwürfe können nicht gelöscht werden
   - Bugfix 1759: Währung bei Kunden / Lieferanten vorbelegen
   - Bugfix 1773: SQL Fehler bei Anzeige von Angeboten
   - Bugfix 1738:  Entwürfe können nicht gelöscht werden
   - Bugfix 1759: Währung bei Kunden / Lieferanten vorbelegen
   - Bugfix 1773: SQL Fehler bei Anzeige von Angeboten

+  - Bugfix 1771: Zahlungsausgang: Lieferant wird nicht ausgewählt, wenn Name 2 Leerzeichen hintereinander enthält

 
 
 2011-06-15 - Release 2.6.3
 
 
 2011-06-15 - Release 2.6.3

diff --git a/templates/webpages/cp/form_header.html b/templates/webpages/cp/form_header.html
index 368f077f66377d0b3127029a756269efcf920e27..bc02918c577fc8e5677cd05dee9570fbd7b2d063 100644 (file)
--- a/templates/webpages/cp/form_header.html
+++ b/templates/webpages/cp/form_header.html
@@ -69,7 +69,7 @@
         <tr>
           <th align=right nowrap>[% 'Account' | $T8 %]</th>
           <td colspan=3><select name=account>[% selectaccount %]</select>
         <tr>
           <th align=right nowrap>[% 'Account' | $T8 %]</th>
           <td colspan=3><select name=account>[% selectaccount %]</select>

-          <input type=hidden name=selectaccount value="[% selectaccount %]">
+          <input type=hidden name=selectaccount value="[% selectaccount | html %]">

           </td>
         </tr>
         <tr>
           </td>
         </tr>
         <tr>