Return to State.pm CVS log | Up to [local] / RT / Invoicing / lib / RTI |
version 1.6, 2012/08/18 21:21:54 | version 1.7, 2012/11/28 02:24:04 | ||
---|---|---|---|
|
|
||
: $self->{_table}->{unpaid}; | : $self->{_table}->{unpaid}; | ||
} | } | ||
sub credits { | |||
my ( $self, $custid ) = @_; | |||
$self->_match_payments; | |||
return defined $custid | |||
? $self->{_table}->{credit}->{$custid} | |||
: $self->{_table}->{credit}; | |||
} | |||
sub save { | sub save { | ||
my ($self) = @_; | my ($self) = @_; | ||