Revision 2d44a547
Von Jan Büren vor mehr als 5 Jahren hinzugefügt
| SL/Controller/Order.pm | ||
|---|---|---|
| 58 | 58 |
my ($self) = @_; |
| 59 | 59 |
|
| 60 | 60 |
$self->order->transdate(DateTime->now_local()); |
| 61 |
my $extra_days = $self->type eq sales_quotation_type() ? $::instance_conf->get_reqdate_interval : 1; |
|
| 61 |
my $extra_days = $self->{type} eq 'sales_quotation' ? $::instance_conf->get_reqdate_interval :
|
|
| 62 |
$self->{type} eq 'sales_order' ? $::instance_conf->get_delivery_date_interval : 1;
|
|
| 62 | 63 |
$self->order->reqdate(DateTime->today_local->next_workday(extra_days => $extra_days)) if !$self->order->reqdate; |
| 63 | 64 |
|
| 65 |
|
|
| 64 | 66 |
$self->pre_render(); |
| 65 | 67 |
$self->render( |
| 66 | 68 |
'order/form', |
| ... | ... | |
| 210 | 212 |
|
| 211 | 213 |
# Set new reqdate unless changed |
| 212 | 214 |
if ($order->reqdate == $saved_order->reqdate) {
|
| 213 |
my $extra_days = $self->type eq sales_quotation_type() ? $::instance_conf->get_reqdate_interval : 1; |
|
| 215 |
my $extra_days = $self->{type} eq 'sales_quotation' ? $::instance_conf->get_reqdate_interval :
|
|
| 216 |
$self->{type} eq 'sales_order' ? $::instance_conf->get_delivery_date_interval : 1;
|
|
| 214 | 217 |
$new_attrs{reqdate} = DateTime->today_local->next_workday(extra_days => $extra_days);
|
| 215 | 218 |
} else {
|
| 216 | 219 |
$new_attrs{reqdate} = $order->reqdate;
|
Auch abrufbar als: Unified diff
Verkaufsaufträge: konfigurierbares Intervall für Lieferdatum-Berechnung