Revision c654c46b
Von Moritz Bunkus vor mehr als 16 Jahren hinzugefügt
| SL/AP.pm | ||
|---|---|---|
|
|
||
|
my @a = (transdate, invnumber, name);
|
||
|
push @a, "employee" if $self->{l_employee};
|
||
|
my $sortdir = $form->{sortdir} ? 'ASC' : 'DESC';
|
||
|
my $sortdir = !defined $form->{sortdir} ? 'ASC' : $form->{sortdir} ? 'ASC' : 'DESC';
|
||
|
my $sortorder = join(', ', map { "$_ $sortdir" } @a);
|
||
|
|
||
|
if (grep({ $_ eq $form->{sort} }
|
||
| SL/AR.pm | ||
|---|---|---|
|
|
||
|
my @a = (transdate, invnumber, name);
|
||
|
push @a, "employee" if $form->{l_employee};
|
||
|
my $sortdir = $form->{sortdir} ? 'ASC' : 'DESC';
|
||
|
my $sortdir = !defined $form->{sortdir} ? 'ASC' : $form->{sortdir} ? 'ASC' : 'DESC';
|
||
|
my $sortorder = join(', ', map { "$_ $sortdir" } @a);
|
||
|
|
||
|
if (grep({ $_ eq $form->{sort} }
|
||
| SL/DO.pm | ||
|---|---|---|
|
"transaction_description" => "dord.transaction_description"
|
||
|
);
|
||
|
|
||
|
my $sortdir = $form->{sortdir} ? 'ASC' : 'DESC';
|
||
|
my $sortdir = !defined $form->{sortdir} ? 'ASC' : $form->{sortdir} ? 'ASC' : 'DESC';
|
||
|
my $sortorder = "dord.id";
|
||
|
if ($form->{sort} && grep($form->{sort}, keys(%allowed_sort_columns))) {
|
||
|
$sortorder = $allowed_sort_columns{$form->{sort}};
|
||
| SL/OE.pm | ||
|---|---|---|
|
push(@values, '%' . $form->{transaction_description} . '%');
|
||
|
}
|
||
|
|
||
|
my $sortdir = $form->{sortdir} ? 'ASC' : 'DESC';
|
||
|
my $sortdir = !defined $form->{sortdir} ? 'ASC' : $form->{sortdir} ? 'ASC' : 'DESC';
|
||
|
my $sortorder = join(', ', map { "${_} ${sortdir} " } ("o.id", $form->sort_columns("transdate", $ordnumber, "name")));
|
||
|
my %allowed_sort_columns = (
|
||
|
"transdate" => "o.transdate",
|
||
Auch abrufbar als: Unified diff
Die Sortierung soll standardmäßig aufsteigend erfolgen.