$DEBUG = 0;
$me = '[FS::Schema]';
-#hardcoded now...
-##ask FS::UID to run this stuff for us later
-#FS::UID->install_callback( sub {
-# #$conf = new FS::Conf;
-# &reload_dbdef("/usr/local/etc/freeside/dbdef.". datasrc)
-# unless $setup_hack; #$setup_hack needed now?
-#} );
-
=head1 NAME
FS::Schema - Freeside database schema
unless ( exists $dbdef_cache{$file} ) {
warn "[debug]$me loading dbdef for $file\n" if $DEBUG;
$dbdef_cache{$file} = DBIx::DBSchema->load( $file )
- or die "can't load database schema from $file";
+ or die "can't load database schema from $file: $DBIx::DBSchema::errstr\n";
} else {
warn "[debug]$me re-using cached dbdef for $file\n" if $DEBUG;
}
'index' => [ [ 'paynum' ], [ 'invnum' ] ],
},
+ 'cust_bill_pay_batch' => {
+ 'columns' => [
+ 'billpaynum', 'serial', '', '', '', '',
+ 'invnum', 'int', '', '', '', '',
+ 'paybatchnum', 'int', '', '', '', '',
+ 'amount', @money_type, '', '',
+ '_date', @date_type, '', '',
+ ],
+ 'primary_key' => 'billpaynum',
+ 'unique' => [],
+ 'index' => [ [ 'paybatchnum' ], [ 'invnum' ] ],
+ },
+
'cust_bill_pay_pkg' => {
'columns' => [
'billpaypkgnum', 'serial', '', '', '', '',