X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=FS%2FFS%2Fpart_export.pm;fp=FS%2FFS%2Fpart_export.pm;h=8b1624851f8a0ec25718e9d099a9dc82675734cc;hp=28cb1419da2f50fe9e909950ae7c3fff0ca5af33;hb=32072dbf59a054529f5304574c0f56f9567d14d0;hpb=66c235e33563ccd785ff9e0828398f778a75fb9f diff --git a/FS/FS/part_export.pm b/FS/FS/part_export.pm index 28cb1419d..8b1624851 100644 --- a/FS/FS/part_export.pm +++ b/FS/FS/part_export.pm @@ -1,16 +1,15 @@ package FS::part_export; +use base qw( FS::option_Common FS::m2m_Common ); use strict; use vars qw( @ISA @EXPORT_OK $DEBUG %exports ); use Exporter; use Tie::IxHash; -use base qw( FS::option_Common FS::m2m_Common ); use FS::Record qw( qsearch qsearchs dbh ); use FS::part_svc; use FS::part_export_option; use FS::part_export_machine; use FS::svc_export_machine; -use FS::export_svc; #for export modules, though they should probably just use it themselves use FS::queue; @@ -449,24 +448,10 @@ sub part_export_machine { Returns a list of associated FS::export_svc records. -=cut - -sub export_svc { - my $self = shift; - qsearch('export_svc', { 'exportnum' => $self->exportnum } ); -} - =item export_device Returns a list of associated FS::export_device records. -=cut - -sub export_device { - my $self = shift; - qsearch('export_device', { 'exportnum' => $self->exportnum } ); -} - =item part_export_option Returns all options as FS::part_export_option objects (see