X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2Fvend_bill.pm;h=5ea91fb581d9cbe3220ed35c514977eb05bee538;hb=60c34bd328a404008313d4ab78d25152ebdb9226;hp=c8fcdd746ee447eca21242e55886c964217ae8fb;hpb=51a648bdf566a6be176b1d7f98a89a2e400481bf;p=freeside.git diff --git a/FS/FS/vend_bill.pm b/FS/FS/vend_bill.pm index c8fcdd746..5ea91fb58 100644 --- a/FS/FS/vend_bill.pm +++ b/FS/FS/vend_bill.pm @@ -1,11 +1,9 @@ package FS::vend_bill; +use base qw(FS::Record); 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_bill_pay; =head1 NAME @@ -169,22 +167,8 @@ sub check { =item vend_main -=cut - -sub vend_main { - my $self = shift; - qsearchs('vend_main', { 'vendnum', $self->vendnum }); -} - =item vend_bill_pay -=cut - -sub vend_bill_pay { - my $self = shift; - qsearch('vend_bill_pay', { 'vendbillnum', $self->vendbillnum }); -} - =item search =cut