From: Philip Reetz
Date: Mon, 16 Jan 2006 11:27:20 +0000 (+0000)
Subject: Steuerkonten wurden nicht angezeigt, wenn Rechnung und Zahlung vom gleichen Tag....
X-Git-Tag: release-2.4.0^2~385
X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=6295e12d8df88cae23953b75f69c9e4b30999978;p=kivitendo-erp.git
Steuerkonten wurden nicht angezeigt, wenn Rechnung und Zahlung vom gleichen Tag. Fixed Bug#259
---
diff --git a/SL/GL.pm b/SL/GL.pm
index 8ec98c8e5..3b0e74e82 100644
--- a/SL/GL.pm
+++ b/SL/GL.pm
@@ -38,6 +38,8 @@
package GL;
+use Data::Dumper;
+
sub delete_transaction {
my ($self, $myconfig, $form) = @_;
$main::lxdebug->enter_sub();
@@ -518,6 +520,7 @@ sub all_transactions {
($form->{gifi_account_description}) = $sth->fetchrow_array;
$sth->finish;
}
+ print(STDERR Dumper($form->{GL}));
$main::lxdebug->leave_sub();
$dbh->disconnect;
diff --git a/bin/mozilla/gl.pl b/bin/mozilla/gl.pl
index d07dc1de7..ed8aadca3 100644
--- a/bin/mozilla/gl.pl
+++ b/bin/mozilla/gl.pl
@@ -698,9 +698,9 @@ sub generate_report {
$debitaccno .=
"
{debit_accno}{$key}&callback=$callback>$ref->{debit_accno}{$key}";
}
- if ($ref->{debit_taxkey}{$key} eq $debittaxkey) {
- $ref->{debit_tax_accno}{$key} = $taxaccno;
- }
+# if ($ref->{debit_taxkey}{$key} eq $debittaxkey) {
+# $ref->{debit_tax_accno}{$key} = $taxaccno;
+# }
$taxaccno = $ref->{debit_tax_accno}{$key};
$debittaxkey = $ref->{debit_taxkey}{$key};
}
@@ -716,9 +716,9 @@ sub generate_report {
$creditaccno .=
"
{credit_accno}{$key}&callback=$callback>$ref->{credit_accno}{$key}";
}
- if ($ref->{credit_taxkey}{$key} eq $credittaxkey) {
- $ref->{credit_tax_accno}{$key} = $taxaccno;
- }
+# if ($ref->{credit_taxkey}{$key} eq $credittaxkey) {
+# $ref->{credit_tax_accno}{$key} = $taxaccno;
+# }
$taxaccno = $ref->{credit_tax_accno}{$key};
$credittaxkey = $ref->{credit_taxkey}{$key};
}