diff options
author | Ivan Kohler <ivan@freeside.biz> | 2016-04-05 17:54:03 -0700 |
---|---|---|
committer | Ivan Kohler <ivan@freeside.biz> | 2016-04-05 17:54:03 -0700 |
commit | 2c9afab170b692b81afa1339145224530051c0b6 (patch) | |
tree | 8e8762a124be46dd2f7b9cd56fda37d58e4d746f /FS | |
parent | 103e953c1c6f71a7360327e8dde4442e02ae4084 (diff) |
add date to cancel_pkg self-service API, RT#41645
Diffstat (limited to 'FS')
-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 62bd9e84c..d6fa8652c 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 { |