Revision 67643d03
Von Sven Schöling vor fast 12 Jahren hinzugefügt
SL/DB/CsvImportProfileSetting.pm | ||
---|---|---|
6 | 6 |
use strict; |
7 | 7 |
|
8 | 8 |
use SL::DB::MetaSetup::CsvImportProfileSetting; |
9 |
use Rose::DB::Object::Helpers qw(clone); |
|
9 | 10 |
|
10 | 11 |
# Creates get_all, get_all_count, get_all_iterator, delete_all and update_all. |
11 | 12 |
__PACKAGE__->meta->make_manager_class; |
12 | 13 |
|
14 |
# Helpers' clone_and_reset also kills compund keys like in this case kay+id |
|
15 |
sub clone_and_reset { |
|
16 |
my $clone = $_[0]->clone; |
|
17 |
$clone->id(undef); |
|
18 |
return $clone; |
|
19 |
} |
|
20 |
|
|
13 | 21 |
1; |
Auch abrufbar als: Unified diff
Csv Import in Datenbank zwischenspeichern und rudimentärer Report.