X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/39e13b0fb4b323c1d8c691b0e55c37d0ca1becc5..e055b3ff9423767fd109a8d7a36d354c8997c941:/SL/Controller/CsvImport/CustomerVendor.pm diff --git a/SL/Controller/CsvImport/CustomerVendor.pm b/SL/Controller/CsvImport/CustomerVendor.pm index 9cb115745..a82af654a 100644 --- a/SL/Controller/CsvImport/CustomerVendor.pm +++ b/SL/Controller/CsvImport/CustomerVendor.pm @@ -3,6 +3,8 @@ package SL::Controller::CsvImport::CustomerVendor; use strict; use SL::Helper::Csv; +use SL::DB::CustomVariable; +use SL::DB::CustomVariableConfig; use parent qw(SL::Controller::CsvImport::Base); @@ -21,6 +23,12 @@ sub init_class { $self->class('SL::DB::' . ucfirst($self->table)); } +sub init_all_cvar_configs { + my ($self) = @_; + + return SL::DB::Manager::CustomVariableConfig->get_all(where => [ module => 'CT' ]); +} + sub check_objects { my ($self) = @_; @@ -43,7 +51,11 @@ sub check_objects { } else { $vcs_by_number{ $object->$numbercolumn } = $object; } + + $self->handle_cvars($entry); } + + $self->add_cvar_raw_data_columns; } sub check_duplicates { @@ -103,4 +115,10 @@ sub field_lengths { ); } +# TODO: +# Kundentyp +# salesman_id +# Sprache +# Zahlungsbedingungen + 1;