Revision a93cb8e0
Von Philip Reetz vor fast 19 Jahren hinzugefügt
| SL/GL.pm | ||
|---|---|---|
| 350 | 350 |
map { $sortorder =~ s/$_/$ordinal{$_}/ } keys %ordinal;
|
| 351 | 351 |
|
| 352 | 352 |
if ($form->{sort}) {
|
| 353 |
$sortorder = $form->{sort} . ',' . $sortorder;
|
|
| 354 |
} |
|
| 353 |
$sortorder = $form->{sort} . ",";
|
|
| 354 |
} else {
|
|
| 355 |
$sortorder = ""; |
|
| 356 |
} |
|
| 355 | 357 |
|
| 356 | 358 |
my $query = |
| 357 | 359 |
qq|SELECT g.id, 'gl' AS type, $false AS invoice, g.reference, ac.taxkey, t.taxkey AS sorttax, |
| ... | ... | |
| 382 | 384 |
AND ac.chart_id = c.id |
| 383 | 385 |
AND a.vendor_id = ct.id |
| 384 | 386 |
AND a.id = ac.trans_id |
| 385 |
ORDER BY $sortorder, oid|;
|
|
| 387 |
ORDER BY $sortorder transdate, trans_id, taxkey DESC, sorttax DESC,oid|;
|
|
| 386 | 388 |
my $sth = $dbh->prepare($query); |
| 387 | 389 |
$sth->execute || $form->dberror($query); |
| 388 | 390 |
my $trans_id = ""; |
Auch abrufbar als: Unified diff
Fehler im Buchungsjournal, Steuern wurden separat angezeigt, gefixed und jetzt auch sortierung moeglich