CsvImport: Aufträge: Auf ungültige Artikel prüfen.

diff --git a/SL/Controller/CsvImport/Order.pm b/SL/Controller/CsvImport/Order.pm
index 6ee6ca1..6886309 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;
 }
 

diff --git a/locale/de/all b/locale/de/all
index cb96a4b..fecae4d 100755 (executable)
--- a/locale/de/all
+++ b/locale/de/all
@@ -1183,6 +1183,7 @@ $self->{texts} = {
   'Error: Invalid warehouse id' => 'Ungültige Lager-ID',
   'Error: Invalid warehouse name #1' => 'Ungültiger Lagername \'#1\'',
   'Error: Name missing'         => 'Fehler: Name fehlt',
+  'Error: Part is obsolete'     => 'Fehler: Artikel ist ungültig',
   'Error: Part not found'       => 'Fehler: Artikel nicht gefunden',
   'Error: Quantity to transfer is zero.' => 'Fehler: Zu bewegende Menge ist Null.',
   'Error: Transfer would result in a negative target quantity.' => 'Fehler: Lagerbewegung würde zu einer negativen Zielmenge führen.',

diff --git a/locale/en/all b/locale/en/all
index 1b0f2dd..c1c7857 100644 (file)
--- a/locale/en/all
+++ b/locale/en/all
@@ -1171,6 +1171,7 @@ $self->{texts} = {
   'Error: Invalid vendor in column make_#1' => '',
   'Error: Invalid warehouse'    => '',
   'Error: Name missing'         => '',
+  'Error: Part is obsolete'     => '',
   'Error: Part not found'       => '',
   'Error: Quantity to transfer is zero.' => '',
   'Error: Transfer would result in a negative target quantity.' => '',