X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FController%2FCsvImport%2FShipto.pm;h=c20b574dfd3d934ce7f0e6f61fbd6b2038867231;hb=eed2ea364f31c49d86ee4570759a987dc242483f;hp=903c4b2ca07d5af6acdaea30ac90fe35c413bbd7;hpb=caf4380789ea2166eaf89f7a600406f850d64428;p=kivitendo-erp.git

diff --git a/SL/Controller/CsvImport/Shipto.pm b/SL/Controller/CsvImport/Shipto.pm
index 903c4b2ca..c20b574df 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' });
@@ -127,4 +135,4 @@ sub setup_displayable_columns {
                                 );
 }
 
-1;
\ No newline at end of file
+1;