use Rose::Object::MakeMethods::Generic
(
- scalar => [ qw(file_name transactions statistics) ],
+ scalar => [ qw(file_name transactions statistics charset) ],
'scalar --get_set_init' => [ qw(bank_accounts) ],
);
$file->fh->print($::form->{file});
$file->fh->close;
+ $self->charset($::form->{charset});
$self->file_name($file->file_name);
$self->parse_and_analyze_transactions;
die "missing file for action import_mt940" unless $::form->{file_name};
$self->file_name($::form->{file_name});
+ $self->charset($::form->{charset});
$self->parse_and_analyze_transactions;
$self->import_transactions;
my $currency_id = SL::DB::Default->get->currency_id;
- $self->transactions([ sort { $a->{transdate} cmp $b->{transdate} } SL::MT940->parse($self->file_name) ]);
+ $self->transactions([ sort { $a->{transdate} cmp $b->{transdate} } SL::MT940->parse($self->file_name, charset => $self->charset) ]);
foreach my $transaction (@{ $self->transactions }) {
$transaction->{bank_account} = $self->bank_accounts->{ make_bank_account_idx($transaction->{local_bank_code}, $transaction->{local_account_number}) };