projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
RT# 75680 - telapi_voip cdr csv import
[freeside.git]
/
FS
/
FS
/
part_svc_router.pm
diff --git
a/FS/FS/part_svc_router.pm
b/FS/FS/part_svc_router.pm
index
0b23ab5
..
1dff9c6
100755
(executable)
--- a/
FS/FS/part_svc_router.pm
+++ b/
FS/FS/part_svc_router.pm
@@
-1,32
+1,18
@@
package FS::part_svc_router;
package FS::part_svc_router;
+use base qw(FS::Record);
use strict;
use strict;
-use vars qw( @ISA );
-use FS::Record qw(qsearchs);
-use FS::router;
-use FS::part_svc;
-
-@ISA = qw(FS::Record);
sub table { 'part_svc_router'; }
sub check {
my $self = shift;
my $error =
sub table { 'part_svc_router'; }
sub check {
my $self = shift;
my $error =
- $self->ut_foreign_key('svcpart', 'part_svc', 'svcpart')
+ $self->ut_numbern('svcrouternum')
+ || $self->ut_foreign_key('svcpart', 'part_svc', 'svcpart')
|| $self->ut_foreign_key('routernum', 'router', 'routernum');
return $error if $error;
''; #no error
}
|| $self->ut_foreign_key('routernum', 'router', 'routernum');
return $error if $error;
''; #no error
}
-sub router {
- my $self = shift;
- return qsearchs('router', { routernum => $self->routernum });
-}
-
-sub part_svc {
- my $self = shift;
- return qsearchs('part_svc', { svcpart => $self->svcpart });
-}
-
1;
1;