From: Jan Büren <jan@weitan.org>
Date: Sat, 19 Sep 2009 20:07:24 +0000 (+0200)
Subject: Fix für Bug 1150 - Dialogbuchen geht auf Überschriften. Entsprechend im Backend den... 
X-Git-Tag: release-2.6.1beta1~281
X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;ds=inline;h=12fb1a282a4777ecdaf7f297057732d2d473ad24;p=kivitendo-erp.git

Fix für Bug 1150 - Dialogbuchen geht auf Überschriften. Entsprechend im Backend den chart.charttype zusätzlich geholt und die Liste ALL_CHARTS im Frontend gefiltert
---

diff --git a/SL/Form.pm b/SL/Form.pm
index e034a203c..f0bb0e2cb 100644
--- a/SL/Form.pm
+++ b/SL/Form.pm
@@ -2196,7 +2196,7 @@ sub _get_charts {
   my $transdate = quote_db_date($params->{transdate});
 
   my $query =
-    qq|SELECT c.id, c.accno, c.description, c.link, tk.taxkey_id, tk.tax_id | .
+    qq|SELECT c.id, c.accno, c.description, c.link, c.charttype, tk.taxkey_id, tk.tax_id | .
     qq|FROM chart c | .
     qq|LEFT JOIN taxkeys tk ON | .
     qq|(tk.id = (SELECT id FROM taxkeys | .
diff --git a/bin/mozilla/gl.pl b/bin/mozilla/gl.pl
index 7516cf8d1..ae476bd17 100644
--- a/bin/mozilla/gl.pl
+++ b/bin/mozilla/gl.pl
@@ -88,6 +88,7 @@ sub add {
   $form->{callback} = "gl.pl?action=add" unless $form->{callback};
 
   # we use this only to set a default date
+  # yep. aber er holt hier auch schon ALL_CHARTS. Aufwand / Nutzen? jb
   GL->transaction(\%myconfig, \%$form);
 
   map {
@@ -796,6 +797,9 @@ sub display_rows {
   my %charts = ();
   my $taxchart_init;
   foreach my $item (@{ $form->{ALL_CHARTS} }) {
+    if ($item->{charttype} eq 'H'){ #falls überschrift 
+      next;                         #überspringen (Bug 1150)
+    }
     my $key = $item->{accno} . "--" . $item->{tax_id};
     $taxchart_init = $item->{tax_id} unless (@chart_values);
     push(@chart_values, $key);