Commit | Line | Data |
---|---|---|
6a488035 TO |
1 | <?php |
2 | /* | |
3 | +--------------------------------------------------------------------+ | |
7e9e8871 | 4 | | CiviCRM version 4.7 | |
6a488035 | 5 | +--------------------------------------------------------------------+ |
e7112fa7 | 6 | | Copyright CiviCRM LLC (c) 2004-2015 | |
6a488035 TO |
7 | +--------------------------------------------------------------------+ |
8 | | This file is a part of CiviCRM. | | |
9 | | | | |
10 | | CiviCRM is free software; you can copy, modify, and distribute it | | |
11 | | under the terms of the GNU Affero General Public License | | |
12 | | Version 3, 19 November 2007 and the CiviCRM Licensing Exception. | | |
13 | | | | |
14 | | CiviCRM is distributed in the hope that it will be useful, but | | |
15 | | WITHOUT ANY WARRANTY; without even the implied warranty of | | |
16 | | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. | | |
17 | | See the GNU Affero General Public License for more details. | | |
18 | | | | |
19 | | You should have received a copy of the GNU Affero General Public | | |
20 | | License and the CiviCRM Licensing Exception along | | |
21 | | with this program; if not, contact CiviCRM LLC | | |
22 | | at info[AT]civicrm[DOT]org. If you have questions about the | | |
23 | | GNU Affero General Public License or the licensing of CiviCRM, | | |
24 | | see the CiviCRM license FAQ at http://civicrm.org/licensing | | |
25 | +--------------------------------------------------------------------+ | |
d25dd0ee | 26 | */ |
6a488035 TO |
27 | |
28 | /** | |
29 | * | |
30 | * @package CRM | |
e7112fa7 | 31 | * @copyright CiviCRM LLC (c) 2004-2015 |
6a488035 TO |
32 | */ |
33 | class CRM_Contribute_BAO_ContributionRecur extends CRM_Contribute_DAO_ContributionRecur { | |
34 | ||
35 | /** | |
fe482240 | 36 | * Create recurring contribution. |
6a488035 | 37 | * |
014c4014 TO |
38 | * @param array $params |
39 | * (reference ) an assoc array of name/value pairs. | |
6a488035 | 40 | * |
a6c01b45 CW |
41 | * @return object |
42 | * activity contact object | |
6a488035 | 43 | */ |
00be9182 | 44 | public static function create(&$params) { |
6a488035 TO |
45 | return self::add($params); |
46 | } | |
47 | ||
48 | /** | |
fe482240 | 49 | * Takes an associative array and creates a contribution object. |
6a488035 TO |
50 | * |
51 | * the function extract all the params it needs to initialize the create a | |
52 | * contribution object. the params array could contain additional unused name/value | |
53 | * pairs | |
54 | * | |
014c4014 TO |
55 | * @param array $params |
56 | * (reference ) an assoc array of name/value pairs. | |
fd31fa4c | 57 | * |
16b10e64 | 58 | * @return CRM_Contribute_BAO_Contribution |
6a488035 TO |
59 | * @todo move hook calls / extended logic to create - requires changing calls to call create not add |
60 | */ | |
00be9182 | 61 | public static function add(&$params) { |
a7488080 | 62 | if (!empty($params['id'])) { |
6a488035 TO |
63 | CRM_Utils_Hook::pre('edit', 'ContributionRecur', $params['id'], $params); |
64 | } | |
65 | else { | |
66 | CRM_Utils_Hook::pre('create', 'ContributionRecur', NULL, $params); | |
67 | } | |
68 | ||
69 | // make sure we're not creating a new recurring contribution with the same transaction ID | |
70 | // or invoice ID as an existing recurring contribution | |
71 | $duplicates = array(); | |
72 | if (self::checkDuplicate($params, $duplicates)) { | |
73 | $error = CRM_Core_Error::singleton(); | |
74 | $d = implode(', ', $duplicates); | |
75 | $error->push(CRM_Core_Error::DUPLICATE_CONTRIBUTION, | |
76 | 'Fatal', | |
77 | array($d), | |
78 | "Found matching recurring contribution(s): $d" | |
79 | ); | |
80 | return $error; | |
81 | } | |
82 | ||
83 | $recurring = new CRM_Contribute_BAO_ContributionRecur(); | |
84 | $recurring->copyValues($params); | |
85 | $recurring->id = CRM_Utils_Array::value('id', $params); | |
86 | ||
87 | // set currency for CRM-1496 | |
88 | if (!isset($recurring->currency)) { | |
89 | $config = CRM_Core_Config::singleton(); | |
90 | $recurring->currency = $config->defaultCurrency; | |
91 | } | |
92 | $result = $recurring->save(); | |
93 | ||
a7488080 | 94 | if (!empty($params['id'])) { |
6a488035 TO |
95 | CRM_Utils_Hook::post('edit', 'ContributionRecur', $recurring->id, $recurring); |
96 | } | |
97 | else { | |
98 | CRM_Utils_Hook::post('create', 'ContributionRecur', $recurring->id, $recurring); | |
99 | } | |
100 | ||
95974e8e DG |
101 | if (!empty($params['custom']) && |
102 | is_array($params['custom']) | |
103 | ) { | |
104 | CRM_Core_BAO_CustomValueTable::store($params['custom'], 'civicrm_contribution_recur', $recurring->id); | |
105 | } | |
106 | ||
6a488035 TO |
107 | return $result; |
108 | } | |
109 | ||
110 | /** | |
fe482240 | 111 | * Check if there is a recurring contribution with the same trxn_id or invoice_id. |
6a488035 | 112 | * |
014c4014 TO |
113 | * @param array $params |
114 | * (reference ) an assoc array of name/value pairs. | |
115 | * @param array $duplicates | |
116 | * (reference ) store ids of duplicate contribs. | |
6a488035 | 117 | * |
e7483cbe | 118 | * @return bool |
a6c01b45 | 119 | * true if duplicate, false otherwise |
6a488035 | 120 | */ |
00be9182 | 121 | public static function checkDuplicate($params, &$duplicates) { |
353ffa53 TO |
122 | $id = CRM_Utils_Array::value('id', $params); |
123 | $trxn_id = CRM_Utils_Array::value('trxn_id', $params); | |
6a488035 TO |
124 | $invoice_id = CRM_Utils_Array::value('invoice_id', $params); |
125 | ||
126 | $clause = array(); | |
127 | $params = array(); | |
128 | ||
129 | if ($trxn_id) { | |
130 | $clause[] = "trxn_id = %1"; | |
131 | $params[1] = array($trxn_id, 'String'); | |
132 | } | |
133 | ||
134 | if ($invoice_id) { | |
135 | $clause[] = "invoice_id = %2"; | |
136 | $params[2] = array($invoice_id, 'String'); | |
137 | } | |
138 | ||
139 | if (empty($clause)) { | |
140 | return FALSE; | |
141 | } | |
142 | ||
143 | $clause = implode(' OR ', $clause); | |
144 | if ($id) { | |
145 | $clause = "( $clause ) AND id != %3"; | |
146 | $params[3] = array($id, 'Integer'); | |
147 | } | |
148 | ||
353ffa53 TO |
149 | $query = "SELECT id FROM civicrm_contribution_recur WHERE $clause"; |
150 | $dao = CRM_Core_DAO::executeQuery($query, $params); | |
6a488035 TO |
151 | $result = FALSE; |
152 | while ($dao->fetch()) { | |
153 | $duplicates[] = $dao->id; | |
154 | $result = TRUE; | |
155 | } | |
156 | return $result; | |
157 | } | |
158 | ||
186c9c17 | 159 | /** |
100fef9d | 160 | * @param int $id |
186c9c17 EM |
161 | * @param $mode |
162 | * | |
163 | * @return array|null | |
164 | */ | |
00be9182 | 165 | public static function getPaymentProcessor($id, $mode) { |
6a488035 TO |
166 | //FIX ME: |
167 | $sql = " | |
168 | SELECT r.payment_processor_id | |
169 | FROM civicrm_contribution_recur r | |
170 | WHERE r.id = %1"; | |
171 | $params = array(1 => array($id, 'Integer')); | |
172 | $paymentProcessorID = &CRM_Core_DAO::singleValueQuery($sql, | |
173 | $params | |
174 | ); | |
175 | if (!$paymentProcessorID) { | |
176 | return NULL; | |
177 | } | |
178 | ||
179 | return CRM_Financial_BAO_PaymentProcessor::getPayment($paymentProcessorID, $mode); | |
180 | } | |
181 | ||
182 | /** | |
100fef9d | 183 | * Get the number of installment done/completed for each recurring contribution |
6a488035 | 184 | * |
014c4014 TO |
185 | * @param array $ids |
186 | * (reference ) an array of recurring contribution ids. | |
6a488035 | 187 | * |
a6c01b45 CW |
188 | * @return array |
189 | * an array of recurring ids count | |
6a488035 | 190 | */ |
00be9182 | 191 | public static function getCount(&$ids) { |
6a488035 TO |
192 | $recurID = implode(',', $ids); |
193 | $totalCount = array(); | |
194 | ||
d5828a02 | 195 | $query = " |
6a488035 TO |
196 | SELECT contribution_recur_id, count( contribution_recur_id ) as commpleted |
197 | FROM civicrm_contribution | |
198 | WHERE contribution_recur_id IN ( {$recurID}) AND is_test = 0 | |
199 | GROUP BY contribution_recur_id"; | |
200 | ||
201 | $res = CRM_Core_DAO::executeQuery($query, CRM_Core_DAO::$_nullArray); | |
202 | ||
203 | while ($res->fetch()) { | |
204 | $totalCount[$res->contribution_recur_id] = $res->commpleted; | |
205 | } | |
206 | return $totalCount; | |
207 | } | |
208 | ||
209 | /** | |
210 | * Delete Recurring contribution. | |
211 | * | |
100fef9d | 212 | * @param int $recurId |
da6b46f4 | 213 | * |
ca26cb52 | 214 | * @return bool |
6a488035 | 215 | */ |
00be9182 | 216 | public static function deleteRecurContribution($recurId) { |
6a488035 TO |
217 | $result = FALSE; |
218 | if (!$recurId) { | |
219 | return $result; | |
220 | } | |
221 | ||
353ffa53 | 222 | $recur = new CRM_Contribute_DAO_ContributionRecur(); |
6a488035 | 223 | $recur->id = $recurId; |
353ffa53 | 224 | $result = $recur->delete(); |
6a488035 TO |
225 | |
226 | return $result; | |
227 | } | |
228 | ||
229 | /** | |
230 | * Cancel Recurring contribution. | |
231 | * | |
014c4014 TO |
232 | * @param int $recurId |
233 | * Recur contribution id. | |
234 | * @param array $objects | |
235 | * An array of objects that is to be cancelled like. | |
6a488035 TO |
236 | * contribution, membership, event. At least contribution object is a must. |
237 | * | |
dd244018 EM |
238 | * @param array $activityParams |
239 | * | |
ca26cb52 | 240 | * @return bool |
6a488035 | 241 | */ |
00be9182 | 242 | public static function cancelRecurContribution($recurId, $objects, $activityParams = array()) { |
6a488035 TO |
243 | if (!$recurId) { |
244 | return FALSE; | |
245 | } | |
246 | ||
247 | $contributionStatus = CRM_Contribute_PseudoConstant::contributionStatus(NULL, 'name'); | |
353ffa53 TO |
248 | $canceledId = array_search('Cancelled', $contributionStatus); |
249 | $recur = new CRM_Contribute_DAO_ContributionRecur(); | |
250 | $recur->id = $recurId; | |
6a488035 TO |
251 | $recur->whereAdd("contribution_status_id != $canceledId"); |
252 | ||
253 | if ($recur->find(TRUE)) { | |
254 | $transaction = new CRM_Core_Transaction(); | |
255 | $recur->contribution_status_id = $canceledId; | |
256 | $recur->start_date = CRM_Utils_Date::isoToMysql($recur->start_date); | |
257 | $recur->create_date = CRM_Utils_Date::isoToMysql($recur->create_date); | |
258 | $recur->modified_date = CRM_Utils_Date::isoToMysql($recur->modified_date); | |
259 | $recur->cancel_date = date('YmdHis'); | |
260 | $recur->save(); | |
261 | ||
262 | $dao = CRM_Contribute_BAO_ContributionRecur::getSubscriptionDetails($recurId); | |
bbf58b03 | 263 | if ($dao && $dao->recur_id) { |
6a488035 TO |
264 | $details = CRM_Utils_Array::value('details', $activityParams); |
265 | if ($dao->auto_renew && $dao->membership_id) { | |
266 | // its auto-renewal membership mode | |
267 | $membershipTypes = CRM_Member_PseudoConstant::membershipType(); | |
353ffa53 TO |
268 | $membershipType = CRM_Core_DAO::getFieldValue('CRM_Member_DAO_Membership', $dao->membership_id, 'membership_type_id'); |
269 | $membershipType = CRM_Utils_Array::value($membershipType, $membershipTypes); | |
6a488035 TO |
270 | $details .= ' |
271 | <br/>' . ts('Automatic renewal of %1 membership cancelled.', array(1 => $membershipType)); | |
272 | } | |
273 | else { | |
274 | $details .= ' | |
275 | <br/>' . ts('The recurring contribution of %1, every %2 %3 has been cancelled.', array( | |
353ffa53 | 276 | 1 => $dao->amount, |
6a488035 | 277 | 2 => $dao->frequency_interval, |
21dfd5f5 | 278 | 3 => $dao->frequency_unit, |
6a488035 TO |
279 | )); |
280 | } | |
281 | $activityParams = array( | |
282 | 'source_contact_id' => $dao->contact_id, | |
283 | 'source_record_id' => CRM_Utils_Array::value('source_record_id', $activityParams), | |
284 | 'activity_type_id' => CRM_Core_OptionGroup::getValue('activity_type', | |
285 | 'Cancel Recurring Contribution', | |
286 | 'name' | |
287 | ), | |
288 | 'subject' => CRM_Utils_Array::value('subject', $activityParams, ts('Recurring contribution cancelled')), | |
289 | 'details' => $details, | |
290 | 'activity_date_time' => date('YmdHis'), | |
291 | 'status_id' => CRM_Core_OptionGroup::getValue('activity_status', | |
292 | 'Completed', | |
293 | 'name' | |
294 | ), | |
295 | ); | |
296 | $session = CRM_Core_Session::singleton(); | |
297 | $cid = $session->get('userID'); | |
298 | if ($cid) { | |
299 | $activityParams['target_contact_id'][] = $activityParams['source_contact_id']; | |
300 | $activityParams['source_contact_id'] = $cid; | |
301 | } | |
302 | CRM_Activity_BAO_Activity::create($activityParams); | |
303 | } | |
304 | ||
305 | // if there are associated objects, cancel them as well | |
306 | if ($objects == CRM_Core_DAO::$_nullObject) { | |
307 | $transaction->commit(); | |
308 | return TRUE; | |
309 | } | |
310 | else { | |
311 | $baseIPN = new CRM_Core_Payment_BaseIPN(); | |
312 | return $baseIPN->cancelled($objects, $transaction); | |
313 | } | |
314 | } | |
315 | else { | |
316 | // if already cancelled, return true | |
317 | $recur->whereAdd(); | |
318 | $recur->whereAdd("contribution_status_id = $canceledId"); | |
319 | if ($recur->find(TRUE)) { | |
320 | return TRUE; | |
321 | } | |
322 | } | |
323 | ||
324 | return FALSE; | |
325 | } | |
326 | ||
327 | /** | |
fe482240 | 328 | * Get list of recurring contribution of contact Ids. |
6a488035 | 329 | * |
014c4014 TO |
330 | * @param int $contactId |
331 | * Contact ID. | |
6a488035 | 332 | * |
a6c01b45 CW |
333 | * @return array |
334 | * list of recurring contribution fields | |
6a488035 | 335 | * |
6a488035 | 336 | */ |
00be9182 | 337 | public static function getRecurContributions($contactId) { |
6a488035 TO |
338 | $params = array(); |
339 | $recurDAO = new CRM_Contribute_DAO_ContributionRecur(); | |
340 | $recurDAO->contact_id = $contactId; | |
341 | $recurDAO->find(); | |
342 | $contributionStatus = CRM_Contribute_PseudoConstant::contributionStatus(); | |
343 | ||
344 | while ($recurDAO->fetch()) { | |
345 | $params[$recurDAO->id]['id'] = $recurDAO->id; | |
346 | $params[$recurDAO->id]['contactId'] = $recurDAO->contact_id; | |
347 | $params[$recurDAO->id]['start_date'] = $recurDAO->start_date; | |
348 | $params[$recurDAO->id]['end_date'] = $recurDAO->end_date; | |
0d4bfc19 | 349 | $params[$recurDAO->id]['next_sched_contribution_date'] = $recurDAO->next_sched_contribution_date; |
6a488035 TO |
350 | $params[$recurDAO->id]['amount'] = $recurDAO->amount; |
351 | $params[$recurDAO->id]['currency'] = $recurDAO->currency; | |
352 | $params[$recurDAO->id]['frequency_unit'] = $recurDAO->frequency_unit; | |
353 | $params[$recurDAO->id]['frequency_interval'] = $recurDAO->frequency_interval; | |
354 | $params[$recurDAO->id]['installments'] = $recurDAO->installments; | |
355 | $params[$recurDAO->id]['contribution_status_id'] = $recurDAO->contribution_status_id; | |
356 | $params[$recurDAO->id]['contribution_status'] = CRM_Utils_Array::value($recurDAO->contribution_status_id, $contributionStatus); | |
357 | $params[$recurDAO->id]['is_test'] = $recurDAO->is_test; | |
358 | $params[$recurDAO->id]['payment_processor_id'] = $recurDAO->payment_processor_id; | |
359 | } | |
360 | ||
361 | return $params; | |
362 | } | |
363 | ||
186c9c17 | 364 | /** |
100fef9d | 365 | * @param int $entityID |
186c9c17 EM |
366 | * @param string $entity |
367 | * | |
368 | * @return null|Object | |
369 | */ | |
00be9182 | 370 | public static function getSubscriptionDetails($entityID, $entity = 'recur') { |
6a488035 | 371 | $sql = " |
d5828a02 DL |
372 | SELECT rec.id as recur_id, |
373 | rec.processor_id as subscription_id, | |
6a488035 TO |
374 | rec.frequency_interval, |
375 | rec.installments, | |
376 | rec.frequency_unit, | |
377 | rec.amount, | |
378 | rec.is_test, | |
379 | rec.auto_renew, | |
380 | rec.currency, | |
d5828a02 | 381 | con.id as contribution_id, |
6a488035 | 382 | con.contribution_page_id, |
f0a7bcb5 | 383 | rec.contact_id, |
6a488035 TO |
384 | mp.membership_id"; |
385 | ||
386 | if ($entity == 'recur') { | |
387 | $sql .= " | |
d5828a02 | 388 | FROM civicrm_contribution_recur rec |
f0a7bcb5 | 389 | LEFT JOIN civicrm_contribution con ON ( con.contribution_recur_id = rec.id ) |
6a488035 TO |
390 | LEFT JOIN civicrm_membership_payment mp ON ( mp.contribution_id = con.id ) |
391 | WHERE rec.id = %1 | |
392 | GROUP BY rec.id"; | |
393 | } | |
394 | elseif ($entity == 'contribution') { | |
395 | $sql .= " | |
396 | FROM civicrm_contribution con | |
d5828a02 | 397 | INNER JOIN civicrm_contribution_recur rec ON ( con.contribution_recur_id = rec.id ) |
6a488035 TO |
398 | LEFT JOIN civicrm_membership_payment mp ON ( mp.contribution_id = con.id ) |
399 | WHERE con.id = %1"; | |
400 | } | |
401 | elseif ($entity == 'membership') { | |
402 | $sql .= " | |
d5828a02 DL |
403 | FROM civicrm_membership_payment mp |
404 | INNER JOIN civicrm_membership mem ON ( mp.membership_id = mem.id ) | |
6a488035 TO |
405 | INNER JOIN civicrm_contribution_recur rec ON ( mem.contribution_recur_id = rec.id ) |
406 | INNER JOIN civicrm_contribution con ON ( con.id = mp.contribution_id ) | |
407 | WHERE mp.membership_id = %1"; | |
408 | } | |
409 | ||
410 | $dao = CRM_Core_DAO::executeQuery($sql, array(1 => array($entityID, 'Integer'))); | |
411 | if ($dao->fetch()) { | |
412 | return $dao; | |
413 | } | |
d5828a02 DL |
414 | else { |
415 | return CRM_Core_DAO::$_nullObject; | |
416 | } | |
6a488035 TO |
417 | } |
418 | ||
00be9182 | 419 | public static function setSubscriptionContext() { |
6a488035 TO |
420 | // handle context redirection for subscription url |
421 | $session = CRM_Core_Session::singleton(); | |
422 | if ($session->get('userID')) { | |
c490a46a CW |
423 | $url = FALSE; |
424 | $cid = CRM_Utils_Request::retrieve('cid', 'Integer'); | |
425 | $mid = CRM_Utils_Request::retrieve('mid', 'Integer'); | |
426 | $qfkey = CRM_Utils_Request::retrieve('key', 'String'); | |
427 | $context = CRM_Utils_Request::retrieve('context', 'String'); | |
6a488035 TO |
428 | if ($cid) { |
429 | switch ($context) { | |
430 | case 'contribution': | |
431 | $url = CRM_Utils_System::url('civicrm/contact/view', | |
432 | "reset=1&selectedChild=contribute&cid={$cid}" | |
433 | ); | |
434 | break; | |
435 | ||
436 | case 'membership': | |
437 | $url = CRM_Utils_System::url('civicrm/contact/view', | |
438 | "reset=1&selectedChild=member&cid={$cid}" | |
439 | ); | |
440 | break; | |
441 | ||
442 | case 'dashboard': | |
443 | $url = CRM_Utils_System::url('civicrm/user', "reset=1&id={$cid}"); | |
444 | break; | |
445 | } | |
446 | } | |
447 | if ($mid) { | |
448 | switch ($context) { | |
449 | case 'dashboard': | |
450 | $url = CRM_Utils_System::url('civicrm/member', "force=1&context={$context}&key={$qfkey}"); | |
451 | break; | |
452 | ||
453 | case 'search': | |
454 | $url = CRM_Utils_System::url('civicrm/member/search', "force=1&context={$context}&key={$qfkey}"); | |
455 | break; | |
456 | } | |
457 | } | |
458 | if ($url) { | |
459 | $session->pushUserContext($url); | |
460 | } | |
461 | } | |
462 | } | |
96025800 | 463 | |
0223e233 WA |
464 | /** |
465 | * CRM-16285 - Function to handle validation errors on form, for recurring contribution field. | |
ea3ddccf | 466 | * |
0223e233 WA |
467 | * @param array $fields |
468 | * The input form values. | |
469 | * @param array $files | |
470 | * The uploaded files if any. | |
ea3ddccf | 471 | * @param CRM_Core_Form $self |
472 | * @param array $errors | |
0223e233 | 473 | */ |
577d1236 WA |
474 | public static function validateRecurContribution($fields, $files, $self, &$errors) { |
475 | if (!empty($fields['is_recur'])) { | |
476 | if ($fields['frequency_interval'] <= 0) { | |
477 | $errors['frequency_interval'] = ts('Please enter a number for how often you want to make this recurring contribution (EXAMPLE: Every 3 months).'); | |
478 | } | |
479 | if ($fields['frequency_unit'] == '0') { | |
480 | $errors['frequency_unit'] = ts('Please select a period (e.g. months, years ...) for how often you want to make this recurring contribution (EXAMPLE: Every 3 MONTHS).'); | |
481 | } | |
482 | } | |
483 | } | |
0223e233 | 484 | |
e577770c EM |
485 | /** |
486 | * Send start or end notification for recurring payments. | |
487 | * | |
488 | * @param array $ids | |
489 | * @param CRM_Contribute_BAO_ContributionRecur $recur | |
490 | * @param bool $isFirstOrLastRecurringPayment | |
491 | */ | |
492 | public static function sendRecurringStartOrEndNotification($ids, $recur, $isFirstOrLastRecurringPayment) { | |
493 | if ($isFirstOrLastRecurringPayment) { | |
494 | $autoRenewMembership = FALSE; | |
495 | if ($recur->id && | |
496 | isset($ids['membership']) && $ids['membership'] | |
497 | ) { | |
498 | $autoRenewMembership = TRUE; | |
499 | } | |
500 | ||
501 | //send recurring Notification email for user | |
502 | CRM_Contribute_BAO_ContributionPage::recurringNotify($isFirstOrLastRecurringPayment, | |
503 | $ids['contact'], | |
504 | $ids['contributionPage'], | |
505 | $recur, | |
506 | $autoRenewMembership | |
507 | ); | |
508 | } | |
509 | } | |
510 | ||
511 | /** | |
512 | * Copy custom data of the initial contribution into its recurring contributions. | |
513 | * | |
514 | * @param int $recurId | |
515 | * @param int $targetContributionId | |
516 | */ | |
517 | static public function copyCustomValues($recurId, $targetContributionId) { | |
518 | if ($recurId && $targetContributionId) { | |
519 | // get the initial contribution id of recur id | |
520 | $sourceContributionId = CRM_Core_DAO::getFieldValue('CRM_Contribute_DAO_Contribution', $recurId, 'id', 'contribution_recur_id'); | |
521 | ||
522 | // if the same contribution is being processed then return | |
523 | if ($sourceContributionId == $targetContributionId) { | |
524 | return; | |
525 | } | |
526 | // check if proper recurring contribution record is being processed | |
527 | $targetConRecurId = CRM_Core_DAO::getFieldValue('CRM_Contribute_DAO_Contribution', $targetContributionId, 'contribution_recur_id'); | |
528 | if ($targetConRecurId != $recurId) { | |
529 | return; | |
530 | } | |
531 | ||
532 | // copy custom data | |
533 | $extends = array('Contribution'); | |
534 | $groupTree = CRM_Core_BAO_CustomGroup::getGroupDetail(NULL, NULL, $extends); | |
535 | if ($groupTree) { | |
536 | foreach ($groupTree as $groupID => $group) { | |
537 | $table[$groupTree[$groupID]['table_name']] = array('entity_id'); | |
538 | foreach ($group['fields'] as $fieldID => $field) { | |
539 | $table[$groupTree[$groupID]['table_name']][] = $groupTree[$groupID]['fields'][$fieldID]['column_name']; | |
540 | } | |
541 | } | |
542 | ||
543 | foreach ($table as $tableName => $tableColumns) { | |
544 | $insert = 'INSERT INTO ' . $tableName . ' (' . implode(', ', $tableColumns) . ') '; | |
545 | $tableColumns[0] = $targetContributionId; | |
546 | $select = 'SELECT ' . implode(', ', $tableColumns); | |
547 | $from = ' FROM ' . $tableName; | |
548 | $where = " WHERE {$tableName}.entity_id = {$sourceContributionId}"; | |
549 | $query = $insert . $select . $from . $where; | |
550 | CRM_Core_DAO::executeQuery($query, CRM_Core_DAO::$_nullArray); | |
551 | } | |
552 | } | |
553 | } | |
554 | } | |
555 | ||
556 | /** | |
557 | * Add soft credit to for recurring payment. | |
558 | * | |
559 | * copy soft credit record of first recurring contribution. | |
560 | * and add new soft credit against $targetContributionId | |
561 | * | |
562 | * @param int $recurId | |
563 | * @param int $targetContributionId | |
564 | */ | |
565 | public static function addrecurSoftCredit($recurId, $targetContributionId) { | |
566 | $soft_contribution = new CRM_Contribute_DAO_ContributionSoft(); | |
567 | $soft_contribution->contribution_id = CRM_Core_DAO::getFieldValue('CRM_Contribute_DAO_Contribution', $recurId, 'id', 'contribution_recur_id'); | |
568 | ||
569 | // Check if first recurring contribution has any associated soft credit. | |
570 | if ($soft_contribution->find(TRUE)) { | |
571 | $soft_contribution->contribution_id = $targetContributionId; | |
572 | unset($soft_contribution->id); | |
573 | $soft_contribution->save(); | |
574 | } | |
575 | } | |
576 | ||
577 | /** | |
578 | * Add line items for recurring contribution. | |
579 | * | |
580 | * @param int $recurId | |
581 | * @param $contribution | |
582 | * | |
583 | * @return array | |
584 | */ | |
585 | public static function addRecurLineItems($recurId, $contribution) { | |
586 | $lineSets = array(); | |
587 | ||
588 | $originalContributionID = CRM_Core_DAO::getFieldValue('CRM_Contribute_DAO_Contribution', $recurId, 'id', 'contribution_recur_id'); | |
589 | $lineItems = CRM_Price_BAO_LineItem::getLineItemsByContributionID($originalContributionID); | |
590 | if (count($lineItems) == 1) { | |
591 | foreach ($lineItems as $index => $lineItem) { | |
592 | if ($lineItem['line_total'] != $contribution->total_amount) { | |
593 | // We are dealing with a changed amount! Per CRM-16397 we can work out what to do with these | |
594 | // if there is only one line item, and the UI should prevent this situation for those with more than one. | |
595 | $lineItems[$index]['line_total'] = $contribution->total_amount; | |
596 | $lineItems[$index]['unit_price'] = round($contribution->total_amount / $lineItems[$index]['qty'], 2); | |
597 | } | |
598 | } | |
599 | } | |
600 | if (!empty($lineItems)) { | |
601 | foreach ($lineItems as $key => $value) { | |
602 | $priceField = new CRM_Price_DAO_PriceField(); | |
603 | $priceField->id = $value['price_field_id']; | |
604 | $priceField->find(TRUE); | |
605 | $lineSets[$priceField->price_set_id][] = $value; | |
606 | ||
607 | if ($value['entity_table'] == 'civicrm_membership') { | |
608 | try { | |
609 | civicrm_api3('membership_payment', 'create', array( | |
610 | 'membership_id' => $value['entity_id'], | |
611 | 'contribution_id' => $contribution->id, | |
612 | )); | |
613 | } | |
614 | catch (CiviCRM_API3_Exception $e) { | |
615 | // we are catching & ignoring errors as an extra precaution since lost IPNs may be more serious that lost membership_payment data | |
616 | // this fn is unit-tested so risk of changes elsewhere breaking it are otherwise mitigated | |
617 | } | |
618 | } | |
619 | } | |
620 | } | |
621 | else { | |
622 | CRM_Price_BAO_LineItem::processPriceSet($contribution->id, $lineSets, $contribution); | |
623 | } | |
624 | return $lineSets; | |
625 | } | |
626 | ||
627 | /** | |
628 | * Update pledge associated with a recurring contribution. | |
629 | * | |
630 | * If the contribution has a pledge_payment record pledge, then update the pledge_payment record & pledge based on that linkage. | |
631 | * | |
632 | * If a previous contribution in the recurring contribution sequence is linked with a pledge then we assume this contribution | |
633 | * should be linked with the same pledge also. Currently only back-office users can apply a recurring payment to a pledge & | |
634 | * it should be assumed they | |
635 | * do so with the intention that all payments will be linked | |
636 | * | |
637 | * The pledge payment record should already exist & will need to be updated with the new contribution ID. | |
638 | * If not the contribution will also need to be linked to the pledge | |
639 | * | |
640 | * @param CRM_Contribute_BAO_Contribution $contribution | |
641 | */ | |
642 | public static function updateRecurLinkedPledge($contribution) { | |
643 | $returnProperties = array('id', 'pledge_id'); | |
644 | $paymentDetails = $paymentIDs = array(); | |
645 | ||
646 | if (CRM_Core_DAO::commonRetrieveAll('CRM_Pledge_DAO_PledgePayment', 'contribution_id', $contribution->id, | |
647 | $paymentDetails, $returnProperties | |
648 | ) | |
649 | ) { | |
650 | foreach ($paymentDetails as $key => $value) { | |
651 | $paymentIDs[] = $value['id']; | |
652 | $pledgeId = $value['pledge_id']; | |
653 | } | |
654 | } | |
655 | else { | |
656 | //payment is not already linked - if it is linked with a pledge we need to create a link. | |
657 | // return if it is not recurring contribution | |
658 | if (!$contribution->contribution_recur_id) { | |
659 | return; | |
660 | } | |
661 | ||
662 | $relatedContributions = new CRM_Contribute_DAO_Contribution(); | |
663 | $relatedContributions->contribution_recur_id = $contribution->contribution_recur_id; | |
664 | $relatedContributions->find(); | |
665 | ||
666 | while ($relatedContributions->fetch()) { | |
667 | CRM_Core_DAO::commonRetrieveAll('CRM_Pledge_DAO_PledgePayment', 'contribution_id', $relatedContributions->id, | |
668 | $paymentDetails, $returnProperties | |
669 | ); | |
670 | } | |
671 | ||
672 | if (empty($paymentDetails)) { | |
673 | // payment is not linked with a pledge and neither are any other contributions on this | |
674 | return; | |
675 | } | |
676 | ||
677 | foreach ($paymentDetails as $key => $value) { | |
678 | $pledgeId = $value['pledge_id']; | |
679 | } | |
680 | ||
681 | // we have a pledge now we need to get the oldest unpaid payment | |
682 | $paymentDetails = CRM_Pledge_BAO_PledgePayment::getOldestPledgePayment($pledgeId); | |
683 | if (empty($paymentDetails['id'])) { | |
684 | // we can assume this pledge is now completed | |
685 | // return now so we don't create a core error & roll back | |
686 | return; | |
687 | } | |
688 | $paymentDetails['contribution_id'] = $contribution->id; | |
689 | $paymentDetails['status_id'] = $contribution->contribution_status_id; | |
690 | $paymentDetails['actual_amount'] = $contribution->total_amount; | |
691 | ||
692 | // put contribution against it | |
693 | $payment = CRM_Pledge_BAO_PledgePayment::add($paymentDetails); | |
694 | $paymentIDs[] = $payment->id; | |
695 | } | |
696 | ||
697 | // update pledge and corresponding payment statuses | |
698 | CRM_Pledge_BAO_PledgePayment::updatePledgePaymentStatus($pledgeId, $paymentIDs, $contribution->contribution_status_id, | |
699 | NULL, $contribution->total_amount | |
700 | ); | |
701 | } | |
702 | ||
24782d26 | 703 | /** |
704 | * @param $form | |
705 | */ | |
706 | public static function recurringContribution(&$form) { | |
707 | // Recurring contribution fields | |
708 | foreach (self::getRecurringFields() as $key => $label) { | |
709 | if ($key == 'contribution_recur_payment_made' && | |
710 | !CRM_Utils_System::isNull(CRM_Utils_Array::value($key, $form->_formValues)) | |
711 | ) { | |
712 | $form->assign('contribution_recur_pane_open', TRUE); | |
713 | break; | |
714 | } | |
715 | CRM_Core_Form_Date::buildDateRange($form, $key, 1, '_low', '_high'); | |
716 | // If data has been entered for a recurring field, tell the tpl layer to open the pane | |
717 | if (!empty($form->_formValues[$key . '_relative']) || !empty($form->_formValues[$key . '_low']) || !empty($form->_formValues[$key . '_high'])) { | |
718 | $form->assign('contribution_recur_pane_open', TRUE); | |
719 | break; | |
720 | } | |
721 | } | |
722 | ||
24782d26 | 723 | // Add field to check if payment is made for recurring contribution |
724 | $recurringPaymentOptions = array( | |
5aae2a90 | 725 | 1 => ts(' All recurring contributions'), |
726 | 2 => ts(' Recurring contributions with at least one payment'), | |
24782d26 | 727 | ); |
5aae2a90 | 728 | $form->addRadio('contribution_recur_payment_made', NULL, $recurringPaymentOptions, array('allowClear' => TRUE)); |
24782d26 | 729 | CRM_Core_Form_Date::buildDateRange($form, 'contribution_recur_start_date', 1, '_low', '_high', ts('From'), FALSE, FALSE, 'birth'); |
730 | CRM_Core_Form_Date::buildDateRange($form, 'contribution_recur_end_date', 1, '_low', '_high', ts('From'), FALSE, FALSE, 'birth'); | |
731 | CRM_Core_Form_Date::buildDateRange($form, 'contribution_recur_modified_date', 1, '_low', '_high', ts('From'), FALSE, FALSE, 'birth'); | |
732 | CRM_Core_Form_Date::buildDateRange($form, 'contribution_recur_next_sched_contribution_date', 1, '_low', '_high', ts('From'), FALSE, FALSE, 'birth'); | |
733 | CRM_Core_Form_Date::buildDateRange($form, 'contribution_recur_failure_retry_date', 1, '_low', '_high', ts('From'), FALSE, FALSE, 'birth'); | |
734 | CRM_Core_Form_Date::buildDateRange($form, 'contribution_recur_cancel_date', 1, '_low', '_high', ts('From'), FALSE, FALSE, 'birth'); | |
735 | $form->addElement('text', 'contribution_recur_processor_id', ts('Processor ID'), CRM_Core_DAO::getAttribute('CRM_Contribute_DAO_ContributionRecur', 'processor_id')); | |
736 | $form->addElement('text', 'contribution_recur_trxn_id', ts('Transaction ID'), CRM_Core_DAO::getAttribute('CRM_Contribute_DAO_ContributionRecur', 'trxn_id')); | |
737 | $contributionRecur = array('ContributionRecur'); | |
738 | $groupDetails = CRM_Core_BAO_CustomGroup::getGroupDetail(NULL, TRUE, $contributionRecur); | |
739 | if ($groupDetails) { | |
740 | $form->assign('contributeRecurGroupTree', $groupDetails); | |
741 | foreach ($groupDetails as $group) { | |
742 | foreach ($group['fields'] as $field) { | |
743 | $fieldId = $field['id']; | |
744 | $elementName = 'custom_' . $fieldId; | |
745 | CRM_Core_BAO_CustomField::addQuickFormElement($form, | |
746 | $elementName, | |
747 | $fieldId, | |
748 | FALSE, FALSE, TRUE | |
749 | ); | |
750 | } | |
751 | } | |
752 | } | |
753 | } | |
754 | ||
755 | /** | |
756 | * Get fields for recurring contributions. | |
757 | * | |
758 | * @return array | |
759 | */ | |
760 | public static function getRecurringFields() { | |
761 | return array( | |
762 | 'contribution_recur_payment_made' => ts(''), | |
763 | 'contribution_recur_start_date' => ts('Recurring Contribution Start Date'), | |
764 | 'contribution_recur_next_sched_contribution_date' => ts('Next Scheduled Recurring Contribution'), | |
765 | 'contribution_recur_cancel_date' => ts('Recurring Contribution Cancel Date'), | |
766 | 'contribution_recur_end_date' => ts('Recurring Contribution End Date'), | |
767 | 'contribution_recur_create_date' => ('Recurring Contribution Create Date'), | |
768 | 'contribution_recur_modified_date' => ('Recurring Contribution Modified Date'), | |
769 | 'contribution_recur_failure_retry_date' => ts('Failed Recurring Contribution Retry Date'), | |
770 | ); | |
771 | } | |
772 | ||
91259407 | 773 | /** |
774 | * Update recurring contribution based on incoming payment. | |
775 | * | |
776 | * Do not rename or move this function without updating https://issues.civicrm.org/jira/browse/CRM-17655. | |
777 | * | |
778 | * @param int $recurringContributionID | |
779 | * @param string $paymentStatus | |
780 | * Payment status - this correlates to the machine name of the contribution status ID ie | |
781 | * - Completed | |
782 | * - Failed | |
783 | * | |
784 | * @throws \CiviCRM_API3_Exception | |
785 | */ | |
786 | public static function updateOnNewPayment($recurringContributionID, $paymentStatus) { | |
787 | if (!in_array($paymentStatus, array('Completed', 'Failed'))) { | |
788 | return; | |
789 | } | |
790 | $params = array( | |
791 | 'id' => $recurringContributionID, | |
792 | 'return' => array( | |
793 | 'contribution_status_id', | |
794 | 'next_sched_contribution_date', | |
795 | 'frequency_unit', | |
796 | 'frequency_interval', | |
797 | 'installments', | |
798 | 'failure_count', | |
799 | ), | |
800 | ); | |
801 | ||
802 | $existing = civicrm_api3('ContributionRecur', 'getsingle', $params); | |
803 | ||
804 | if ($paymentStatus == 'Completed' | |
805 | && CRM_Contribute_PseudoConstant::contributionStatus($existing['contribution_status_id'], 'name') == 'Pending') { | |
806 | $params['contribution_status_id'] = 'In Progress'; | |
807 | } | |
808 | if ($paymentStatus == 'Failed') { | |
809 | $params['failure_count'] = $existing['failure_count']; | |
810 | } | |
811 | $params['modified_date'] = date('Y-m-d H:i:s'); | |
812 | ||
813 | if (!empty($existing['installments']) && self::isComplete($recurringContributionID, $existing['installments'])) { | |
814 | $params['contribution_status_id'] = 'Completed'; | |
815 | } | |
816 | else { | |
817 | // Only update next sched date if it's empty or 'just now' because payment processors may be managing | |
818 | // the scheduled date themselves as core did not previously provide any help. | |
819 | if (empty($params['next_sched_contribution_date']) || strtotime($params['next_sched_contribution_date']) == | |
820 | strtotime(date('Y-m-d'))) { | |
821 | $params['next_sched_contribution_date'] = date('Y-m-d', strtotime('+' . $existing['frequency_interval'] . ' ' . $existing['frequency_unit'])); | |
822 | } | |
823 | } | |
824 | civicrm_api3('ContributionRecur', 'create', $params); | |
825 | } | |
826 | ||
827 | /** | |
828 | * Is this recurring contribution now complete. | |
829 | * | |
830 | * Have all the payments expected been received now. | |
831 | * | |
832 | * @param int $recurringContributionID | |
833 | * @param int $installments | |
834 | * | |
835 | * @return bool | |
836 | */ | |
837 | protected static function isComplete($recurringContributionID, $installments) { | |
838 | $paidInstallments = CRM_Core_DAO::singleValueQuery( | |
839 | 'SELECT count(*) FROM civicrm_contribution WHERE id = %1', | |
840 | array(1 => array($recurringContributionID, 'Integer')) | |
841 | ); | |
842 | if ($paidInstallments >= $installments) { | |
843 | return TRUE; | |
844 | } | |
845 | return FALSE; | |
846 | } | |
847 | ||
6a488035 | 848 | } |