Projekt

Allgemein

Profil

« Zurück | Weiter » 

Revision d5c192b8

Von Bernd Bleßmann vor fast 4 Jahren hinzugefügt

  • ID d5c192b8f594941474c076c3966fe1efbe852b59
  • Vorgänger f7305c1d
  • Nachfolger f717c870

Auftrag-Controller: Vergleich des Beleg-Typs einheitlicher …

- Zum Typ-Vergleich die Typ-Funktionen verwenden.
War hier kein Problem, kann aber Typos verhindern - dafür sind die Funktionen
gedacht gewesen.

- Auf type nicht als Hash-Key, sondern als Methode zugreifen.
Dann ist das einheitlicher, da das auch überall sonst im Controller so gemacht
wird.

Unterschiede anzeigen:

SL/Controller/Order.pm
69 69
  my ($self) = @_;
70 70

  
71 71
  $self->order->transdate(DateTime->now_local());
72
  my $extra_days = $self->{type} eq 'sales_quotation' ? $::instance_conf->get_reqdate_interval       :
73
                   $self->{type} eq 'sales_order'     ? $::instance_conf->get_delivery_date_interval : 1;
72
  my $extra_days = $self->type eq sales_quotation_type() ? $::instance_conf->get_reqdate_interval       :
73
                   $self->type eq sales_order_type()     ? $::instance_conf->get_delivery_date_interval : 1;
74 74

  
75
  if (   ($self->{type} eq 'sales_order'     &&  $::instance_conf->get_deliverydate_on)
76
      || ($self->{type} eq 'sales_quotation' &&  $::instance_conf->get_reqdate_on)
75
  if (   ($self->type eq sales_order_type()     &&  $::instance_conf->get_deliverydate_on)
76
      || ($self->type eq sales_quotation_type() &&  $::instance_conf->get_reqdate_on)
77 77
      && (!$self->order->reqdate)) {
78 78
    $self->order->reqdate(DateTime->today_local->next_workday(extra_days => $extra_days));
79 79
  }
......
227 227

  
228 228
  # Set new reqdate unless changed if it is enabled in client config
229 229
  if ($order->reqdate == $saved_order->reqdate) {
230
    my $extra_days = $self->{type} eq 'sales_quotation' ? $::instance_conf->get_reqdate_interval       :
231
                     $self->{type} eq 'sales_order'     ? $::instance_conf->get_delivery_date_interval : 1;
230
    my $extra_days = $self->type eq sales_quotation_type() ? $::instance_conf->get_reqdate_interval       :
231
                     $self->type eq sales_order_type()     ? $::instance_conf->get_delivery_date_interval : 1;
232 232

  
233
    if (   ($self->{type} eq 'sales_order'     &&  !$::instance_conf->get_deliverydate_on)
234
        || ($self->{type} eq 'sales_quotation' &&  !$::instance_conf->get_reqdate_on)) {
233
    if (   ($self->type eq sales_order_type()     &&  !$::instance_conf->get_deliverydate_on)
234
        || ($self->type eq sales_quotation_type() &&  !$::instance_conf->get_reqdate_on)) {
235 235
      $new_attrs{reqdate} = '';
236 236
    } else {
237 237
      $new_attrs{reqdate} = DateTime->today_local->next_workday(extra_days => $extra_days);

Auch abrufbar als: Unified diff