Merge branch 'master' of git.freeside.biz:/home/git/freeside
[freeside.git] / FS / FS / part_svc_router.pm
1 package FS::part_svc_router;
2 use base qw(FS::Record);
3
4 use strict;
5
6 sub table { 'part_svc_router'; }
7
8 sub check {
9   my $self = shift;
10   my $error =
11        $self->ut_numbern('svcrouternum')
12     || $self->ut_foreign_key('svcpart', 'part_svc', 'svcpart')
13     || $self->ut_foreign_key('routernum', 'router', 'routernum');
14   return $error if $error;
15   ''; #no error
16 }
17
18 1;