projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Revert "RT# 77964 - Placed waive setup fee check back to billing.pm, and added check...
[freeside.git]
/
FS
/
FS
/
vend_bill.pm
diff --git
a/FS/FS/vend_bill.pm
b/FS/FS/vend_bill.pm
index
c8fcdd7
..
5ea91fb
100644
(file)
--- a/
FS/FS/vend_bill.pm
+++ b/
FS/FS/vend_bill.pm
@@
-1,11
+1,9
@@
package FS::vend_bill;
package FS::vend_bill;
+use base qw(FS::Record);
use strict;
use strict;
-use base qw( FS::Record );
-use FS::Record qw( dbh qsearch qsearchs );
-use FS::vend_main;
+use FS::Record qw( dbh ); # qsearch qsearchs );
use FS::vend_pay;
use FS::vend_pay;
-use FS::vend_bill_pay;
=head1 NAME
=head1 NAME
@@
-169,22
+167,8
@@
sub check {
=item vend_main
=item vend_main
-=cut
-
-sub vend_main {
- my $self = shift;
- qsearchs('vend_main', { 'vendnum', $self->vendnum });
-}
-
=item vend_bill_pay
=item vend_bill_pay
-=cut
-
-sub vend_bill_pay {
- my $self = shift;
- qsearch('vend_bill_pay', { 'vendbillnum', $self->vendbillnum });
-}
-
=item search
=cut
=item search
=cut