X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/89360aadb2c3e0854a2815e5d0ed8a9efd1c5889..a89af9c2a38f19bc2834a2e09a286ff36c9ef3d7:/SL/DB/MetaSetup/PurchaseInvoice.pm

diff --git a/SL/DB/MetaSetup/PurchaseInvoice.pm b/SL/DB/MetaSetup/PurchaseInvoice.pm
index b3cb02970..c9c74f0d4 100644
--- a/SL/DB/MetaSetup/PurchaseInvoice.pm
+++ b/SL/DB/MetaSetup/PurchaseInvoice.pm
@@ -4,12 +4,12 @@ package SL::DB::PurchaseInvoice;
 
 use strict;
 
-use base qw(SL::DB::Object);
+use parent qw(SL::DB::Object);
 
 __PACKAGE__->meta->table('ap');
 
 __PACKAGE__->meta->columns(
-  amount                  => { type => 'numeric', precision => 15, scale => 5 },
+  amount                  => { type => 'numeric', default => '0', not_null => 1, precision => 15, scale => 5 },
   cp_id                   => { type => 'integer' },
   currency_id             => { type => 'integer', not_null => 1 },
   datepaid                => { type => 'date' },
@@ -28,11 +28,11 @@ __PACKAGE__->meta->columns(
   itime                   => { type => 'timestamp', default => 'now()' },
   language_id             => { type => 'integer' },
   mtime                   => { type => 'timestamp' },
-  netamount               => { type => 'numeric', precision => 15, scale => 5 },
+  netamount               => { type => 'numeric', default => '0', not_null => 1, precision => 15, scale => 5 },
   notes                   => { type => 'text' },
   orddate                 => { type => 'date' },
   ordnumber               => { type => 'text' },
-  paid                    => { type => 'numeric', precision => 15, scale => 5 },
+  paid                    => { type => 'numeric', default => '0', not_null => 1, precision => 15, scale => 5 },
   payment_id              => { type => 'integer' },
   quodate                 => { type => 'date' },
   quonumber               => { type => 'text' },