fixes: bug#331
[freeside.git] / bin / fs-setup
index 5f80594..7c716d3 100755 (executable)
@@ -1,6 +1,6 @@
 #!/usr/bin/perl -Tw
 #
-# $Id: fs-setup,v 1.76 2002-02-10 18:56:49 ivan Exp $
+# $Id: fs-setup,v 1.77 2002-02-12 05:58:42 ivan Exp $
 
 #to delay loading dbdef until we're ready
 BEGIN { $FS::Record::setup_hack = 1; }
@@ -487,7 +487,7 @@ sub tables_hash_hack {
       ],
       'primary_key' => 'paynum',
       'unique' => [ [] ],
-      'index' => [ [] ],
+      'index' => [ [ 'custnum' ], [ 'paybatch' ] ],
     },
 
     'cust_bill_pay' => {
@@ -500,7 +500,7 @@ sub tables_hash_hack {
       ],
       'primary_key' => 'billpaynum',
       'unique' => [ [] ],
-      'index' => [ [ 'paynum' ], [ 'custnum' ], [ 'paybatch' ] ],
+      'index' => [ [ 'paynum' ], [ 'invnum' ] ],
     },
 
     'cust_pay_batch' => { #what's this used for again?  list of customers