Revision ef24ff5a
Von Tamino Steinert vor etwa 2 Jahren hinzugefügt
| SL/Controller/Order.pm | ||
|---|---|---|
|
use SL::DB::Shipto;
|
||
|
use SL::DB::Translation;
|
||
|
use SL::DB::ValidityToken;
|
||
|
use SL::Model::Record;
|
||
|
|
||
|
use SL::Helper::CreatePDF qw(:all);
|
||
|
use SL::Helper::PrintOptions;
|
||
| ... | ... | |
|
|
||
|
my $reclamation = SL::DB::Reclamation->new(id => $::form->{from_id})->load;
|
||
|
my %params;
|
||
|
$params{destination_type} = $reclamation->is_sales ? 'sales_order'
|
||
|
: 'purchase_order';
|
||
|
my $order = SL::DB::Order->new_from($reclamation, %params);
|
||
|
my $target_type = $reclamation->is_sales ? 'sales_order'
|
||
|
: 'purchase_order';
|
||
|
my $order = SL::Model::Record->new_from_workflow($reclamation, $target_type);
|
||
|
$self->{converted_from_reclamation_id} = $::form->{from_id};
|
||
|
|
||
|
$self->order($order);
|
||
Auch abrufbar als: Unified diff
Model::Record: new_from_workflow implementiert