Revision 09f64724
Von Philip Reetz vor mehr als 15 Jahren hinzugefügt
| bin/mozilla/gl.pl | ||
|---|---|---|
| 507 | 507 |
map { $column_defs{$_}->{visible} = 0 } qw(debit_accno credit_accno debit_tax_accno credit_tax_accno) if $form->{accno};
|
| 508 | 508 |
|
| 509 | 509 |
my %column_alignment; |
| 510 |
map { $column_alignment{$_} = 'right' } qw(balance id debit credit debit_tax credit_tax);
|
|
| 510 |
map { $column_alignment{$_} = 'right' } qw(balance id debit credit debit_tax credit_tax balance);
|
|
| 511 | 511 |
map { $column_alignment{$_} = 'center' } qw(transdate reference description source notes debit_accno credit_accno debit_tax_accno credit_tax_accno);
|
| 512 | 512 |
map { $column_defs{$_}->{align} = $column_alignment{$_} } keys %column_alignment;
|
| 513 | 513 |
|
| ... | ... | |
| 566 | 566 |
|
| 567 | 567 |
my $sh = ""; |
| 568 | 568 |
if ($form->{balance} < 0) {
|
| 569 |
$sh = "(S)";
|
|
| 569 |
$sh = " S";
|
|
| 570 | 570 |
$ml = -1; |
| 571 | 571 |
} elsif ($form->{balance} > 0) {
|
| 572 |
$sh = "(H)";
|
|
| 572 |
$sh = " H";
|
|
| 573 | 573 |
$ml = 1; |
| 574 | 574 |
} |
| 575 | 575 |
my $data = $form->format_amount(\%myconfig, ($form->{balance} * $ml), 2);
|
| ... | ... | |
| 612 | 612 |
|
| 613 | 613 |
my $sh = ""; |
| 614 | 614 |
if ($form->{balance} < 0) {
|
| 615 |
$sh = "(S)";
|
|
| 615 |
$sh = " S";
|
|
| 616 | 616 |
$ml = -1; |
| 617 | 617 |
} elsif ($form->{balance} > 0) {
|
| 618 |
$sh = "(H)";
|
|
| 618 |
$sh = " H";
|
|
| 619 | 619 |
$ml = 1; |
| 620 | 620 |
} |
| 621 | 621 |
my $data = $form->format_amount(\%myconfig, ($form->{balance} * $ml), 2);
|
Auch abrufbar als: Unified diff
Bug #826 behoben, Kontenuebersicht angepasst, zusaetzliche Spalte mit dem fortlaufenden Saldo