Revision 96b67ec1
Von Bernd Bleßmann vor mehr als 2 Jahren hinzugefügt
| bin/mozilla/gl.pl | ||
|---|---|---|
| 427 | 427 |
my $ml = ($form->{ml} =~ /(A|E|Q)/) ? -1 : 1;
|
| 428 | 428 |
|
| 429 | 429 |
my @columns = qw( |
| 430 |
transdate gldate id reference description |
|
| 431 |
notes transaction_description source doccnt debit debit_accno |
|
| 432 |
credit credit_accno debit_tax debit_tax_accno |
|
| 433 |
credit_tax credit_tax_accno balance projectnumbers |
|
| 434 |
department employee |
|
| 430 |
transdate gldate id reference |
|
| 431 |
description notes transaction_description source |
|
| 432 |
doccnt debit debit_accno |
|
| 433 |
credit credit_accno debit_tax debit_tax_accno |
|
| 434 |
credit_tax credit_tax_accno balance projectnumbers |
|
| 435 |
department employee |
|
| 435 | 436 |
); |
| 436 | 437 |
|
| 437 | 438 |
# add employee here, so that variable is still known and passed in url when choosing a different sort order in resulting table |
| ... | ... | |
| 441 | 442 |
my $employee = $form->{employee_id} ? SL::DB::Employee->new(id => $form->{employee_id})->load->name : '';
|
| 442 | 443 |
|
| 443 | 444 |
my (@options, @date_options); |
| 444 |
push @options, $locale->text('Account') . " : $form->{accno} $form->{account_description}" if ($form->{accno});
|
|
| 445 |
push @options, $locale->text('Source') . " : $form->{source}" if ($form->{source});
|
|
| 446 |
push @options, $locale->text('Reference') . " : $form->{reference}" if ($form->{reference});
|
|
| 447 |
push @options, $locale->text('Description') . " : $form->{description}" if ($form->{description});
|
|
| 448 |
push @options, $locale->text('Notes') . " : $form->{notes}" if ($form->{notes});
|
|
| 449 |
push @options, $locale->text('Transaction description') . " : $form->{transaction_description}" if $form->{transaction_description};
|
|
| 450 |
push @options, $locale->text('Employee') . " : $employee" if $employee;
|
|
| 445 |
push @options, $locale->text('Account') . " : $form->{accno} $form->{account_description}" if ($form->{accno});
|
|
| 446 |
push @options, $locale->text('Source') . " : $form->{source}" if ($form->{source});
|
|
| 447 |
push @options, $locale->text('Reference') . " : $form->{reference}" if ($form->{reference});
|
|
| 448 |
push @options, $locale->text('Description') . " : $form->{description}" if ($form->{description});
|
|
| 449 |
push @options, $locale->text('Notes') . " : $form->{notes}" if ($form->{notes});
|
|
| 450 |
push @options, $locale->text('Transaction description') . " : $form->{transaction_description}" if $form->{transaction_description};
|
|
| 451 |
push @options, $locale->text('Employee') . " : $employee" if $employee;
|
|
| 451 | 452 |
my $datesorttext = $form->{datesort} eq 'transdate' ? $locale->text('Transdate') : $locale->text('Gldate');
|
| 452 | 453 |
push @date_options, "$datesorttext" if ($form->{datesort} and ($form->{datefrom} or $form->{dateto}));
|
| 453 | 454 |
push @date_options, $locale->text('From'), $locale->date(\%myconfig, $form->{datefrom}, 1) if ($form->{datefrom});
|
| ... | ... | |
| 473 | 474 |
$form->{l_doccnt} = $form->{l_source} ? 'Y' : '';
|
| 474 | 475 |
|
| 475 | 476 |
my %column_defs = ( |
| 476 |
'id' => { 'text' => $locale->text('ID'), },
|
|
| 477 |
'transdate' => { 'text' => $locale->text('Transdate'), },
|
|
| 478 |
'gldate' => { 'text' => $locale->text('Gldate'), },
|
|
| 479 |
'reference' => { 'text' => $locale->text('Reference'), },
|
|
| 480 |
'source' => { 'text' => $locale->text('Source'), },
|
|
| 481 |
'doccnt' => { 'text' => $locale->text('Document Count'), },
|
|
| 482 |
'description' => { 'text' => $locale->text('Description'), },
|
|
| 483 |
'notes' => { 'text' => $locale->text('Notes'), },
|
|
| 484 |
'debit' => { 'text' => $locale->text('Debit'), },
|
|
| 485 |
'debit_accno' => { 'text' => $locale->text('Debit Account'), },
|
|
| 486 |
'credit' => { 'text' => $locale->text('Credit'), },
|
|
| 487 |
'credit_accno' => { 'text' => $locale->text('Credit Account'), },
|
|
| 488 |
'debit_tax' => { 'text' => $locale->text('Debit Tax'), },
|
|
| 489 |
'debit_tax_accno' => { 'text' => $locale->text('Debit Tax Account'), },
|
|
| 490 |
'credit_tax' => { 'text' => $locale->text('Credit Tax'), },
|
|
| 491 |
'credit_tax_accno' => { 'text' => $locale->text('Credit Tax Account'), },
|
|
| 492 |
'balance' => { 'text' => $locale->text('Balance'), },
|
|
| 493 |
'projectnumbers' => { 'text' => $locale->text('Project Numbers'), },
|
|
| 494 |
'department' => { 'text' => $locale->text('Department'), },
|
|
| 495 |
'employee' => { 'text' => $locale->text('Employee'), },
|
|
| 477 |
'id' => { 'text' => $locale->text('ID'), },
|
|
| 478 |
'transdate' => { 'text' => $locale->text('Transdate'), },
|
|
| 479 |
'gldate' => { 'text' => $locale->text('Gldate'), },
|
|
| 480 |
'reference' => { 'text' => $locale->text('Reference'), },
|
|
| 481 |
'source' => { 'text' => $locale->text('Source'), },
|
|
| 482 |
'doccnt' => { 'text' => $locale->text('Document Count'), },
|
|
| 483 |
'description' => { 'text' => $locale->text('Description'), },
|
|
| 484 |
'notes' => { 'text' => $locale->text('Notes'), },
|
|
| 485 |
'debit' => { 'text' => $locale->text('Debit'), },
|
|
| 486 |
'debit_accno' => { 'text' => $locale->text('Debit Account'), },
|
|
| 487 |
'credit' => { 'text' => $locale->text('Credit'), },
|
|
| 488 |
'credit_accno' => { 'text' => $locale->text('Credit Account'), },
|
|
| 489 |
'debit_tax' => { 'text' => $locale->text('Debit Tax'), },
|
|
| 490 |
'debit_tax_accno' => { 'text' => $locale->text('Debit Tax Account'), },
|
|
| 491 |
'credit_tax' => { 'text' => $locale->text('Credit Tax'), },
|
|
| 492 |
'credit_tax_accno' => { 'text' => $locale->text('Credit Tax Account'), },
|
|
| 493 |
'balance' => { 'text' => $locale->text('Balance'), },
|
|
| 494 |
'projectnumbers' => { 'text' => $locale->text('Project Numbers'), },
|
|
| 495 |
'department' => { 'text' => $locale->text('Department'), },
|
|
| 496 |
'employee' => { 'text' => $locale->text('Employee'), },
|
|
| 496 | 497 |
'transaction_description' => { 'text' => $locale->text('Transaction description'), },
|
| 497 | 498 |
); |
| 498 | 499 |
|
Auch abrufbar als: Unified diff
Kosmetik Dialogbuchung gl.pl, GL.pm: Ausrichtung