Revision b8b112a3
Von Sven Schöling vor mehr als 11 Jahren hinzugefügt
SL/DB/MetaSetup/BankAccount.pm | ||
---|---|---|
6 | 6 |
|
7 | 7 |
use base qw(SL::DB::Object); |
8 | 8 |
|
9 |
__PACKAGE__->meta->setup( |
|
10 |
table => 'bank_accounts', |
|
11 |
|
|
12 |
columns => [ |
|
13 |
id => { type => 'integer', not_null => 1, sequence => 'id' }, |
|
14 |
account_number => { type => 'varchar', length => 100 }, |
|
15 |
bank_code => { type => 'varchar', length => 100 }, |
|
16 |
iban => { type => 'varchar', length => 100 }, |
|
17 |
bic => { type => 'varchar', length => 100 }, |
|
18 |
bank => { type => 'text' }, |
|
19 |
chart_id => { type => 'integer', not_null => 1 }, |
|
20 |
], |
|
21 |
|
|
22 |
primary_key_columns => [ 'id' ], |
|
23 |
|
|
24 |
foreign_keys => [ |
|
25 |
chart => { |
|
26 |
class => 'SL::DB::Chart', |
|
27 |
key_columns => { chart_id => 'id' }, |
|
28 |
}, |
|
29 |
], |
|
9 |
__PACKAGE__->meta->table('bank_accounts'); |
|
10 |
|
|
11 |
__PACKAGE__->meta->columns( |
|
12 |
id => { type => 'integer', not_null => 1, sequence => 'id' }, |
|
13 |
account_number => { type => 'varchar', length => 100 }, |
|
14 |
bank_code => { type => 'varchar', length => 100 }, |
|
15 |
iban => { type => 'varchar', length => 100 }, |
|
16 |
bic => { type => 'varchar', length => 100 }, |
|
17 |
bank => { type => 'text' }, |
|
18 |
chart_id => { type => 'integer', not_null => 1 }, |
|
30 | 19 |
); |
31 | 20 |
|
21 |
__PACKAGE__->meta->primary_key_columns([ 'id' ]); |
|
22 |
|
|
23 |
__PACKAGE__->meta->foreign_keys( |
|
24 |
chart => { |
|
25 |
class => 'SL::DB::Chart', |
|
26 |
key_columns => { chart_id => 'id' }, |
|
27 |
}, |
|
28 |
); |
|
29 |
|
|
30 |
# __PACKAGE__->meta->initialize; |
|
31 |
|
|
32 | 32 |
1; |
33 | 33 |
; |
Auch abrufbar als: Unified diff
MetaSetup neu generiert