Revision 1abd7845
Von Moritz Bunkus vor mehr als 13 Jahren hinzugefügt
| SL/Controller/CsvImport.pm | ||
|---|---|---|
| 2 | 2 |
|
| 3 | 3 |
use strict; |
| 4 | 4 |
|
| 5 |
use SL::DB::Buchungsgruppe; |
|
| 5 | 6 |
use SL::DB::CsvImportProfile; |
| 6 | 7 |
use SL::Helper::Flash; |
| 7 | 8 |
|
| ... | ... | |
| 11 | 12 |
|
| 12 | 13 |
use Rose::Object::MakeMethods::Generic |
| 13 | 14 |
( |
| 14 |
scalar => [ qw(type profile all_profiles all_charsets sep_char all_sep_chars quote_char all_quote_chars escape_char all_escape_chars) ], |
|
| 15 |
scalar => [ qw(type profile all_profiles all_charsets sep_char all_sep_chars quote_char all_quote_chars escape_char all_escape_chars all_buchungsgruppen) ],
|
|
| 15 | 16 |
); |
| 16 | 17 |
|
| 17 | 18 |
__PACKAGE__->run_before('check_auth');
|
| ... | ... | |
| 110 | 111 |
my $title = $self->type eq 'customers_vendors' ? $::locale->text('CSV import: customers and vendors')
|
| 111 | 112 |
: $self->type eq 'addresses' ? $::locale->text('CSV import: shipping addresses')
|
| 112 | 113 |
: $self->type eq 'contacts' ? $::locale->text('CSV import: contacts')
|
| 113 |
: $self->type eq 'parts' ? $::locale->text('CSV import: parts, services and assemblies')
|
|
| 114 |
: $self->type eq 'parts' ? $::locale->text('CSV import: parts and services')
|
|
| 114 | 115 |
: die; |
| 115 | 116 |
|
| 117 |
$self->all_buchungsgruppen(SL::DB::Manager::Buchungsgruppe->get_all_sorted); |
|
| 118 |
|
|
| 116 | 119 |
$self->render('csv_import/form', title => $title);
|
| 117 | 120 |
} |
| 118 | 121 |
|
Auch abrufbar als: Unified diff
CSV-Importmasken um typspezifische Eingabefelder erweitert