projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
don't generate invoices for COMP customers
[freeside.git]
/
FS
/
FS
/
cust_main.pm
diff --git
a/FS/FS/cust_main.pm
b/FS/FS/cust_main.pm
index
50cee48
..
d8dbd52
100644
(file)
--- a/
FS/FS/cust_main.pm
+++ b/
FS/FS/cust_main.pm
@@
-1117,6
+1117,7
@@
If there is an error, returns the error, otherwise returns false.
sub bill {
my( $self, %options ) = @_;
sub bill {
my( $self, %options ) = @_;
+ return '' if $self->payby eq 'COMP';
warn "bill customer ". $self->custnum if $DEBUG;
my $time = $options{'time'} || time;
warn "bill customer ". $self->custnum if $DEBUG;
my $time = $options{'time'} || time;