Revision f65440cb
Von Moritz Bunkus vor fast 4 Jahren hinzugefügt
| SL/DB/Order.pm | ||
|---|---|---|
| 310 | 310 |
{ from => 'purchase_order', to => 'purchase_order', abbr => 'popo' },
|
| 311 | 311 |
{ from => 'sales_order', to => 'purchase_order', abbr => 'sopo' },
|
| 312 | 312 |
{ from => 'purchase_order', to => 'sales_order', abbr => 'poso' },
|
| 313 |
{ from => 'sales_order', to => 'sales_quotation', abbr => 'sosq' },
|
|
| 313 | 314 |
); |
| 314 | 315 |
my $from_to = (grep { $_->{from} eq $source->type && $_->{to} eq $destination_type} @from_tos)[0];
|
| 315 | 316 |
croak("Cannot convert from '" . $source->type . "' to '" . $destination_type . "'") if !$from_to;
|
| ... | ... | |
| 354 | 355 |
if ( $is_abbr_any->(qw(soso)) ) {
|
| 355 | 356 |
$args{periodic_invoices_config} = $source->periodic_invoices_config->clone_and_reset if $source->periodic_invoices_config;
|
| 356 | 357 |
} |
| 358 |
if ( $is_abbr_any->(qw(sosq)) ) {
|
|
| 359 |
$args{ordnumber} = undef;
|
|
| 360 |
$args{quonumber} = undef;
|
|
| 361 |
$args{reqdate} = DateTime->today_local->next_workday();
|
|
| 362 |
} |
|
| 357 | 363 |
|
| 358 | 364 |
# Custom shipto addresses (the ones specific to the sales/purchase |
| 359 | 365 |
# record and not to the customer/vendor) are only linked from |
Auch abrufbar als: Unified diff
Order-Controller: Workflow Verkaufsauftrag → Verkaufsangebot