RT# 83450 - fixed rateplan export

[freeside.git] / FS / FS / part_pkg_vendor.pm

diff --git a/FS/FS/part_pkg_vendor.pm b/FS/FS/part_pkg_vendor.pm
index 6b91f75..4629bad 100644 (file)
--- a/FS/FS/part_pkg_vendor.pm
+++ b/FS/FS/part_pkg_vendor.pm
@@ -1,8 +1,7 @@
 package FS::part_pkg_vendor;
 package FS::part_pkg_vendor;

+use base qw( FS::Record );

 
 use strict;
 
 use strict;

-use base qw( FS::Record );
-use FS::Record qw( qsearch qsearchs );

 
 =head1 NAME
 
 
 =head1 NAME
 


@@ -56,7 +55,7 @@ vendor_pkg_id
 
 =item new HASHREF
 
 
 =item new HASHREF
 

-Creates a new example.  To add the example to the database, see L<"insert">.
+Creates a new record.  To add the record to the database, see L<"insert">.

 
 Note that this stores the hash reference, not a distinct copy of the hash it
 points to.  You can ask the object for a copy with the I<hash> method.
 
 Note that this stores the hash reference, not a distinct copy of the hash it
 points to.  You can ask the object for a copy with the I<hash> method.


@@ -95,7 +94,7 @@ returns the error, otherwise returns false.
 
 =item check
 
 
 =item check
 

-Checks all fields to make sure this is a valid example.  If there is
+Checks all fields to make sure this is a valid record.  If there is

 an error, returns the error, otherwise returns false.  Called by the insert
 and replace methods.
 
 an error, returns the error, otherwise returns false.  Called by the insert
 and replace methods.
 


@@ -122,12 +121,6 @@ sub check {
 
 Returns the L<FS::part_export> associated with this vendor/external package id.
 
 
 Returns the L<FS::part_export> associated with this vendor/external package id.
 

-=cut
-sub part_export {
-    my $self = shift;
-    qsearchs( 'part_export', { 'exportnum' => $self->exportnum } );
-}
-

 =back
 
 =head1 SEE ALSO
 =back
 
 =head1 SEE ALSO