X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/f9504bdd4a868b62b545e42dc3ca374c988dc647..f46f64806e39e562d4e3577bac98e07c298754a4:/bin/mozilla/rp.pl diff --git a/bin/mozilla/rp.pl b/bin/mozilla/rp.pl index 9e3bc9fc9..cf5bad33a 100644 --- a/bin/mozilla/rp.pl +++ b/bin/mozilla/rp.pl @@ -1392,8 +1392,8 @@ sub list_accounts { $ml = ($ref->{category} =~ /(A|C|E)/) ? -1 : 1; - $debit = $form->format_amount(\%myconfig, $ref->{debit}, 2, " "); - $credit = $form->format_amount(\%myconfig, $ref->{credit}, 2, " "); + $debit = ($ref->{debit} != 0) ? $form->format_amount(\%myconfig, $ref->{debit}, 2, " ") : " "; + $credit = ($ref->{credit} != 0) ? $form->format_amount(\%myconfig, $ref->{credit}, 2, " ") : " "; $begbalance = $form->format_amount(\%myconfig, $ref->{balance} * $ml, 2, " "); $endbalance = @@ -1672,14 +1672,14 @@ sub aging { $i++; if ($subtotal) { - $c0subtotal = - $form->format_amount(\%myconfig, $c0subtotal, 2, " "); - $c30subtotal = - $form->format_amount(\%myconfig, $c30subtotal, 2, " "); - $c60subtotal = - $form->format_amount(\%myconfig, $c60subtotal, 2, " "); - $c90subtotal = - $form->format_amount(\%myconfig, $c90subtotal, 2, " "); + $c0subtotal = ($c0subtotal != 0) ? + $form->format_amount(\%myconfig, $c0subtotal, 2, " ") : ""; + $c30subtotal = ($c30subtotal != 0) ? + $form->format_amount(\%myconfig, $c30subtotal, 2, " ") : ""; + $c60subtotal = ($c60subtotal != 0) ? + $form->format_amount(\%myconfig, $c60subtotal, 2, " ") : ""; + $c90subtotal = ($c90subtotal != 0) ? + $form->format_amount(\%myconfig, $c90subtotal, 2, " ") : ""; } $column_data{ct} = qq|