Typos beim entfernen von setupPoints/setupDateFormat

[kivitendo-erp.git] / bin / mozilla / gl.pl
diff --git a/bin/mozilla/gl.pl b/bin/mozilla/gl.pl

index a4f2d1d..d54dc70 100644 (file)
--- a/bin/mozilla/gl.pl
+++ b/bin/mozilla/gl.pl
@@ -217,12 +217,10 @@ sub search {
    $::form->all_departments(\%::myconfig);
    $::form->get_lists(
      projects  => { key => "ALL_PROJECTS", all => 1 },
-    employees => "ALL_EMPLOYEES",
    );
+  $::form->{ALL_EMPLOYEES} = SL::DB::Manager::Employee->get_all(query => [ deleted => 0 ]);
  
-  my $onload = "focus()"
-             . qq|;setupDateFormat('|. $::myconfig{dateformat} . qq|', '| . $::locale->text("Falsches Datumsformat!") . qq|')|
-             . qq|;setupPoints('|. $::myconfig{numberformat} .   qq|', '| . $::locale->text("wrongformat") . qq|')|;
+  my $onload = "focus()";
  
    $::form->header;
    print $::form->parse_html_template('gl/search', {
@@ -466,7 +464,7 @@ sub generate_report {
  
      my $row_set = [ $row ];
  
-    if (($form->{l_subtotal} eq 'Y')
+    if ( ($form->{l_subtotal} eq 'Y' && !$form->{report_generator_csv_options_for_import} )
          && (($idx == (scalar @{ $form->{GL} } - 1))
              || ($ref->{ $form->{sort} } ne $form->{GL}->[$idx + 1]->{ $form->{sort} }))) {
        push @{ $row_set }, create_subtotal_row(\%subtotals, \@columns, \%column_alignment, [ qw(debit credit) ], 'listsubtotal');
@@ -477,8 +475,6 @@ sub generate_report {
      $idx++;
    }
  
-  $report->add_separator();
-
    # = 0 for balanced ledger
    my $balanced_ledger = $totals{debit} + $totals{debit_tax} - $totals{credit} - $totals{credit_tax};
  
@@ -497,7 +493,10 @@ sub generate_report {
  
    $row->{balance}->{data}        = $data;
  
-  $report->add_data($row);
+  if ( !$form->{report_generator_csv_options_for_import} ) {
+    $report->add_separator();
+    $report->add_data($row);
+  }
  
    my $raw_bottom_info_text;
  
@@ -927,8 +926,6 @@ sub delete {
    $form->header;
  
    print qq|
-<body>
-
  <form method=post action=gl.pl>
  |;