![[BACK]](/icons/cvsweb/back.gif){kind=icon}
Return to State.pm CVS log ![[TXT]](/icons/cvsweb/text.gif){kind=icon}
![[DIR]](/icons/cvsweb/dir.gif){kind=icon}
Up to [local] / RT / Invoicing / lib / RTI|
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) = @_; | ||