Revision 253a9323
Von Bernd Bleßmann vor mehr als 11 Jahren hinzugefügt
| bin/mozilla/do.pl | ||
|---|---|---|
| 489 | 489 |
$form->{rowcount} = scalar @{ $form->{DO} };
|
| 490 | 490 |
|
| 491 | 491 |
my @columns = qw( |
| 492 |
ids transdate |
|
| 492 |
ids transdate reqdate
|
|
| 493 | 493 |
id donumber |
| 494 | 494 |
ordnumber customernumber |
| 495 | 495 |
name employee salesman |
| ... | ... | |
| 516 | 516 |
my %column_defs = ( |
| 517 | 517 |
'ids' => { 'text' => '', },
|
| 518 | 518 |
'transdate' => { 'text' => $locale->text('Date'), },
|
| 519 |
'reqdate' => { 'text' => $locale->text('Reqdate'), },
|
|
| 519 | 520 |
'id' => { 'text' => $locale->text('ID'), },
|
| 520 | 521 |
'donumber' => { 'text' => $locale->text('Delivery Order'), },
|
| 521 | 522 |
'ordnumber' => { 'text' => $locale->text('Order'), },
|
| ... | ... | |
| 531 | 532 |
'department' => { 'text' => $locale->text('Department'), },
|
| 532 | 533 |
); |
| 533 | 534 |
|
| 534 |
foreach my $name (qw(id transdate donumber ordnumber name employee salesman shipvia transaction_description department)) {
|
|
| 535 |
foreach my $name (qw(id transdate reqdate donumber ordnumber name employee salesman shipvia transaction_description department)) {
|
|
| 535 | 536 |
my $sortdir = $form->{sort} eq $name ? 1 - $form->{sortdir} : $form->{sortdir};
|
| 536 | 537 |
$column_defs{$name}->{link} = $href . "&sort=$name&sortdir=$sortdir";
|
| 537 | 538 |
} |
Auch abrufbar als: Unified diff
Verkauf->Berichte->Lieferscheine: Lieferdatum mit anzeigen lassen.