X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/6f92326a8f2c1f9205a062d32ed8f1abdaa4b7b5..ba802064109d19f3488e5555ec04491681e37b51:/SL/Controller/CsvImport/Shipto.pm

diff --git a/SL/Controller/CsvImport/Shipto.pm b/SL/Controller/CsvImport/Shipto.pm
index 903c4b2ca..1d2fdd7f6 100644
--- a/SL/Controller/CsvImport/Shipto.pm
+++ b/SL/Controller/CsvImport/Shipto.pm
@@ -19,9 +19,17 @@ sub init_class {
 sub check_objects {
   my ($self) = @_;
 
+  $self->controller->track_progress(phase => 'building data', progress => 0);
+
+  my $i;
+  my $num_data = scalar @{ $self->controller->data };
   foreach my $entry (@{ $self->controller->data }) {
+    $self->controller->track_progress(progress => $i/$num_data * 100) if $i % 100 == 0;
+
     $self->check_vc($entry, 'trans_id');
     $entry->{object}->module('CT');
+  } continue {
+    $i++;
   }
 
   $self->add_info_columns({ header => $::locale->text('Customer/Vendor'), method => 'vc_name' });
@@ -80,20 +88,6 @@ sub get_duplicate_check_fields {
   };
 }
 
-sub field_lengths {
-  return ( shiptoname         => 75,
-           shiptodepartment_1 => 75,
-           shiptodepartment_2 => 75,
-           shiptostreet       => 75,
-           shiptozipcode      => 75,
-           shiptocity         => 75,
-           shiptocountry      => 75,
-           shiptocontact      => 75,
-           shiptophone        => 30,
-           shiptofax          => 30,
-         );
-}
-
 sub init_profile {
   my ($self) = @_;
 
@@ -127,4 +121,4 @@ sub setup_displayable_columns {
                                 );
 }
 
-1;
\ No newline at end of file
+1;