Revision ac06e257
Von Bernd Bleßmann vor fast 3 Jahren hinzugefügt
SL/AP.pm | ||
---|---|---|
702 | 702 |
my $sortdir = !defined $form->{sortdir} ? 'ASC' : $form->{sortdir} ? 'ASC' : 'DESC'; |
703 | 703 |
my $sortorder = join(', ', map { "$_ $sortdir" } @a); |
704 | 704 |
|
705 |
if (grep({ $_ eq $form->{sort} } qw(transdate id invnumber ordnumber name netamount tax amount paid datepaid due duedate notes employee transaction_description direct_debit department))) { |
|
705 |
if (grep({ $_ eq $form->{sort} } qw(transdate id invnumber ordnumber name netamount tax amount paid datepaid due duedate notes employee transaction_description direct_debit department taxzone))) {
|
|
706 | 706 |
$sortorder = $form->{sort} . " $sortdir"; |
707 | 707 |
} |
708 | 708 |
|
SL/AR.pm | ||
---|---|---|
685 | 685 |
my $sortdir = !defined $form->{sortdir} ? 'ASC' : $form->{sortdir} ? 'ASC' : 'DESC'; |
686 | 686 |
my $sortorder = join(', ', map { "$_ $sortdir" } @a); |
687 | 687 |
|
688 |
if (grep({ $_ eq $form->{sort} } qw(id transdate duedate invnumber ordnumber cusordnumber donumber deliverydate name datepaid employee shippingpoint shipvia transaction_description department))) { |
|
688 |
if (grep({ $_ eq $form->{sort} } qw(id transdate duedate invnumber ordnumber cusordnumber donumber deliverydate name datepaid employee shippingpoint shipvia transaction_description department taxzone))) {
|
|
689 | 689 |
$sortorder = $form->{sort} . " $sortdir"; |
690 | 690 |
} |
691 | 691 |
|
bin/mozilla/ap.pl | ||
---|---|---|
1080 | 1080 |
'insertdate' => { 'text' => $locale->text('Insert Date'), }, |
1081 | 1081 |
); |
1082 | 1082 |
|
1083 |
foreach my $name (qw(id transdate duedate invnumber ordnumber name datepaid employee shippingpoint shipvia transaction_description direct_debit department)) { |
|
1083 |
foreach my $name (qw(id transdate duedate invnumber ordnumber name datepaid employee shippingpoint shipvia transaction_description direct_debit department taxzone)) {
|
|
1084 | 1084 |
my $sortdir = $form->{sort} eq $name ? 1 - $form->{sortdir} : $form->{sortdir}; |
1085 | 1085 |
$column_defs{$name}->{link} = $href . "&sort=$name&sortdir=$sortdir"; |
1086 | 1086 |
} |
bin/mozilla/ar.pl | ||
---|---|---|
1085 | 1085 |
%column_defs_cvars, |
1086 | 1086 |
); |
1087 | 1087 |
|
1088 |
foreach my $name (qw(id transdate duedate invnumber ordnumber cusordnumber donumber deliverydate name datepaid employee shippingpoint shipvia transaction_description direct_debit department)) { |
|
1088 |
foreach my $name (qw(id transdate duedate invnumber ordnumber cusordnumber donumber deliverydate name datepaid employee shippingpoint shipvia transaction_description direct_debit department taxzone)) {
|
|
1089 | 1089 |
my $sortdir = $form->{sort} eq $name ? 1 - $form->{sortdir} : $form->{sortdir}; |
1090 | 1090 |
$column_defs{$name}->{link} = $href . "&sort=$name&sortdir=$sortdir"; |
1091 | 1091 |
} |
Auch abrufbar als: Unified diff
Rechnungsbericht VK und EK nach Steuerzone sortieren können