X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/11fafb0ba321d8d345fd551c48b93aded6ac9b84..9813fe56ef9460e720b536af25118743ce6a2dec:/SL/Controller/CsvImport/CustomerVendor.pm diff --git a/SL/Controller/CsvImport/CustomerVendor.pm b/SL/Controller/CsvImport/CustomerVendor.pm index 0f2b5294d..5a3a863d1 100644 --- a/SL/Controller/CsvImport/CustomerVendor.pm +++ b/SL/Controller/CsvImport/CustomerVendor.pm @@ -244,18 +244,7 @@ sub save_objects { my $with_number = [ grep { $_->{object}->$numbercolumn ne '####' } @{ $self->controller->data } ]; my $without_number = [ grep { $_->{object}->$numbercolumn eq '####' } @{ $self->controller->data } ]; - foreach my $entry (@{$with_number}, @{$without_number}) { - my $object = $entry->{object}; - - my $number = SL::TransNumber->new(type => $self->table(), - number => $object->$numbercolumn(), - business_id => $object->business_id(), - save => 1); - - if ( $object->$numbercolumn eq '####' || !$number->is_unique() ) { - $object->$numbercolumn($number->create_unique()); - } - } + $_->{object}->$numbercolumn('') for @{ $without_number }; $self->SUPER::save_objects(data => $with_number); $self->SUPER::save_objects(data => $without_number);