Die Funktion "Zahlung buchen" bei Kreditorenrechnungen komplett umgeschrieben. Sie...
[kivitendo-erp.git] / bin / mozilla / oe.pl
index 10152d7..c9cb92e 100644 (file)
@@ -1386,7 +1386,7 @@ sub search {
 
   $form->get_lists("projects" => { "key" => "ALL_PROJECTS",
                                    "all" => 1 },
-                   "employees" => "ALL_EMPLOYEES",          
+                   "employees" => "ALL_EMPLOYEES",
                    $vc => "ALL_" . uc($vc));
 
   my %labels = ();
@@ -1401,18 +1401,19 @@ sub search {
 
   #employees
   %labels = ();
-  @values = ();
+  @values = ("");
   foreach my $item (@{ $form->{"ALL_EMPLOYEES"} }) {
     push(@values, $item->{"id"});
     $labels{$item->{"id"}} = $item->{"name"} ne "" ? $item->{"name"} : $item->{"login"};
   }
 
-  my $employee = qq|
+  my $employee_block = qq|
     <tr>
       <th align="right">| . $locale->text('Employee') . qq|</th>
       <td>| .
-        NTI($cgi->popup_menu('-name' => 'employee_id', '-default' => $form->{"employee_id"},
-                             '-values' => \@values, '-labels' => \%labels)) . qq|
+        NTI($cgi->popup_menu('-name'   => 'employee_id',
+                             '-values' => \@values,
+                             '-labels' => \%labels)) . qq|
       </td>
     </tr>|;
 
@@ -1457,7 +1458,7 @@ sub search {
           <th align=right>$ordlabel</th>
           <td colspan=3><input name="$ordnumber" size=20></td>
         </tr>
-  $employee
+  $employee_block
         <tr>
           <th align="right">| . $locale->text('Transaction description') . qq|</th>
           <td colspan="3"><input name="transaction_description" size=20></td>
@@ -1494,7 +1495,7 @@ sub search {
     . $locale->text('Required by') . qq|</td>
              </tr>
              <tr>
-               <td><input name="l_name" class=checkbox type=checkbox value=Y checked> ucfirst($form->{vc})</td>
+               <td><input name="l_name" class=checkbox type=checkbox value=Y checked> $vc_label</td>
                <td><input name="l_employee" class=checkbox type=checkbox value=Y checked> $employee</td>
                <td><input name="l_shipvia" class=checkbox type=checkbox value=Y> |
     . $locale->text('Ship via') . qq|</td>