sub cust_credit {
my $self = shift;
my $total = 0;
- my @cust_credit = sort { $a->_date <=> $b->date }
+ my @cust_credit = sort { $a->_date <=> $b->_date }
grep { $_->credited != 0 && $_->_date < $self->_date }
qsearch('cust_credit', { 'custnum' => $self->custnum } )
;
sub cust_pay {
my $self = shift;
- sort { $a->_date <=> $b->date }
+ sort { $a->_date <=> $b->_date }
qsearch( 'cust_pay', { 'invnum' => $self->invnum } )
;
}
$FS::cust_bill::_template::overdue = (
$balance_due > 0
&& $today > $self->_date
- && $self->printed > 1
+# && $self->printed > 1
+ && $self->printed > 0
);
#and subroutine for the template
=head1 VERSION
-$Id: cust_bill.pm,v 1.2 2000-08-09 11:30:41 ivan Exp $
+$Id: cust_bill.pm,v 1.4 2000-12-03 15:14:00 ivan Exp $
=head1 BUGS