package FS::part_export_option;
+use base qw(FS::Record);
use strict;
-use vars qw( @ISA );
-use FS::Record qw( qsearch qsearchs );
-use FS::part_export;
-
-@ISA = qw(FS::Record);
+use FS::Record qw( qsearchs ); #qw( qsearch qsearchs );
=head1 NAME
my $error =
$self->ut_numbern('optionnum')
- || $self->ut_number('exportnum')
+ || $self->ut_foreign_key('exportnum', 'part_export', 'exportnum')
|| $self->ut_alpha('optionname')
- || $self->ut_textn('optionvalue')
+ || $self->ut_anything('optionvalue')
;
return $error if $error;
#check options & values?
- ''; #no error
+ $self->SUPER::check;
}
=back