Gewisse Spalten nicht ins Profil aufnehmen

diff --git a/SL/Controller/CsvImport/Base.pm b/SL/Controller/CsvImport/Base.pm
index e865a8612df89a37b835ec35300e225a3a72ab2c..e854291219979611f10ac78182f43d785316293f 100644 (file)
--- a/SL/Controller/CsvImport/Base.pm
+++ b/SL/Controller/CsvImport/Base.pm
@@ -51,8 +51,11 @@ sub init_profile {
 
   eval "require " . $self->class;
 
+  my %unwanted = map { ( $_ => 1 ) } (qw(itime mtime), map { $_->name } @{ $self->class->meta->primary_key_columns });
   my %profile;
   for my $col ($self->class->meta->columns) {
+    next if $unwanted{$col};
+
     my $name = $col->isa('Rose::DB::Object::Metadata::Column::Numeric')   ? "$col\_as_number"
       :        $col->isa('Rose::DB::Object::Metadata::Column::Date')      ? "$col\_as_date"
       :        $col->isa('Rose::DB::Object::Metadata::Column::Timestamp') ? "$col\_as_date"

diff --git a/menu.ini b/menu.ini
index 8dcdf012194d6d817e984b49b53c6b15ced53351..9145cc8641ee227d7e5e995e156e11b3fc29eb2e 100644 (file)
--- a/menu.ini
+++ b/menu.ini
@@ -794,10 +794,10 @@ module=controller.pl
 action=CsvImport/new
 profile.type=addresses
 
-# [System--Import CSV2--Parts]
-# module=controller.pl
-# action=CsvImport/new
-# profile.type=parts
+[System--Import CSV2--Parts]
+module=controller.pl
+action=CsvImport/new
+profile.type=parts
 
 
 [System--Templates]