Revision 421ebe54
Von Tamino Steinert vor etwa 1 Jahr hinzugefügt
| SL/Controller/DeliveryOrder.pm | ||
|---|---|---|
| 25 | 25 |
use SL::DB::Printer; |
| 26 | 26 |
use SL::DB::Language; |
| 27 | 27 |
use SL::DB::Reclamation; |
| 28 |
use SL::DB::Reclamation::TypeData qw(:types); |
|
| 28 | 29 |
use SL::DB::RecordLink; |
| 29 | 30 |
use SL::DB::Shipto; |
| 30 | 31 |
use SL::DB::Translation; |
| ... | ... | |
| 81 | 82 |
|
| 82 | 83 |
__PACKAGE__->run_before('get_unalterable_data',
|
| 83 | 84 |
only => [ qw( |
| 84 |
save save_as_new save_and_new_record save_and_invoice
|
|
| 85 |
save save_as_new workflow_new_record workflow_invoice
|
|
| 85 | 86 |
save_and_ap_transaction print send_email |
| 86 | 87 |
) ]); |
| 87 | 88 |
|
| ... | ... | |
| 528 | 529 |
$self->redirect_to(@redirect_params); |
| 529 | 530 |
} |
| 530 | 531 |
|
| 531 |
sub action_save_and_new_record {
|
|
| 532 |
sub action_workflow_new_record {
|
|
| 532 | 533 |
my ($self) = @_; |
| 533 | 534 |
my $to_type = $::form->{to_type};
|
| 534 | 535 |
my $to_controller = get_object_name_from_type($to_type); |
| 535 | 536 |
|
| 536 |
$self->save(); |
|
| 537 |
|
|
| 538 | 537 |
my %additional_params = (); |
| 539 | 538 |
if ($::form->{only_selected_item_positions}) { # ids can be unset before save
|
| 540 | 539 |
my $item_positions = $::form->{selected_item_positions} || [];
|
| ... | ... | |
| 556 | 555 |
|
| 557 | 556 |
# save the order and redirect to the frontend subroutine for a new |
| 558 | 557 |
# invoice |
| 559 |
sub action_save_and_invoice {
|
|
| 560 |
my ($self) = @_; |
|
| 561 |
|
|
| 562 |
$self->save_and_redirect_to( |
|
| 563 |
controller => 'oe.pl', |
|
| 564 |
action => 'oe_invoice_from_order', |
|
| 565 |
); |
|
| 566 |
} |
|
| 567 |
|
|
| 568 |
# workflow from purchase order to ap transaction |
|
| 569 |
sub action_save_and_ap_transaction {
|
|
| 558 |
sub action_workflow_invoice {
|
|
| 570 | 559 |
my ($self) = @_; |
| 571 | 560 |
|
| 572 |
$self->save_and_redirect_to( |
|
| 573 |
controller => 'ap.pl', |
|
| 574 |
action => 'add_from_purchase_order', |
|
| 561 |
$self->redirect_to( |
|
| 562 |
controller => 'do.pl', |
|
| 563 |
action => 'invoice_from_delivery_order_controller', |
|
| 564 |
from_id => $self->order->id, |
|
| 575 | 565 |
); |
| 576 | 566 |
} |
| 577 | 567 |
|
| ... | ... | |
| 1807 | 1797 |
$self->type_data->rights('edit') || 'DOES_NOT_EXIST', 1
|
| 1808 | 1798 |
); |
| 1809 | 1799 |
|
| 1800 |
my $confirmation_on_workflow = $self->order->delivered ? undef |
|
| 1801 |
: ( $self->order->is_sales && $::instance_conf->get_sales_delivery_order_check_stocked) ? t8('This record has not been stocked out. Proceed?')
|
|
| 1802 |
: (!$self->order->is_sales && $::instance_conf->get_purchase_delivery_order_check_stocked) ? t8('This record has not been stocked in. Proceed?')
|
|
| 1803 |
: undef; |
|
| 1804 |
|
|
| 1810 | 1805 |
for my $bar ($::request->layout->get('actionbar')) {
|
| 1811 | 1806 |
$bar->add( |
| 1812 | 1807 |
combobox => [ |
| ... | ... | |
| 1841 | 1836 |
t8('Workflow'),
|
| 1842 | 1837 |
], |
| 1843 | 1838 |
action => [ |
| 1844 |
t8('Save and Invoice'),
|
|
| 1839 |
t8('Create Invoice'),
|
|
| 1845 | 1840 |
call => [ 'kivi.DeliveryOrder.save', {
|
| 1846 |
action => 'save_and_invoice',
|
|
| 1841 |
action => 'workflow_invoice',
|
|
| 1847 | 1842 |
warn_on_duplicates => $::instance_conf->get_order_warn_duplicate_parts, |
| 1848 | 1843 |
}], |
| 1849 |
only_if => $self->type_data->show_menu("save_and_invoice"),
|
|
| 1850 |
disabled => !$may_edit_create ? t8('You do not have the permissions to access this function.') : undef,
|
|
| 1844 |
only_if => $self->type_data->show_menu("workflow_invoice"),
|
|
| 1845 |
disabled => !$may_edit_create ? t8('You do not have the permissions to access this function.')
|
|
| 1846 |
: !$self->order->id ? t8('This object has not been saved yet.')
|
|
| 1847 |
: undef, |
|
| 1848 |
confirm => $confirmation_on_workflow, |
|
| 1851 | 1849 |
], |
| 1852 | 1850 |
action => [ |
| 1853 |
t8('Save and AP Transaction'),
|
|
| 1854 |
call => [ 'kivi.DeliveryOrder.save', {
|
|
| 1855 |
action => 'save_and_ap_transaction',
|
|
| 1851 |
t8('Create Reclamation'),
|
|
| 1852 |
call => [ 'kivi.DeliveryOrder.save', {
|
|
| 1853 |
action => 'workflow_new_record',
|
|
| 1856 | 1854 |
warn_on_duplicates => $::instance_conf->get_order_warn_duplicate_parts, |
| 1855 |
form_params => [ |
|
| 1856 |
{ name => 'to_type',
|
|
| 1857 |
value => $self->order->is_sales ? SALES_RECLAMATION_TYPE() |
|
| 1858 |
: PURCHASE_RECLAMATION_TYPE() }, |
|
| 1859 |
], |
|
| 1857 | 1860 |
}], |
| 1858 |
only_if => $self->type_data->show_menu("save_and_ap_transaction"),
|
|
| 1859 |
disabled => !$may_edit_create ? t8('You do not have the permissions to access this function.') : undef,
|
|
| 1861 |
only_if => $self->type_data->show_menu('workflow_reclamation'),
|
|
| 1862 |
disabled => !$may_edit_create ? t8('You do not have the permissions to access this function.')
|
|
| 1863 |
: !$self->order->id ? t8('This object has not been saved yet.')
|
|
| 1864 |
: undef, |
|
| 1865 |
confirm => $confirmation_on_workflow, |
|
| 1860 | 1866 |
], |
| 1861 | 1867 |
|
| 1862 | 1868 |
], # end of combobox "Workflow" |
| ... | ... | |
| 2128 | 2134 |
return $_[0]->type_data->properties("nr_key");
|
| 2129 | 2135 |
} |
| 2130 | 2136 |
|
| 2131 |
sub save_and_redirect_to {
|
|
| 2132 |
my ($self, %params) = @_; |
|
| 2133 |
|
|
| 2134 |
$self->save(); |
|
| 2135 |
|
|
| 2136 |
flash_later('info', $self->type_data->text("saved"));
|
|
| 2137 |
|
|
| 2138 |
$self->redirect_to(%params, id => $self->order->id); |
|
| 2139 |
} |
|
| 2140 |
|
|
| 2141 | 2137 |
sub save_history {
|
| 2142 | 2138 |
my ($self, $addition) = @_; |
| 2143 | 2139 |
|
Auch abrufbar als: Unified diff
S:C:DeliveryOrder: Workflow zu Rechnung und Reklamation hinzugefügt