X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/1d7143e9a364a438f828dd31c48a1e1fc3d89903..0d37f1e8:/SL/Controller/CsvImport/Inventory.pm diff --git a/SL/Controller/CsvImport/Inventory.pm b/SL/Controller/CsvImport/Inventory.pm index cecb92bc5..e35aac65b 100644 --- a/SL/Controller/CsvImport/Inventory.pm +++ b/SL/Controller/CsvImport/Inventory.pm @@ -28,6 +28,9 @@ sub init_class { $self->class('SL::DB::Inventory'); } +sub set_profile_defaults { +}; + sub init_profile { my ($self) = @_; @@ -145,7 +148,7 @@ sub check_warehouse { $object->warehouse_id($wh->id); } - # Check wether or not warehouse ID is valid. + # Check whether or not warehouse ID is valid. if ($object->warehouse_id && !$self->warehouses_by->{id}->{ $object->warehouse_id }) { push @{ $entry->{errors} }, $::locale->text('Error: Invalid warehouse'); return 0; @@ -203,12 +206,12 @@ sub check_bin { $object->bin_id($bin->id); } - # Check wether or not bin ID is valid. + # Check whether or not bin ID is valid. if ($object->bin_id && !$self->bins_by->{_wh_id_and_id_ident()}->{ _wh_id_and_id_maker($object->warehouse_id, $object->bin_id) }) { push @{ $entry->{errors} }, $::locale->text('Error: Invalid bin'); return 0; } - + # Map description to ID if given. if (!$object->bin_id && $entry->{raw_data}->{bin}) { my $bin = $self->bins_by->{_wh_id_and_description_ident()}->{ _wh_id_and_description_maker($object->warehouse_id, $entry->{raw_data}->{bin}) }; @@ -235,7 +238,7 @@ sub check_part { my $object = $entry->{object}; - # Check wether or non part ID is valid. + # Check whether or not part ID is valid. if ($object->parts_id && !$self->parts_by->{id}->{ $object->parts_id }) { push @{ $entry->{errors} }, $::locale->text('Error: Invalid part'); return 0;