Fix button breakage on viewContribution
[civicrm-core.git] / CRM / Contribute / Form / CancelSubscription.php
CommitLineData
6a488035
TO
1<?php
2/*
3 +--------------------------------------------------------------------+
bc77d7c0 4 | Copyright CiviCRM LLC. All rights reserved. |
6a488035 5 | |
bc77d7c0
TO
6 | This work is published under the GNU AGPLv3 license with some |
7 | permitted exceptions and without any warranty. For full license |
8 | and copyright information, see https://civicrm.org/licensing |
6a488035 9 +--------------------------------------------------------------------+
d25dd0ee 10 */
6a488035 11
d6ae85ac 12use Civi\Payment\PropertyBag;
32509f69 13use Civi\Payment\Exception\PaymentProcessorException;
6a488035
TO
14
15/**
95cdcc0f 16 * This class provides support for canceling recurring subscriptions.
6a488035 17 */
ca809bb6 18class CRM_Contribute_Form_CancelSubscription extends CRM_Contribute_Form_ContributionRecur {
6a488035 19
32509f69 20 protected $_userContext;
6a488035 21
32509f69 22 protected $_mode;
6a488035 23
d6ae85ac
MW
24 /**
25 * The contributor email
26 *
27 * @var string
28 */
29 protected $_donorEmail = '';
30
f1105edc 31 /**
32 * Should custom data be suppressed on this form.
33 *
34 * We override to suppress custom data because historically it has not been
35 * shown on this form & we don't want to expose it as a by-product of
36 * other change without establishing that it would be good on this form.
37 *
38 * @return bool
39 */
40 protected function isSuppressCustomData() {
41 return TRUE;
42 }
43
6a488035 44 /**
fe482240 45 * Set variables up before form is built.
503699d5 46 *
47 * @throws \CRM_Core_Exception
6a488035
TO
48 */
49 public function preProcess() {
1f17c8ef 50 parent::preProcess();
d947cfb5 51
dd793ad1
MW
52 $cancelRecurTextParams = [
53 'mode' => $this->_mode,
54 'amount' => $this->getSubscriptionDetails()->amount,
55 'currency' => $this->getSubscriptionDetails()->currency,
56 'frequency_interval' => $this->getSubscriptionDetails()->frequency_interval,
57 'frequency_unit' => $this->getSubscriptionDetails()->frequency_unit,
58 'installments' => $this->getSubscriptionDetails()->installments,
51c822c6 59 'selfService' => $this->isSelfService(),
dd793ad1
MW
60 ];
61
62 if ($this->_crid) {
6a488035 63 // Are we cancelling a recurring contribution that is linked to an auto-renew membership?
59545b08
MW
64 if ($this->getSubscriptionDetails()->membership_id) {
65 $this->_mid = $this->getSubscriptionDetails()->membership_id;
6a488035
TO
66 }
67 }
68
69 if ($this->_mid) {
6a488035 70 $this->_mode = 'auto_renew';
16381e37
J
71 // CRM-18468: crid is more accurate than mid for getting
72 // subscriptionDetails, so don't get them again.
6a488035
TO
73
74 $membershipTypes = CRM_Member_PseudoConstant::membershipType();
75 $membershipTypeId = CRM_Core_DAO::getFieldValue('CRM_Member_DAO_Membership', $this->_mid, 'membership_type_id');
dd793ad1
MW
76 $membershipType = $membershipTypes[$membershipTypeId] ?? '';
77 $this->assign('membershipType', $membershipType);
78 $cancelRecurTextParams['membershipType'] = $membershipType;
6a488035
TO
79 }
80
6a488035
TO
81 if ($this->_coid) {
82 if (CRM_Contribute_BAO_Contribution::isSubscriptionCancelled($this->_coid)) {
6a4a50a1 83 CRM_Core_Error::statusBounce(ts('The recurring contribution looks to have been cancelled already.'));
6a488035
TO
84 }
85 $this->_paymentProcessorObj = CRM_Financial_BAO_PaymentProcessor::getProcessorForEntity($this->_coid, 'contribute', 'obj');
6a488035
TO
86 }
87
d947cfb5
DL
88 if (
89 (!$this->_crid && !$this->_coid && !$this->_mid) ||
59545b08 90 (!$this->getSubscriptionDetails())
6a488035 91 ) {
507bc932 92 CRM_Core_Error::statusBounce(ts('Required information missing.'));
6a488035
TO
93 }
94
dd793ad1
MW
95 $this->assign('cancelRecurDetailText', $this->_paymentProcessorObj->getText('cancelRecurDetailText', $cancelRecurTextParams));
96
6a488035
TO
97 // handle context redirection
98 CRM_Contribute_BAO_ContributionRecur::setSubscriptionContext();
99
7e2e2551 100 $this->setTitle($this->_mid ? ts('Cancel Auto-renewal') : ts('Cancel Recurring Contribution'));
6a488035
TO
101 $this->assign('mode', $this->_mode);
102
f1105edc 103 if ($this->isSelfService()) {
104 unset($this->entityFields['send_cancel_request'], $this->entityFields['is_notify']);
105 }
106
59545b08 107 if ($this->getSubscriptionDetails()->contact_id) {
7c550ca0 108 list($this->_donorDisplayName, $this->_donorEmail)
59545b08 109 = CRM_Contact_BAO_Contact::getContactDetails($this->getSubscriptionDetails()->contact_id);
6a488035
TO
110 }
111 }
112
f1105edc 113 /**
114 * Set entity fields for this cancellation.
115 */
116 public function setEntityFields() {
117 $this->entityFields = [
118 'cancel_reason' => ['name' => 'cancel_reason'],
119 ];
120 $this->entityFields['send_cancel_request'] = [
703235f6 121 'title' => ts('Send cancellation request?'),
f1105edc 122 'name' => 'send_cancel_request',
123 'not-auto-addable' => TRUE,
124 ];
125 $this->entityFields['is_notify'] = [
126 'title' => ts('Notify Contributor?'),
127 'name' => 'is_notify',
128 'not-auto-addable' => TRUE,
129 ];
130 }
131
6a488035 132 /**
fe482240 133 * Build the form object.
6a488035
TO
134 */
135 public function buildQuickForm() {
f1105edc 136 $this->buildQuickEntityForm();
6a488035 137 // Determine if we can cancel recurring contribution via API with this processor
5077b04c 138 if ($this->_paymentProcessorObj->supports('CancelRecurringNotifyOptional')) {
39405208 139 $this->addRadio('send_cancel_request', ts('Send cancellation request to %1 ?', [1 => $this->_paymentProcessorObj->getTitle()]), [ts('No'), ts('Yes')]);
6a488035 140 }
dd793ad1
MW
141 else {
142 $this->assign('cancelRecurNotSupportedText', $this->_paymentProcessorObj->getText('cancelRecurNotSupportedText', []));
143 }
d947cfb5 144
d6ae85ac
MW
145 if (!empty($this->_donorEmail)) {
146 $this->add('checkbox', 'is_notify', ts('Notify Contributor?') . " ({$this->_donorEmail})");
6a488035
TO
147 }
148 if ($this->_mid) {
149 $cancelButton = ts('Cancel Automatic Membership Renewal');
150 }
151 else {
152 $cancelButton = ts('Cancel Recurring Contribution');
153 }
154
155 $type = 'next';
f1105edc 156 if ($this->isSelfService()) {
6a488035
TO
157 $type = 'submit';
158 }
159
be2fb01f 160 $this->addButtons([
1330f57a
SL
161 [
162 'type' => $type,
163 'name' => $cancelButton,
164 'spacing' => '&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;',
165 'isDefault' => TRUE,
166 ],
167 [
168 'type' => 'cancel',
169 'name' => ts('Not Now'),
170 ],
171 ]);
6a488035
TO
172 }
173
174 /**
1c4a09f4 175 * Set default values for the form.
6a488035 176 *
a6c01b45
CW
177 * @return array
178 * array of default values
6a488035 179 */
00be9182 180 public function setDefaultValues() {
be2fb01f 181 return [
1c4a09f4 182 'send_cancel_request' => 1,
be2fb01f 183 ];
6a488035
TO
184 }
185
186 /**
fe482240 187 * Process the form submission.
5077b04c 188 *
189 * @throws \CRM_Core_Exception
32509f69 190 * @throws \API_Exception
6a488035
TO
191 */
192 public function postProcess() {
11ec1f96 193 $message = NULL;
353ffa53 194 $params = $this->controller->exportValues($this->_name);
6a488035 195
f1105edc 196 if ($this->isSelfService()) {
6a488035 197 // for self service force sending-request & notify
1524a007 198 if ($this->_paymentProcessorObj->supports('cancelRecurring')) {
6a488035 199 $params['send_cancel_request'] = 1;
d947cfb5
DL
200 }
201
d6ae85ac 202 if (!empty($this->_donorEmail)) {
6a488035 203 $params['is_notify'] = 1;
d947cfb5 204 }
6a488035
TO
205 }
206
5077b04c 207 try {
208 $propertyBag = new PropertyBag();
363b20fa
MW
209 if (isset($params['send_cancel_request'])) {
210 $propertyBag->setIsNotifyProcessorOnCancelRecur(!empty($params['send_cancel_request']));
211 }
5077b04c 212 $propertyBag->setContributionRecurID($this->getSubscriptionDetails()->recur_id);
d0f696ac 213 $propertyBag->setRecurProcessorID($this->getSubscriptionDetails()->processor_id);
5077b04c 214 $message = $this->_paymentProcessorObj->doCancelRecurring($propertyBag)['message'];
215 }
32509f69 216 catch (PaymentProcessorException $e) {
5077b04c 217 CRM_Core_Error::statusBounce($e->getMessage());
6a488035
TO
218 }
219
32509f69 220 try {
221 civicrm_api3('ContributionRecur', 'cancel', [
222 'id' => $this->getSubscriptionDetails()->recur_id,
223 'membership_id' => $this->_mid,
224 'processor_message' => $message,
e73cf7de 225 'cancel_reason' => $this->getSubmittedValue('cancel_reason'),
32509f69 226 ]);
227
228 $tplParams = [];
229 if ($this->_mid) {
230 $inputParams = ['id' => $this->_mid];
231 CRM_Member_BAO_Membership::getValues($inputParams, $tplParams);
232 $tplParams = $tplParams[$this->_mid];
233 $tplParams['membership_status']
234 = CRM_Core_DAO::getFieldValue('CRM_Member_DAO_MembershipStatus', $tplParams['status_id']);
235 $tplParams['membershipType']
236 = CRM_Core_DAO::getFieldValue('CRM_Member_DAO_MembershipType', $tplParams['membership_type_id']);
237 $status = ts('The automatic renewal of your %1 membership has been cancelled as requested. This does not affect the status of your membership - you will receive a separate notification when your membership is up for renewal.', [1 => $tplParams['membershipType']]);
238 $msgTitle = 'Membership Renewal Cancelled';
239 $msgType = 'info';
6a488035 240 }
32509f69 241 else {
32509f69 242 $status = ts('The recurring contribution of %1, every %2 %3 has been cancelled.',
243 [
e589a77b
EM
244 1 => CRM_Utils_Money::format($this->getSubscriptionDetails()->amount, $this->getSubscriptionDetails()->currency),
245 2 => $this->getSubscriptionDetails()->frequency_interval,
246 3 => $this->getSubscriptionDetails()->frequency_unit,
32509f69 247 ]
248 );
249 $msgTitle = 'Contribution Cancelled';
250 $msgType = 'success';
251 }
252
253 if (CRM_Utils_Array::value('is_notify', $params) == 1) {
32509f69 254 // send notification
255 $sendTemplateParams
256 = [
257 'groupName' => $this->_mode == 'auto_renew' ? 'msg_tpl_workflow_membership' : 'msg_tpl_workflow_contribution',
258 'valueName' => $this->_mode == 'auto_renew' ? 'membership_autorenew_cancelled' : 'contribution_recurring_cancelled',
259 'contactId' => $this->getSubscriptionDetails()->contact_id,
260 'tplParams' => $tplParams,
e589a77b 261 'tokenContext' => ['contribution_recurId' => $this->getContributionRecurID()],
32509f69 262 //'isTest' => $isTest, set this from _objects
263 'PDFFilename' => 'receipt.pdf',
e73cf7de 264 'from' => CRM_Contribute_BAO_ContributionRecur::getRecurFromAddress($this->getContributionRecurID()),
32509f69 265 'toName' => $this->_donorDisplayName,
266 'toEmail' => $this->_donorEmail,
267 ];
268 list($sent) = CRM_Core_BAO_MessageTemplate::sendTemplate($sendTemplateParams);
6a488035
TO
269 }
270 }
32509f69 271 catch (CiviCRM_API3_Exception $e) {
6a488035 272 $msgType = 'error';
32509f69 273 $msgTitle = ts('Error');
274 if ($params['send_cancel_request'] == 1) {
275 $status = ts('Recurring contribution was cancelled successfully by the processor, but could not be marked as cancelled in the database.');
276 }
277 else {
278 $status = ts('Recurring contribution could not be cancelled in the database.');
279 }
6a488035
TO
280 }
281
32509f69 282 $userID = CRM_Core_Session::getLoggedInContactID();
481a74f4 283 if ($userID && $status) {
32509f69 284 CRM_Core_Session::singleton()->setStatus($status, $msgTitle, $msgType);
6a488035
TO
285 }
286 elseif (!$userID) {
7c550ca0 287 if ($status) {
6a488035 288 CRM_Utils_System::setUFMessage($status);
7c550ca0 289 // keep result as 1, since we not displaying anything on the redirected page anyway
32509f69 290 CRM_Utils_System::redirect(CRM_Utils_System::url('civicrm/contribute/subscriptionstatus',
291 'reset=1&task=cancel&result=1'));
7c550ca0 292 }
6a488035
TO
293 }
294 }
96025800 295
6a488035 296}