cust_recon throws errors and it is not a normally used table anyway
authorivan <ivan>
Thu, 12 Aug 2010 17:36:32 +0000 (17:36 +0000)
committerivan <ivan>
Thu, 12 Aug 2010 17:36:32 +0000 (17:36 +0000)
FS/FS/cust_main.pm

index 83cb25b..6b34712 100644 (file)
@@ -1406,11 +1406,11 @@ sub delete {
 
   #cust_tax_adjustment in financials?
   #cust_pay_pending?  ouch
+  #cust_recon?
   foreach my $table (qw(
     cust_main_invoice cust_main_exemption cust_tag cust_attachment contact
     cust_location cust_main_note cust_tax_adjustment
     cust_pay_void cust_pay_batch queue cust_tax_exempt
-    cust_recon
   )) {
     foreach my $record ( qsearch( $table, { 'custnum' => $self->custnum } ) ) {
       my $error = $record->delete;