Hide the payment/writeoff dropdown on lines that are credits (or forgiven).

Signed-off-by: Joshua Ferraro <jmf@liblime.com>

diff --git a/members/pay.pl b/members/pay.pl
index c968797..a650472 100755 (executable)
--- a/members/pay.pl
+++ b/members/pay.pl
@@ -115,7 +115,7 @@ if ( $check == 0 ) {
                 $line{title}          = $accts->[$i]{'title'};
                 $line{notify_id}      = $accts->[$i]{'notify_id'};
                 $line{notify_level}   = $accts->[$i]{'notify_level'};
-                $line{net_balance} = 1;
+                $line{net_balance} = 1 if($accts->[$i]{'amountoutstanding'} > 0); # you can't pay a credit.
                 push( @loop_pay, \%line );
             }
         }