diff options
| author | ivan <ivan> | 2002-04-16 10:47:35 +0000 |
|---|---|---|
| committer | ivan <ivan> | 2002-04-16 10:47:35 +0000 |
| commit | 4201aaaae8a957bc98ce345d3ee0e599da354766 (patch) | |
| tree | 1f4cc956f932b9b301900928343ece96955a6b31 /FS/FS/cust_bill_event.pm | |
| parent | 17ddcceb66e4c5c45abe890403d2ca98b128d375 (diff) | |
report on failed billing events...
Diffstat (limited to 'FS/FS/cust_bill_event.pm')
| -rw-r--r-- | FS/FS/cust_bill_event.pm | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/FS/FS/cust_bill_event.pm b/FS/FS/cust_bill_event.pm index 146a30e02..d5ca55f36 100644 --- a/FS/FS/cust_bill_event.pm +++ b/FS/FS/cust_bill_event.pm @@ -132,6 +132,17 @@ sub part_bill_event { qsearchs( 'part_bill_event', { 'eventpart' => $self->eventpart } ); } +=item cust_bill + +Returns the invoice (see L<FS::cust_bill>) for this completed invoice event. + +=cut + +sub cust_bill { + my $self = shift; + qsearchs( 'cust_bill', { 'invnum' => $self->invnum } ); +} + =back =head1 BUGS |