X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/7394e8757d30c5c3f0357e6dac012041d294c187..5ca651f0b08f68c1f977868204b3629217785157:/SL/GL.pm diff --git a/SL/GL.pm b/SL/GL.pm index 2b9a67a40..4dbd703c7 100644 --- a/SL/GL.pm +++ b/SL/GL.pm @@ -487,11 +487,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}; } else { $ref->{credit}{$l} = $ref->{amount} * 1; $ref->{credit_accno}{$l} = $ref->{accno}; $ref->{credit_taxkey}{$l} = $ref->{taxkey}; + $ref->{transdate}{$l} = $ref->{transdate}; } @@ -547,6 +549,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}; } else { if ($ref->{credit_accno}{$l} ne "") { $l++; @@ -554,6 +557,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}; } } }