diff options
author | Ivan Kohler <ivan@freeside.biz> | 2016-04-05 17:54:04 -0700 |
---|---|---|
committer | Ivan Kohler <ivan@freeside.biz> | 2016-04-05 17:54:04 -0700 |
commit | 22bee21888d7d5699f6ffad229fa9534757e9177 (patch) | |
tree | 4a0d7cd6c0f6b0eba485c1af9b5c036b0d5a173c /FS/FS/ClientAPI/MyAccount.pm | |
parent | d7aae4b6c0d5fee85d9c23f395903a048d2154fa (diff) |
add date to cancel_pkg self-service API, RT#41645
Diffstat (limited to 'FS/FS/ClientAPI/MyAccount.pm')
-rw-r--r-- | FS/FS/ClientAPI/MyAccount.pm | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/FS/FS/ClientAPI/MyAccount.pm b/FS/FS/ClientAPI/MyAccount.pm index 62bd9e8..d6fa865 100644 --- a/FS/FS/ClientAPI/MyAccount.pm +++ b/FS/FS/ClientAPI/MyAccount.pm @@ -2671,19 +2671,18 @@ sub cancel_pkg { or return { 'error' => "Can't resume session" }; #better error message my $custnum = $session->{'custnum'}; - my $cust_main = qsearchs('cust_main', { 'custnum' => $custnum } ) or return { 'error' => "unknown custnum $custnum" }; my $pkgnum = $p->{'pkgnum'}; - my $cust_pkg = qsearchs('cust_pkg', { 'custnum' => $custnum, 'pkgnum' => $pkgnum, } ) or return { 'error' => "unknown pkgnum $pkgnum" }; - my $error = $cust_pkg->cancel('quiet' => 1); + my $error = $cust_pkg->cancel( 'quiet' => 1, + 'date' => $p->{'date'}, + ); return { 'error' => $error }; - } sub provision_phone { |