From f4a48b305f2c86d67c49908abc03cb95f5cb148f Mon Sep 17 00:00:00 2001 From: Moritz Bunkus Date: Wed, 14 Mar 2007 13:59:02 +0000 Subject: [PATCH] =?utf8?q?Nicht=20Hashfelder=20sowohl=20als=20Skalar=20als?= =?utf8?q?=20auch=20als=20Hash=20benutzen.=20F=C3=BChrt=20zu=20merkw=C3=BC?= =?utf8?q?rdigem=20Verhalten,=20z.B.=20dass=20zu=20viele=20Keys=20herausko?= =?utf8?q?mmen=20etc.?= MIME-Version: 1.0 Content-Type: text/plain; charset=utf8 Content-Transfer-Encoding: 8bit --- SL/GL.pm | 8 ++++---- bin/mozilla/gl.pl | 6 +++--- 2 files changed, 7 insertions(+), 7 deletions(-) diff --git a/SL/GL.pm b/SL/GL.pm index e792710bf..70b30f412 100644 --- a/SL/GL.pm +++ b/SL/GL.pm @@ -500,13 +500,13 @@ sub all_transactions { $ref->{debit}{$k} = $ref->{amount} * -1; $ref->{debit_accno}{$k} = $ref->{accno}; $ref->{debit_taxkey}{$k} = $ref->{taxkey}; - $ref->{transdate}{$k} = $ref->{transdate}; + $ref->{ac_transdate}{$k} = $ref->{transdate}; } else { $ref->{credit}{$l} = $ref->{amount} * 1; $ref->{credit_accno}{$l} = $ref->{accno}; $ref->{credit_taxkey}{$l} = $ref->{taxkey}; - $ref->{transdate}{$l} = $ref->{transdate}; + $ref->{ac_transdate}{$l} = $ref->{transdate}; } @@ -563,7 +563,7 @@ sub all_transactions { $ref->{debit}{$k} = $ref2->{amount} * - 1; $ref->{debit_accno}{$k} = $ref2->{accno}; $ref->{debit_taxkey}{$k} = $ref2->{taxkey}; - $ref->{transdate}{$k} = $ref2->{transdate}; + $ref->{ac_transdate}{$k} = $ref2->{transdate}; } else { if ($ref->{credit_accno}{$l} ne "") { $l++; @@ -571,7 +571,7 @@ sub all_transactions { $ref->{credit}{$l} = $ref2->{amount}; $ref->{credit_accno}{$l} = $ref2->{accno}; $ref->{credit_taxkey}{$l} = $ref2->{taxkey}; - $ref->{transdate}{$l} = $ref2->{transdate}; + $ref->{ac_transdate}{$l} = $ref2->{transdate}; } } } diff --git a/bin/mozilla/gl.pl b/bin/mozilla/gl.pl index 0a7d44f84..b6d944828 100644 --- a/bin/mozilla/gl.pl +++ b/bin/mozilla/gl.pl @@ -766,11 +766,11 @@ sub generate_report { } $transdate = ""; - foreach $key (sort keys(%{ $ref->{transdate} })) { + foreach $key (sort keys(%{ $ref->{ac_transdate} })) { if ($key == 0) { - $transdate = "$ref->{transdate}{$key}"; + $transdate = "$ref->{ac_transdate}{$key}"; } else { - $transdate .= "
$ref->{transdate}{$key}"; + $transdate .= "
$ref->{ac_transdate}{$key}"; } } -- 2.20.1