Revision 77be1252
Von Cem Aydin vor fast 2 Jahren hinzugefügt
SL/Controller/ListTransactions.pm | ||
---|---|---|
110 | 110 |
my $zip = Archive::Zip->new(); |
111 | 111 |
|
112 | 112 |
for my $account (@{ $self->accounts_list }) { |
113 |
next if $account->{charttype} eq "H" || !defined($account->{balance}); |
|
114 |
|
|
113 | 115 |
$::form->{accno} = $account->{accno}; |
114 | 116 |
|
115 | 117 |
my $sfile = SL::SessionFile::Random->new(mode => "w"); |
... | ... | |
469 | 471 |
text => "$_->{accno} - $_->{description}", |
470 | 472 |
accno => $_->{accno}, |
471 | 473 |
chart_id => $_->{id}, |
474 |
balance => $_->{amount}, |
|
475 |
charttype => $_->{charttype}, |
|
472 | 476 |
} } @{ $::form->{CA} }; |
473 | 477 |
\@accounts_list; |
474 | 478 |
} |
475 | 479 |
|
476 |
1; |
|
480 |
1; |
Auch abrufbar als: Unified diff
Buchungsliste -> Alle Konten als CSV exportieren: Nicht bebuchte Konten sowie Konten vom Typ Überschrift vom Export ausschliessen