Projekt

Allgemein

Profil

« Zurück | Weiter » 

Revision fd840a7b

Von Bernd Bleßmann vor mehr als 7 Jahren hinzugefügt

  • ID fd840a7b95ace54ec5e865afea6ef806cb81c23d
  • Vorgänger 9ca0da81
  • Nachfolger 6e6e6849

CsvImport Aufträge: Rabatt richtig für Datenbank aufbereiten.

In der DB steht der Rabatt als Hundertstel.

Unterschiede anzeigen:

SL/Controller/CsvImport/Order.pm
391 391

  
392 392
  $self->handle_unit($entry);
393 393
  $self->handle_sellprice($entry);
394
  $self->handle_discount($entry);
394 395

  
395 396
  # copy from part if not given
396 397
  $object->description($part_obj->description) unless $object->description;
......
398 399
  $object->lastcost($part_obj->lastcost)       unless defined $object->lastcost;
399 400

  
400 401
  # set to 0 if not given
401
  $object->discount(0) unless $object->discount;
402 402
  $object->ship(0)     unless $object->ship;
403 403

  
404 404
  $self->check_project($entry, global => 0);
......
448 448
  }
449 449
}
450 450

  
451
sub handle_discount {
452
  my ($self, $entry) = @_;
453

  
454
  my $object = $entry->{object};
455

  
456
  $object->discount($object->discount/100.0)     if $object->discount;
457
  $object->discount(0)                       unless $object->discount;
458
}
459

  
451 460
sub check_part {
452 461
  my ($self, $entry) = @_;
453 462

  

Auch abrufbar als: Unified diff