projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
webservice infrastructure, RT#33849
[freeside.git]
/
FS
/
FS
/
ClientAPI
/
Freeside.pm
diff --git
a/FS/FS/ClientAPI/Freeside.pm
b/FS/FS/ClientAPI/Freeside.pm
index
4e25f02
..
90fa550
100644
(file)
--- a/
FS/FS/ClientAPI/Freeside.pm
+++ b/
FS/FS/ClientAPI/Freeside.pm
@@
-30,12
+30,12
@@
sub freesideinc_service {
my($username, $_password) = ($1,$2);
my $svc_external = qsearchs({
my($username, $_password) = ($1,$2);
my $svc_external = qsearchs({
- 'table' => 'svc_
external
',
+ 'table' => 'svc_
acct
',
'addl_from' => 'LEFT JOIN cust_svc USING ( svcnum )',
'hashref' => { 'username' => $username,
'_password' => $_password,
},
'addl_from' => 'LEFT JOIN cust_svc USING ( svcnum )',
'hashref' => { 'username' => $username,
'_password' => $_password,
},
- 'extra_sql' => "
AND svcpart = $svcpart",
+ 'extra_sql' => "AND svcpart = $svcpart",
})
or return { 'error' => 'bad support-key' };
})
or return { 'error' => 'bad support-key' };
@@
-43,8
+43,9
@@
sub freesideinc_service {
# but for now, everybody can use everything
#record it happened
# but for now, everybody can use everything
#record it happened
+ my $custnum = $svc_external->cust_svc->cust_pkg->custnum;
my $webservice_log = new FS::webservice_log {
my $webservice_log = new FS::webservice_log {
- 'custnum' => $
svc_external->cust_svc->cust_pkg->
custnum,
+ 'custnum' => $custnum,
'svcnum' => $svc_external->svcnum,
'method' => $packet->{'method'},
'quantity' => $packet->{'quantity'} || 1,
'svcnum' => $svc_external->svcnum,
'method' => $packet->{'method'},
'quantity' => $packet->{'quantity'} || 1,
@@
-52,8
+53,9
@@
sub freesideinc_service {
my $error = $webservice_log->insert;
return { 'error' => $error } if $error;
my $error = $webservice_log->insert;
return { 'error' => $error } if $error;
- return { 'error' => '' };
-
+ return { 'error' => '',
+ 'custnum' => $custnum,
+ };
}
1;
}
1;