#!/usr/bin/perl -Tw
#
-# $Id: fs-setup,v 1.74 2002-02-04 17:04:33 ivan Exp $
+# $Id: fs-setup,v 1.78 2002-02-20 01:03:09 ivan Exp $
#to delay loading dbdef until we're ready
BEGIN { $FS::Record::setup_hack = 1; }
use FS::Record;
use FS::cust_main_county;
use FS::raddb;
-use FS::part_bill_invoice;
+use FS::part_bill_event;
die "Not running uid freeside!" unless checkeuid();
],
'primary_key' => 'paynum',
'unique' => [ [] ],
- 'index' => [ [] ],
+ 'index' => [ [ 'custnum' ], [ 'paybatch' ] ],
},
'cust_bill_pay' => {
],
'primary_key' => 'billpaynum',
'unique' => [ [] ],
- 'index' => [ [ 'paynum', 'invnum' ] ],
+ 'index' => [ [ 'paynum' ], [ 'invnum' ] ],
},
'cust_pay_batch' => { #what's this used for again? list of customers
'job', 'text', '', '',
'_date', 'int', '', '',
'status', 'varchar', '', $char_d,
+ 'statustext', 'text', '', '',
+ 'svcnum', 'int', '', '',
],
'primary_key' => 'jobnum',
'unique' => [],
- 'index' => [],
+ 'index' => [ [ 'svcnum' ], [ 'status' ] ],
},
'queue_arg' => {
'columns' => [
'optionnum', 'int', '', '',
'exportnum', 'int', '', '',
- 'option', 'varchar', '', $char_d,
+ 'optionname', 'varchar', '', $char_d,
'optionvalue', 'text', 'NULL', '',
],
'primary_key' => 'optionnum',
'unique' => [],
- 'index' => [ [ 'exportnum' ], [ 'option' ] ],
+ 'index' => [ [ 'exportnum' ], [ 'optionname' ] ],
},
);