Warum nicht wieder das Buchungsjournal für einzelne Konten aktivieren? Ist doch alles...

diff --git a/SL/GL.pm b/SL/GL.pm
index def0dc85f4bb32c1e9cbab071c24e93ad05de383..320be1e7ec4a2dea79b1e970cbe679681cc26960 100644 (file)
--- a/SL/GL.pm
+++ b/SL/GL.pm
@@ -268,9 +268,6 @@ sub all_transactions {
   }
 
   if ($form->{accno}) {
   }
 
   if ($form->{accno}) {

-    exit;
-    # Diese Abfrage hatte schon 2005 keinen Sinn mehr, jedenfalls
-    # nicht über FiBu -> Berichte (keine Eingabefeld für Suchkriterium vorhanden)

     $glwhere .= " AND c.accno = '$form->{accno}'";
     $arwhere .= " AND c.accno = '$form->{accno}'";
     $apwhere .= " AND c.accno = '$form->{accno}'";
     $glwhere .= " AND c.accno = '$form->{accno}'";
     $arwhere .= " AND c.accno = '$form->{accno}'";
     $apwhere .= " AND c.accno = '$form->{accno}'";

diff --git a/bin/mozilla/gl.pl b/bin/mozilla/gl.pl
index f26d671572492536f961ce966240c56d832182fb..f7810c76bc2ba41697b0bf394a97b7d7ba85d988 100644 (file)
--- a/bin/mozilla/gl.pl
+++ b/bin/mozilla/gl.pl
@@ -314,7 +314,9 @@ sub search {
         $department
         <tr>
           <th align=right>| . $locale->text('Description') . qq|</th>
         $department
         <tr>
           <th align=right>| . $locale->text('Description') . qq|</th>

-          <td colspan=3><input name=description size=40></td>
+          <td><input name=description size=40></td>
+          <th align=right>| . $locale->text('Account Number') . qq|</th>
+          <td><input name=accno size=20></td>

         </tr>
         <tr>
           <th align=right>| . $locale->text('Notes') . qq|</th>
         </tr>
         <tr>
           <th align=right>| . $locale->text('Notes') . qq|</th>