projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
add artera turbo handling to self-service and reseller interfaces
[freeside.git]
/
FS
/
FS
/
part_export
/
artera_turbo.pm
diff --git
a/FS/FS/part_export/artera_turbo.pm
b/FS/FS/part_export/artera_turbo.pm
index
52ab232
..
1e22961
100644
(file)
--- a/
FS/FS/part_export/artera_turbo.pm
+++ b/
FS/FS/part_export/artera_turbo.pm
@@
-61,7
+61,6
@@
sub _export_insert {
eval "use Net::Artera;";
return $@ if $@;
eval "use Net::Artera;";
return $@ if $@;
-
my $artera = $self->_new_Artera;
my $cust_pkg = $svc_external->cust_svc->cust_pkg;
my $artera = $self->_new_Artera;
my $cust_pkg = $svc_external->cust_svc->cust_pkg;
@@
-113,25
+112,27
@@
sub _export_replace {
sub _export_delete {
my( $self, $svc_external ) = (shift, shift);
sub _export_delete {
my( $self, $svc_external ) = (shift, shift);
- $self->
S
tatusChange(17, $svc_external);
+ $self->
s
tatusChange(17, $svc_external);
}
sub _export_suspend {
my( $self, $svc_external ) = (shift, shift);
}
sub _export_suspend {
my( $self, $svc_external ) = (shift, shift);
- $self->
S
tatusChange(16, $svc_external);
+ $self->
s
tatusChange(16, $svc_external);
}
sub _export_unsuspend {
my( $self, $svc_external ) = (shift, shift);
}
sub _export_unsuspend {
my( $self, $svc_external ) = (shift, shift);
- $self->
S
tatusChange(15, $svc_external);
+ $self->
s
tatusChange(15, $svc_external);
}
}
-sub
S
tatusChange {
+sub
s
tatusChange {
my( $self, $status, $svc_external ) = @_;
my( $self, $status, $svc_external ) = @_;
+ eval "use Net::Artera;";
+ return $@ if $@;
my $artera = $self->_new_Artera;
my $artera = $self->_new_Artera;
- my $result = $artera->
S
tatusChange(
+ my $result = $artera->
s
tatusChange(
'asn' => sprintf('%010d', $svc_external->id),
'akc' => $svc_external->title,
'statusid' => $status,
'asn' => sprintf('%010d', $svc_external->id),
'akc' => $svc_external->title,
'statusid' => $status,