| 24 |
24 |
use SL::Helper::CreatePDF qw(:all);
|
| 25 |
25 |
use SL::Helper::PrintOptions;
|
| 26 |
26 |
use SL::Helper::ShippedQty;
|
|
27 |
use SL::Helper::UserPreferences::PositionsScrollbar;
|
| 27 |
28 |
|
| 28 |
29 |
use SL::Controller::Helper::GetModels;
|
| 29 |
30 |
|
| ... | ... | |
| 1546 |
1547 |
sub pre_render {
|
| 1547 |
1548 |
my ($self) = @_;
|
| 1548 |
1549 |
|
| 1549 |
|
$self->{all_taxzones} = SL::DB::Manager::TaxZone->get_all_sorted();
|
| 1550 |
|
$self->{all_departments} = SL::DB::Manager::Department->get_all_sorted();
|
| 1551 |
|
$self->{all_employees} = SL::DB::Manager::Employee->get_all(where => [ or => [ id => $self->order->employee_id,
|
| 1552 |
|
deleted => 0 ] ],
|
| 1553 |
|
sort_by => 'name');
|
| 1554 |
|
$self->{all_salesmen} = SL::DB::Manager::Employee->get_all(where => [ or => [ id => $self->order->salesman_id,
|
| 1555 |
|
deleted => 0 ] ],
|
| 1556 |
|
sort_by => 'name');
|
| 1557 |
|
$self->{all_payment_terms} = SL::DB::Manager::PaymentTerm->get_all_sorted(where => [ or => [ id => $self->order->payment_id,
|
| 1558 |
|
obsolete => 0 ] ]);
|
| 1559 |
|
$self->{all_delivery_terms} = SL::DB::Manager::DeliveryTerm->get_all_sorted();
|
| 1560 |
|
$self->{current_employee_id} = SL::DB::Manager::Employee->current->id;
|
| 1561 |
|
$self->{periodic_invoices_status} = $self->get_periodic_invoices_status($self->order->periodic_invoices_config);
|
| 1562 |
|
$self->{order_probabilities} = [ map { { title => ($_ * 10) . '%', id => $_ * 10 } } (0..10) ];
|
|
1550 |
$self->{all_taxzones} = SL::DB::Manager::TaxZone->get_all_sorted();
|
|
1551 |
$self->{all_departments} = SL::DB::Manager::Department->get_all_sorted();
|
|
1552 |
$self->{all_employees} = SL::DB::Manager::Employee->get_all(where => [ or => [ id => $self->order->employee_id,
|
|
1553 |
deleted => 0 ] ],
|
|
1554 |
sort_by => 'name');
|
|
1555 |
$self->{all_salesmen} = SL::DB::Manager::Employee->get_all(where => [ or => [ id => $self->order->salesman_id,
|
|
1556 |
deleted => 0 ] ],
|
|
1557 |
sort_by => 'name');
|
|
1558 |
$self->{all_payment_terms} = SL::DB::Manager::PaymentTerm->get_all_sorted(where => [ or => [ id => $self->order->payment_id,
|
|
1559 |
obsolete => 0 ] ]);
|
|
1560 |
$self->{all_delivery_terms} = SL::DB::Manager::DeliveryTerm->get_all_sorted();
|
|
1561 |
$self->{current_employee_id} = SL::DB::Manager::Employee->current->id;
|
|
1562 |
$self->{periodic_invoices_status} = $self->get_periodic_invoices_status($self->order->periodic_invoices_config);
|
|
1563 |
$self->{order_probabilities} = [ map { { title => ($_ * 10) . '%', id => $_ * 10 } } (0..10) ];
|
|
1564 |
$self->{positions_scrollbar_height} = SL::Helper::UserPreferences::PositionsScrollbar->new()->get_height();
|
| 1563 |
1565 |
|
| 1564 |
1566 |
my $print_form = Form->new('');
|
| 1565 |
1567 |
$print_form->{type} = $self->type;
|
Auftrags-Controller: Einstellungen/Höhe des Scrollbereichs berücksichtigen …
… für den Positionsbereich