#!/usr/bin/perl -Tw
#
-# $Id: fs-setup,v 1.47 2001-09-01 22:18:38 ivan Exp $
+# $Id: fs-setup,v 1.48 2001-09-02 02:46:55 ivan Exp $
#to delay loading dbdef until we're ready
BEGIN { $FS::Record::setup_hack = 1; }
'columns' => [
'paynum', 'int', '', '',
#now cust_bill_pay #'invnum', 'int', '', '',
+ 'custnum', 'int', '', '',
'paid', @money_type,
'_date', @date_type,
'payby', 'char', '', 4, # CARD/BILL/COMP, should be index into
'columns' => [
'refundnum', 'int', '', '',
#now cust_credit_refund #'crednum', 'int', '', '',
+ 'custnum', 'int', '', '',
'_date', @date_type,
'refund', @money_type,
'otaker', 'varchar', '', 8,