X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2FSchema.pm;h=a205f77174de14b8a121fddc5a2334ac88c74990;hb=3d1be41d848ad42d33eeffde23394b7ca76a693e;hp=866aa259ad50b394ea8ec275092874ea642345d2;hpb=a816e075c54631250faed653d4ec7b69f727e93a;p=freeside.git

diff --git a/FS/FS/Schema.pm b/FS/FS/Schema.pm
index 866aa259a..a205f7717 100644
--- a/FS/FS/Schema.pm
+++ b/FS/FS/Schema.pm
@@ -117,6 +117,7 @@ sub dbdef_dist {
     #false laziness w/sub indices in DBIx::DBSchema::DBD (well, sorta)
     #and sub sql_create_table in DBIx::DBSchema::Table (slighty more?)
     my $unique = $tables_hashref->{$tablename}{'unique'};
+    warn "missing index for $tablename\n" unless defined $tables_hashref->{$tablename}{'index'};
     my @index  = @{ $tables_hashref->{$tablename}{'index'} };
 
     # kludge to avoid avoid "BLOB/TEXT column 'statustext' used in key
@@ -2491,7 +2492,7 @@ sub tables_hashref {
       ],
       'primary_key' => 'bannum',
       'unique'      => [],
-      'index '      => [ [ 'payby', 'payinfo' ], [ 'usernum' ], ],
+      'index'       => [ [ 'payby', 'payinfo' ], [ 'usernum' ], ],
     },
 
     'pkg_category' => {
@@ -2576,7 +2577,7 @@ sub tables_hashref {
         'charged_party',       'varchar', 'NULL', $char_d, '', '',
 
         'upstream_currency',      'char', 'NULL',       3, '', '',
-        'upstream_price',      'decimal', 'NULL',  '10,4', '', '', 
+        'upstream_price',      'decimal', 'NULL',  '10,2', '', '', 
         'upstream_rateplanid',     'int', 'NULL',      '', '', '', #?
 
         # how it was rated internally...
@@ -3154,15 +3155,6 @@ sub tables_hashref {
       'index'  => [], #recnum
     },
 
-    'svc_port' => {
-      'columns' => [
-        'svcnum',                'int',     '',      '', '', '', 
-      ],
-      'primary_key' => 'svcnum',
-      'unique' => [],
-      'index'  => [], #recnum
-    },
-
     'areacode'  => {
       'columns' => [
       'areanum',   'serial',        '',      '', '', '',