X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=bin%2Fmozilla%2Fca.pl;h=e499abe701c6b80319afac572576a8d3130d80bf;hb=15f549fdb43fba2d99817c659533dfa02638bf27;hp=56ae60813eb00aa44f7a87947ebfef68d33b7788;hpb=0576299f2aa98125991c4ffcd2f75073ea583d7d;p=kivitendo-erp.git diff --git a/bin/mozilla/ca.pl b/bin/mozilla/ca.pl index 56ae60813..e499abe70 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}; @@ -235,8 +242,7 @@ sub list { | . $locale->text('Include in Report') . qq|  | - . $locale->text('Subtotal') - . qq| + . $locale->text('Subtotal') . qq| @@ -407,13 +413,12 @@ sub list_transactions { # construct link to source $href = "{module}.pl?path=$form->{path}&action=edit&id=$ca->{id}&login=$form->{login}&password=$form->{password}&callback=$callback>$ca->{reference}"; - + my $debit = ($ca->{debit} != 0) ? $form->format_amount(\%myconfig, $ca->{debit}, 2, " ") : " "; $column_data{debit} = - "" - . $form->format_amount(\%myconfig, $ca->{debit}, 2, " ") . ""; + "$debit"; + my $credit = ($ca->{credit} != 0) ? $form->format_amount(\%myconfig, $ca->{credit}, 2, " ") : " "; $column_data{credit} = - "" - . $form->format_amount(\%myconfig, $ca->{credit}, 2, " ") . ""; + "$credit"; $form->{balance} += $ca->{amount}; $column_data{balance} =