X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/6a3494478a287c2820e3f68a09bef700af1f57e0..15f58ff3dfd79651a95535b53f864ea0e8cb6620:/SL/DB/CsvImportProfile.pm diff --git a/SL/DB/CsvImportProfile.pm b/SL/DB/CsvImportProfile.pm index 1902a51ec..9980ad528 100644 --- a/SL/DB/CsvImportProfile.pm +++ b/SL/DB/CsvImportProfile.pm @@ -34,13 +34,6 @@ sub new_with_default { sub set_defaults { my ($self) = @_; - $self->_set_defaults(sep_char => ',', - quote_char => '"', - escape_char => '"', - charset => 'CP850', - numberformat => $::myconfig{numberformat}, - duplicates => 'no_check', - ); if ($self->type eq 'parts') { my $bugru = SL::DB::Manager::Buchungsgruppe->find_by(description => { like => 'Standard%19%' }); @@ -59,10 +52,33 @@ sub set_defaults { item_column => $::locale->text('OrderItem'), max_amount_diff => 0.02, ); + } elsif ($self->type eq 'mt940') { + $self->_set_defaults(charset => 'UTF8', + sep_char => ';', + numberformat => '1000.00', + update_policy => 'skip', + ); + } elsif ($self->type eq 'bank_transactions') { + $self->_set_defaults(charset => 'UTF8', + update_policy => 'skip', + ); } else { $self->_set_defaults(table => 'customer'); } + # TODO: move the defaults into their own controller + # defaults can only be set once, so use these values as default if they + # haven't already been set above for one of the special import types + # If the values have been set above they won't be overwritten here: + + $self->_set_defaults(sep_char => ',', + quote_char => '"', + escape_char => '"', + charset => 'CP850', + numberformat => $::myconfig{numberformat}, + duplicates => 'no_check', + ); + return $self; }