1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
|
package MyTest::DBIC::Schema::Complex::Product;
use strict;
use base 'DBIx::Class';
__PACKAGE__->load_components(qw(Core));
use MyTest::DBIC::Schema::Complex::Code;
use MyTest::DBIC::Schema::Complex::CodeName;
use MyTest::DBIC::Schema::Complex::Category;
__PACKAGE__->table('rose_db_object_test_products');
__PACKAGE__->add_columns(qw(category_id date_created fk1 fk2 fk3 id last_modified name published status));
__PACKAGE__->set_primary_key('id');
__PACKAGE__->inflate_column(date_created => {
inflate => sub
{
$MyTest::DBIC::Schema::DB->parse_datetime($_[0])
},
deflate => sub
{
my $arg = shift;
if(ref $arg eq 'SCALAR')
{
$arg = $MyTest::DBIC::Schema::DB->parse_datetime($$arg);
}
$MyTest::DBIC::Schema::DB->format_datetime($arg)
} });
__PACKAGE__->inflate_column(last_modified => {
inflate => sub
{
$MyTest::DBIC::Schema::DB->parse_datetime($_[0])
},
deflate => sub
{
my $arg = shift;
if(ref $arg eq 'SCALAR')
{
$arg = $MyTest::DBIC::Schema::DB->parse_datetime($$arg);
}
$MyTest::DBIC::Schema::DB->format_datetime($arg)
} });
__PACKAGE__->inflate_column(published => {
inflate => sub
{
$MyTest::DBIC::Schema::DB->parse_datetime($_[0])
},
deflate => sub
{
my $arg = shift;
if(ref $arg eq 'SCALAR')
{
$arg = $MyTest::DBIC::Schema::DB->parse_datetime($$arg);
}
$MyTest::DBIC::Schema::DB->format_datetime($arg)
} });
__PACKAGE__->add_relationship('category_id', 'MyTest::DBIC::Schema::Complex::Category',
{ 'foreign.id' => 'self.category_id' },
{ accessor => 'filter' });
__PACKAGE__->add_relationship('code_names', 'MyTest::DBIC::Schema::Complex::CodeName',
{ 'foreign.product_id' => 'self.id' },
{ accessor => 'multi' });
1;
|
