X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/7e7b0f89d6ad4adb5da78655e6b2a7e3c42b5e8f..30a70ccf6975394a86d2ff036fe1d0fb34fcda04:/bin/mozilla/ca.pl
diff --git a/bin/mozilla/ca.pl b/bin/mozilla/ca.pl
index de360495c..45c8cc755 100644
--- a/bin/mozilla/ca.pl
+++ b/bin/mozilla/ca.pl
@@ -125,14 +125,21 @@ sub chart_of_accounts {
"
$ca->{gifi_accno} | ";
$column_data{description} = "$ca->{description} | ";
}
-
+ my $debit = "";
+ my $credit = "";
+ if ($ca->{debit}) {
+ $debit = $form->format_amount(\%myconfig, $ca->{debit}, 2, " ");
+ }
+ if ($ca->{credit}) {
+ $credit = $form->format_amount(\%myconfig, $ca->{credit}, 2, " ");
+ }
$column_data{debit} =
""
- . $form->format_amount(\%myconfig, $ca->{debit}, 2, " ")
+ . $debit
. " | \n";
$column_data{credit} =
""
- . $form->format_amount(\%myconfig, $ca->{credit}, 2, " ")
+ . $credit
. " | \n";
$totaldebit += $ca->{debit};