Banktransaction: Kontoauszug verbuchen überarbeitet

[mfinanz.git] / SL / Controller / CsvImport / Order.pm

diff --git a/SL/Controller/CsvImport/Order.pm b/SL/Controller/CsvImport/Order.pm
index 6ee6ca18d3a54185659ed2cd4b65ad7e173ffee6..e6a1fc00e61fe0a1e750dc6d5aed3dbfe16bc438 100644 (file)
--- a/SL/Controller/CsvImport/Order.pm
+++ b/SL/Controller/CsvImport/Order.pm
@@ -477,6 +477,11 @@ sub check_part {
     return 0;
   }
 
+  if ($self->parts_by->{id}->{ $object->parts_id }->obsolete) {
+    push @{ $entry->{errors} }, $::locale->text('Error: Part is obsolete');
+    return 0;
+  }
+
   return 1;
 }
 
@@ -672,12 +677,6 @@ sub save_objects {
     next if $entry->{raw_data}->{datatype} ne $self->_order_column;
     next if @{ $entry->{errors} };
 
-    if (!$entry->{object}->ordnumber) {
-      my $number = SL::TransNumber->new(type => 'sales_order',
-                                        save => 1);
-      $entry->{object}->ordnumber($number->create_unique());
-    }
-
     push @{ $objects_to_save }, $entry;
   }