Revision 1feb4280
Von Bernd Bleßmann vor fast 11 Jahren hinzugefügt
SL/Controller/CsvImport/BaseMulti.pm | ||
---|---|---|
5 | 5 |
use List::MoreUtils qw(pairwise); |
6 | 6 |
|
7 | 7 |
use SL::Helper::Csv; |
8 |
use SL::DB::Customer; |
|
9 |
use SL::DB::Language; |
|
10 |
use SL::DB::PaymentTerm; |
|
11 |
use SL::DB::Vendor; |
|
12 |
use SL::DB::Contact; |
|
13 | 8 |
|
14 | 9 |
use parent qw(SL::Controller::CsvImport::Base); |
15 | 10 |
|
... | ... | |
76 | 71 |
$self->controller->info_headers($info_headers); |
77 | 72 |
|
78 | 73 |
my @objects = $self->csv->get_objects; |
74 |
|
|
79 | 75 |
$self->controller->track_progress(progress => 70); |
80 | 76 |
|
81 | 77 |
my @raw_data = @{ $self->csv->get_data }; |
... | ... | |
133 | 129 |
} |
134 | 130 |
} |
135 | 131 |
|
136 |
sub add_cvar_raw_data_columns { |
|
137 |
my ($self) = @_; |
|
138 |
|
|
139 |
map { $self->add_raw_data_columns($_) if exists $self->controller->data->[0]->{raw_data}->{$_} } @{ $self->cvar_columns }; |
|
140 |
} |
|
141 |
|
|
142 | 132 |
sub init_profile { |
143 | 133 |
my ($self) = @_; |
144 | 134 |
|
... | ... | |
201 | 191 |
} |
202 | 192 |
} |
203 | 193 |
|
204 |
sub add_cvar_columns_to_displayable_columns { |
|
205 |
my ($self) = @_; |
|
206 |
|
|
207 |
$self->add_displayable_columns(map { { name => 'cvar_' . $_->name, |
|
208 |
description => $::locale->text('#1 (custom variable)', $_->description) } } |
|
209 |
@{ $self->all_cvar_configs }); |
|
210 |
} |
|
211 |
|
|
212 |
sub init_existing_objects { |
|
213 |
my ($self) = @_; |
|
214 |
|
|
215 |
eval "require " . $self->class; |
|
216 |
$self->existing_objects($self->manager_class->get_all); |
|
217 |
} |
|
218 |
|
|
219 |
sub init_class { |
|
220 |
die "class not set"; |
|
221 |
} |
|
222 |
|
|
223 |
sub init_manager_class { |
|
224 |
my ($self) = @_; |
|
225 |
|
|
226 |
$self->class =~ m/^SL::DB::(.+)/; |
|
227 |
$self->manager_class("SL::DB::Manager::" . $1); |
|
228 |
} |
|
229 |
|
|
230 | 194 |
sub is_multiplexed { 1 } |
231 | 195 |
|
232 | 196 |
1; |
Auch abrufbar als: Unified diff
Unveränderte Methoden nicht auch in abgeleiteter Klasse definieren.