projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
fix upgrade issues with old voided tax records, #73360
[freeside.git]
/
FS
/
FS
/
svc_port.pm
diff --git
a/FS/FS/svc_port.pm
b/FS/FS/svc_port.pm
index
9d2dae8
..
e72ac49
100644
(file)
--- a/
FS/FS/svc_port.pm
+++ b/
FS/FS/svc_port.pm
@@
-107,52
+107,15
@@
otherwise returns false.
The additional fields pkgnum and svcpart (see L<FS::cust_svc>) should be
defined. An FS::cust_svc record will be created and inserted.
The additional fields pkgnum and svcpart (see L<FS::cust_svc>) should be
defined. An FS::cust_svc record will be created and inserted.
-=cut
-
-sub insert {
- my $self = shift;
- my $error;
-
- $error = $self->SUPER::insert;
- return $error if $error;
-
- '';
-}
-
=item delete
Delete this record from the database.
=item delete
Delete this record from the database.
-=cut
-
-sub delete {
- my $self = shift;
- my $error;
-
- $error = $self->SUPER::delete;
- return $error if $error;
-
- '';
-}
-
-
=item replace OLD_RECORD
Replaces the OLD_RECORD with this one in the database. If there is an error,
returns the error, otherwise returns false.
=item replace OLD_RECORD
Replaces the OLD_RECORD with this one in the database. If there is an error,
returns the error, otherwise returns false.
-=cut
-
-sub replace {
- my ( $new, $old ) = ( shift, shift );
- my $error;
-
- $error = $new->SUPER::replace($old);
- return $error if $error;
-
- '';
-}
-
=item suspend
Called by the suspend method of FS::cust_pkg (see L<FS::cust_pkg>).
=item suspend
Called by the suspend method of FS::cust_pkg (see L<FS::cust_pkg>).