Revision b8b112a3
Von Sven Schöling vor mehr als 11 Jahren hinzugefügt
| SL/DB/MetaSetup/Project.pm | ||
|---|---|---|
| 6 | 6 |
|
| 7 | 7 |
use base qw(SL::DB::Object); |
| 8 | 8 |
|
| 9 |
__PACKAGE__->meta->setup( |
|
| 10 |
table => 'project', |
|
| 11 |
|
|
| 12 |
columns => [ |
|
| 13 |
id => { type => 'integer', not_null => 1, sequence => 'id' },
|
|
| 14 |
projectnumber => { type => 'text' },
|
|
| 15 |
description => { type => 'text' },
|
|
| 16 |
itime => { type => 'timestamp', default => 'now()' },
|
|
| 17 |
mtime => { type => 'timestamp' },
|
|
| 18 |
active => { type => 'boolean', default => 'true' },
|
|
| 19 |
customer_id => { type => 'integer' },
|
|
| 20 |
type => { type => 'text' },
|
|
| 21 |
valid => { type => 'boolean', default => 'true' },
|
|
| 22 |
], |
|
| 23 |
|
|
| 24 |
primary_key_columns => [ 'id' ], |
|
| 25 |
|
|
| 26 |
unique_key => [ 'projectnumber' ], |
|
| 27 |
|
|
| 28 |
allow_inline_column_values => 1, |
|
| 29 |
|
|
| 30 |
foreign_keys => [ |
|
| 31 |
customer => {
|
|
| 32 |
class => 'SL::DB::Customer', |
|
| 33 |
key_columns => { customer_id => 'id' },
|
|
| 34 |
}, |
|
| 35 |
], |
|
| 9 |
__PACKAGE__->meta->table('project');
|
|
| 10 |
|
|
| 11 |
__PACKAGE__->meta->columns( |
|
| 12 |
id => { type => 'integer', not_null => 1, sequence => 'id' },
|
|
| 13 |
projectnumber => { type => 'text' },
|
|
| 14 |
description => { type => 'text' },
|
|
| 15 |
itime => { type => 'timestamp', default => 'now()' },
|
|
| 16 |
mtime => { type => 'timestamp' },
|
|
| 17 |
active => { type => 'boolean', default => 'true' },
|
|
| 18 |
customer_id => { type => 'integer' },
|
|
| 19 |
type => { type => 'text' },
|
|
| 20 |
valid => { type => 'boolean', default => 'true' },
|
|
| 36 | 21 |
); |
| 37 | 22 |
|
| 23 |
__PACKAGE__->meta->primary_key_columns([ 'id' ]); |
|
| 24 |
|
|
| 25 |
__PACKAGE__->meta->unique_keys([ 'projectnumber' ]); |
|
| 26 |
|
|
| 27 |
__PACKAGE__->meta->allow_inline_column_values(1); |
|
| 28 |
|
|
| 29 |
__PACKAGE__->meta->foreign_keys( |
|
| 30 |
customer => {
|
|
| 31 |
class => 'SL::DB::Customer', |
|
| 32 |
key_columns => { customer_id => 'id' },
|
|
| 33 |
}, |
|
| 34 |
); |
|
| 35 |
|
|
| 36 |
# __PACKAGE__->meta->initialize; |
|
| 37 |
|
|
| 38 | 38 |
1; |
| 39 | 39 |
; |
Auch abrufbar als: Unified diff
MetaSetup neu generiert