Revision c8220164
Von Martin Helmling martin.helmling@octosoft.eu vor mehr als 8 Jahren hinzugefügt
| SL/Controller/YearEndTransactions.pm | ||
|---|---|---|
| 78 | 78 |
sub make_booking {
|
| 79 | 79 |
my ($self) = @_; |
| 80 | 80 |
$main::lxdebug->enter_sub(); |
| 81 |
my @ids = map { $::form->{"trans_id_$_"} } grep { $::form->{"multi_id_$_"} } (1..$::form->{rowcount});
|
|
| 81 |
my @ids = map { $::form->{"multi_id_$_"} } grep { $::form->{"multi_id_$_"} } (1..$::form->{rowcount});
|
|
| 82 | 82 |
my $cnt = 0; |
| 83 | 83 |
$main::lxdebug->message(LXDebug->DEBUG2(),"generate for ".$::form->{cbob_chart}." # ".scalar(@ids)." charts");
|
| 84 | 84 |
if (scalar(@ids) && $::form->{cbob_chart}) {
|
| ... | ... | |
| 108 | 108 |
my $cgi = $::request->{cgi};
|
| 109 | 109 |
|
| 110 | 110 |
my %column_defs = ( |
| 111 |
'ids' => { 'text' => '<input type="checkbox" id="multi_all" value="1">', 'align' => 'center' },
|
|
| 112 |
'chart' => { 'text' => $::locale->text('Account'), },
|
|
| 113 |
'description' => { 'text' => $::locale->text('Description'), },
|
|
| 114 |
'saldo' => { 'text' => $::locale->text('Saldo'), 'align' => 'right'},
|
|
| 115 |
'sum_cb' => { 'text' => $::locale->text('Sum CB Transactions'), 'align' => 'right'}, ##close == Schluss
|
|
| 116 |
'sum_ob' => { 'text' => $::locale->text('Sum OB Transactions'), 'align' => 'right'}, ##open == Eingang
|
|
| 111 |
'ids' => { raw_header_data => $self->presenter->checkbox_tag("", id => "check_all",
|
|
| 112 |
checkall => "[data-checkall=1]"), 'align' => 'center' }, |
|
| 113 |
'chart' => { text => $::locale->text('Account'), },
|
|
| 114 |
'description' => { text => $::locale->text('Description'), },
|
|
| 115 |
'saldo' => { text => $::locale->text('Saldo'), 'align' => 'right'},
|
|
| 116 |
'sum_cb' => { text => $::locale->text('Sum CB Transactions'), 'align' => 'right'}, ##close == Schluss
|
|
| 117 |
'sum_ob' => { text => $::locale->text('Sum OB Transactions'), 'align' => 'right'}, ##open == Eingang
|
|
| 117 | 118 |
); |
| 118 | 119 |
my @columns = qw(ids chart description saldo sum_cb sum_ob); |
| 119 | 120 |
map { $column_defs{$_}->{visible} = 1 } @columns;
|
| ... | ... | |
| 147 | 148 |
my $chart_id = $chart->id; |
| 148 | 149 |
my $row = { map { $_ => { 'data' => '' } } @columns };
|
| 149 | 150 |
$row->{ids} = {
|
| 150 |
'raw_data' => $cgi->hidden('-name' => "trans_id_${idx}", '-value' => $chart_id)
|
|
| 151 |
. $cgi->checkbox('-name' => "multi_id_${idx}",' id' => "multi_id_id_".$chart_id, '-value' => 1, '-label' => ''),
|
|
| 152 |
'valign' => 'center', |
|
| 153 |
'align' => 'center', |
|
| 151 |
'raw_data' => $self->presenter->checkbox_tag("multi_id_${idx}", value => $chart_id, "data-checkall" => 1),
|
|
| 152 |
'valign' => 'center', |
|
| 153 |
'align' => 'center', |
|
| 154 | 154 |
}; |
| 155 | 155 |
$row->{chart}->{data} = $chart->accno;
|
| 156 | 156 |
$row->{description}->{data} = $chart->description;
|
| ... | ... | |
| 273 | 273 |
sub init_cb_description { $::form->{cb_description} }
|
| 274 | 274 |
|
| 275 | 275 |
sub init_charts9000 {
|
| 276 |
# wie geht prüfen von länge auf 4 in rose ? |
|
| 277 |
SL::DB::Manager::Chart->get_all( query => [ \ "accno like '9%' and length(accno) = 4"] ); |
|
| 278 |
#SL::DB::Manager::Chart->get_all( query => [ accno => { like => '9%'}] );
|
|
| 276 |
SL::DB::Manager::Chart->get_all( query => [ accno => { like => '9%'}] );
|
|
| 279 | 277 |
} |
| 280 | 278 |
|
| 281 | 279 |
sub init_charts {
|
Auch abrufbar als: Unified diff
Erstellen von Jahresabschluss-Buchungen(3)
Für Auswahl moderne presenter Methoden statt alte cgi Methoden eingebaut.
Fehlende Umbenennung in html Templates für Events korrigiert
Die Auswahl der 9xxx Konten nicht mehr auf 4 Zeichen begrenzt