diff options
author | ivan <ivan> | 2002-11-19 22:55:06 +0000 |
---|---|---|
committer | ivan <ivan> | 2002-11-19 22:55:06 +0000 |
commit | 26da8f3994e58ca5cf80ac62f034b3ad64539e47 (patch) | |
tree | a458f16b53f74a616ab5c57466302589b3b133ba /FS | |
parent | 34928158d52fb8456aa665c4bacd1f915b9cae0d (diff) |
give better error message on bad invnum, also 'use FS::cust_bill' here
Diffstat (limited to 'FS')
-rw-r--r-- | FS/FS/cust_bill_event.pm | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/FS/FS/cust_bill_event.pm b/FS/FS/cust_bill_event.pm index f631987aa..44e4d4797 100644 --- a/FS/FS/cust_bill_event.pm +++ b/FS/FS/cust_bill_event.pm @@ -3,6 +3,7 @@ package FS::cust_bill_event; use strict; use vars qw( @ISA ); use FS::Record qw( qsearch qsearchs ); +use FS::cust_bill; use FS::part_bill_event; @ISA = qw(FS::Record); @@ -111,10 +112,10 @@ sub check { || $self->ut_textn('statustext') ; - return "Unknown invnum" + return "Unknown invnum ". $self->invnum unless qsearchs( 'cust_bill' ,{ 'invnum' => $self->invnum } ); - return "Unknown eventpart" + return "Unknown eventpart ". $self->eventpart unless qsearchs( 'part_bill_event' ,{ 'eventpart' => $self->eventpart } ); ''; #no error |