Nicht mehr benötigte MetaSetups löschen: DptTrans, TranslationPaymentTerm

[mfinanz.git] / SL / DB / MetaSetup / Unit.pm

diff --git a/SL/DB/MetaSetup/Unit.pm b/SL/DB/MetaSetup/Unit.pm
index 6e05737df11cd86d8320b700458f48ab7d1de76f..0849b4eb34a11b987513fdfb5622252b9f8cf6c3 100644 (file)
--- a/SL/DB/MetaSetup/Unit.pm
+++ b/SL/DB/MetaSetup/Unit.pm
@@ -6,29 +6,29 @@ use strict;
 
 use base qw(SL::DB::Object);
 
 
 use base qw(SL::DB::Object);
 

-__PACKAGE__->meta->setup(
-  table   => 'units',
-
-  columns => [
-    name      => { type => 'varchar', length => 20, not_null => 1 },
-    base_unit => { type => 'varchar', length => 20 },
-    factor    => { type => 'numeric', precision => 5, scale => 20 },
-    type      => { type => 'varchar', length => 20 },
-    sortkey   => { type => 'integer', not_null => 1 },
-    id        => { type => 'serial', not_null => 1 },
-  ],
-
-  primary_key_columns => [ 'name' ],
-
-  unique_key => [ 'id' ],
-
-  foreign_keys => [
-    unit => {
-      class       => 'SL::DB::Unit',
-      key_columns => { base_unit => 'name' },
-    },
-  ],
+__PACKAGE__->meta->table('units');
+
+__PACKAGE__->meta->columns(
+  name      => { type => 'varchar', length => 20, not_null => 1 },
+  base_unit => { type => 'varchar', length => 20 },
+  factor    => { type => 'numeric', precision => 5, scale => 20 },
+  type      => { type => 'varchar', length => 20 },
+  sortkey   => { type => 'integer', not_null => 1 },
+  id        => { type => 'serial', not_null => 1 },

 );
 
 );
 

+__PACKAGE__->meta->primary_key_columns([ 'name' ]);
+
+__PACKAGE__->meta->unique_keys([ 'id' ]);
+
+__PACKAGE__->meta->foreign_keys(
+  unit => {
+    class       => 'SL::DB::Unit',
+    key_columns => { base_unit => 'name' },
+  },
+);
+
+# __PACKAGE__->meta->initialize;
+

 1;
 ;
 1;
 ;