You do not want to extend it in this easy case.
in your Row Class Table1:
sub insert {
my $self = shift;
$self->next::method(@_);
$self->result_source->schema->resultset('Table3')->create({
name => $self->result_source->name,
id => $self->id,
});
$self;
}
Same for Table2.
You can add relationships between 1(2) and 3 and the code in 'insert' func
will be smaller.
2007/4/5, Mario Minati <[EMAIL PROTECTED]>:
Hello @all,
I would like to extend dbix::class in the following way:
When creating a new row in one of my tables I would like to automatically
get
an entry in a second table.
More concrete:
Table 1 holds address data
Table 2 holds telephone numbers
Table 3 holds a GUID, a table name and a id
When a new row is created in table 1 or 2 I would like to get a new row in
table 3 with a new guid and the name of table 1/2 and the id of the newly
created row in table 1/2.
How and where do I have to extend DBIx::Class or create a new component?
Any hints and tips are welcome.
Greets,
Mario Minati
_______________________________________________
List: http://lists.rawmode.org/cgi-bin/mailman/listinfo/dbix-class
Wiki: http://dbix-class.shadowcatsystems.co.uk/
IRC: irc.perl.org#dbix-class
SVN: http://dev.catalyst.perl.org/repos/bast/trunk/DBIx-Class/
Searchable Archive:
http://www.mail-archive.com/[email protected]/
_______________________________________________
List: http://lists.rawmode.org/cgi-bin/mailman/listinfo/dbix-class
Wiki: http://dbix-class.shadowcatsystems.co.uk/
IRC: irc.perl.org#dbix-class
SVN: http://dev.catalyst.perl.org/repos/bast/trunk/DBIx-Class/
Searchable Archive: http://www.mail-archive.com/[email protected]/
