3 +--------------------------------------------------------------------+
4 | CiviCRM version 4.7 |
5 +--------------------------------------------------------------------+
6 | Copyright CiviCRM LLC (c) 2004-2015 |
7 +--------------------------------------------------------------------+
8 | This file is a part of CiviCRM. |
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. |
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. |
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 +--------------------------------------------------------------------+
31 * @copyright CiviCRM LLC (c) 2004-2015
35 class CRM_Member_Page_Tab
extends CRM_Core_Page
{
38 * The action links that we need to display for the browse screen.
42 static $_links = NULL;
43 static $_membershipTypesLinks = NULL;
45 public $_permission = NULL;
46 public $_contactId = NULL;
49 * called when action is browse.
51 public function browse() {
52 $links = self
::links('all', $this->_isPaymentProcessor
, $this->_accessContribution
);
53 CRM_Financial_BAO_FinancialType
::getAvailableMembershipTypes($membershipTypes);
54 $addWhere = "membership_type_id IN (0)";
55 if (!empty($membershipTypes)) {
56 $addWhere = "membership_type_id IN (" . implode(',', array_keys($membershipTypes)) . ")";
59 $membership = array();
60 $dao = new CRM_Member_DAO_Membership();
61 $dao->contact_id
= $this->_contactId
;
63 $dao->whereAdd($addWhere);
64 //$dao->orderBy('name');
67 //CRM--4418, check for view, edit, delete
68 $permissions = array(CRM_Core_Permission
::VIEW
);
69 if (CRM_Core_Permission
::check('edit memberships')) {
70 $permissions[] = CRM_Core_Permission
::EDIT
;
72 if (CRM_Core_Permission
::check('delete in CiviMember')) {
73 $permissions[] = CRM_Core_Permission
::DELETE
;
75 $mask = CRM_Core_Action
::mask($permissions);
77 // get deceased status id
78 $allStatus = CRM_Member_PseudoConstant
::membershipStatus();
79 $deceasedStatusId = array_search('Deceased', $allStatus);
82 $allCampaigns = CRM_Campaign_BAO_Campaign
::getCampaigns(NULL, NULL, FALSE, FALSE, FALSE, TRUE);
84 //checks membership of contact itself
85 while ($dao->fetch()) {
86 $membership[$dao->id
] = array();
87 CRM_Core_DAO
::storeValues($dao, $membership[$dao->id
]);
90 $membership[$dao->id
]['campaign'] = CRM_Utils_Array
::value($dao->campaign_id
, $allCampaigns);
92 //get the membership status and type values.
93 $statusANDType = CRM_Member_BAO_Membership
::getStatusANDTypeValues($dao->id
);
94 foreach (array('status', 'membership_type') as $fld) {
95 $membership[$dao->id
][$fld] = CRM_Utils_Array
::value($fld, $statusANDType[$dao->id
]);
97 if (!empty($statusANDType[$dao->id
]['is_current_member'])) {
98 $membership[$dao->id
]['active'] = TRUE;
100 if (empty($dao->owner_membership_id
)) {
101 // unset renew and followup link for deceased membership
102 $currentMask = $mask;
103 if ($dao->status_id
== $deceasedStatusId) {
104 $currentMask = $currentMask & ~CRM_Core_Action
::RENEW
& ~CRM_Core_Action
::FOLLOWUP
;
107 $isUpdateBilling = FALSE;
108 // It would be better to determine if there is a recurring contribution &
109 // is so get the entity for the recurring contribution (& skip if not).
110 $paymentObject = CRM_Financial_BAO_PaymentProcessor
::getProcessorForEntity(
111 $membership[$dao->id
]['membership_id'], 'membership', 'obj');
112 if (!empty($paymentObject)) {
113 // @todo - get this working with syntax style $paymentObject->supports(array
114 //('updateSubscriptionBillingInfo'));
115 $isUpdateBilling = $paymentObject->isSupported('updateSubscriptionBillingInfo');
118 // @todo - get this working with syntax style $paymentObject->supports(array
119 //('CancelSubscriptionSupported'));
120 $isCancelSupported = CRM_Member_BAO_Membership
::isCancelSubscriptionSupported(
121 $membership[$dao->id
]['membership_id']);
122 $links = self
::links('all',
128 self
::getPermissionedLinks($dao->membership_type_id
, $links);
129 $membership[$dao->id
]['action'] = CRM_Core_Action
::formLink($links,
133 'cid' => $this->_contactId
,
137 'membership.tab.row',
143 $links = self
::links('view');
144 self
::getPermissionedLinks($dao->membership_type_id
, $links);
145 $membership[$dao->id
]['action'] = CRM_Core_Action
::formLink($links,
149 'cid' => $this->_contactId
,
153 'membership.tab.row',
159 //does membership have auto renew CRM-7137.
160 if (!empty($membership[$dao->id
]['contribution_recur_id']) &&
161 !CRM_Member_BAO_Membership
::isSubscriptionCancelled($membership[$dao->id
]['membership_id'])
163 $membership[$dao->id
]['auto_renew'] = 1;
166 $membership[$dao->id
]['auto_renew'] = 0;
169 // if relevant, count related memberships
170 if (CRM_Utils_Array
::value('is_current_member', $statusANDType[$dao->id
]) // membership is active
171 && CRM_Utils_Array
::value('relationship_type_id', $statusANDType[$dao->id
]) // membership type allows inheritance
172 && empty($dao->owner_membership_id
)
174 // not an related membership
177 FROM civicrm_membership m
178 LEFT JOIN civicrm_membership_status ms ON ms.id = m.status_id
179 LEFT JOIN civicrm_contact ct ON ct.id = m.contact_id
180 WHERE m.owner_membership_id = {$dao->id} AND m.is_test = 0 AND ms.is_current_member = 1 AND ct.is_deleted = 0";
181 $num_related = CRM_Core_DAO
::singleValueQuery($query);
182 $max_related = CRM_Utils_Array
::value('max_related', $membership[$dao->id
]);
183 $membership[$dao->id
]['related_count'] = ($max_related == '' ?
ts('%1 created', array(1 => $num_related)) : ts('%1 out of %2', array(
190 $membership[$dao->id
]['related_count'] = ts('N/A');
194 //Below code gives list of all Membership Types associated
195 //with an Organization(CRM-2016)
196 $membershipTypes = CRM_Member_BAO_MembershipType
::getMembershipTypesByOrg($this->_contactId
);
197 foreach ($membershipTypes as $key => $value) {
198 $membershipTypes[$key]['action'] = CRM_Core_Action
::formLink(self
::membershipTypeslinks(),
201 'id' => $value['id'],
202 'cid' => $this->_contactId
,
206 'membershipType.organization.action',
212 $activeMembers = CRM_Member_BAO_Membership
::activeMembers($membership);
213 $inActiveMembers = CRM_Member_BAO_Membership
::activeMembers($membership, 'inactive');
214 $this->assign('activeMembers', $activeMembers);
215 $this->assign('inActiveMembers', $inActiveMembers);
216 $this->assign('membershipTypes', $membershipTypes);
218 if ($this->_contactId
) {
219 $displayName = CRM_Contact_BAO_Contact
::displayName($this->_contactId
);
220 $this->assign('displayName', $displayName);
221 $this->ajaxResponse
['tabCount'] = CRM_Contact_BAO_Contact
::getCountComponent('membership', $this->_contactId
);
222 // Refresh other tabs with related data
223 $this->ajaxResponse
['updateTabs'] = array(
224 '#tab_activity' => CRM_Contact_BAO_Contact
::getCountComponent('activity', $this->_contactId
),
225 '#tab_rel' => CRM_Contact_BAO_Contact
::getCountComponent('rel', $this->_contactId
),
227 if (CRM_Core_Permission
::access('CiviContribute')) {
228 $this->ajaxResponse
['updateTabs']['#tab_contribute'] = CRM_Contact_BAO_Contact
::getCountComponent('contribution', $this->_contactId
);
234 * called when action is view.
238 public function view() {
239 $controller = new CRM_Core_Controller_Simple(
240 'CRM_Member_Form_MembershipView',
241 ts('View Membership'),
244 $controller->setEmbedded(TRUE);
245 $controller->set('id', $this->_id
);
246 $controller->set('cid', $this->_contactId
);
248 return $controller->run();
252 * called when action is update or new.
256 public function edit() {
257 // set https for offline cc transaction
258 $mode = CRM_Utils_Request
::retrieve('mode', 'String', $this);
259 if ($mode == 'test' ||
$mode == 'live') {
260 CRM_Utils_System
::redirectToSSL();
263 // build associated contributions ( note: this is called to show associated contributions in edit mode )
264 if ($this->_action
& CRM_Core_Action
::UPDATE
) {
265 $this->assign('accessContribution', FALSE);
266 if (CRM_Core_Permission
::access('CiviContribute')) {
267 $this->assign('accessContribution', TRUE);
268 CRM_Member_Page_Tab
::associatedContribution($this->_contactId
, $this->_id
);
270 //show associated soft credit when contribution payment is paid by different person in edit mode
271 if ($this->_id
&& $this->_contactId
) {
272 $filter = " AND cc.id IN (SELECT contribution_id FROM civicrm_membership_payment WHERE membership_id = {$this->_id})";
273 $softCreditList = CRM_Contribute_BAO_ContributionSoft
::getSoftContributionList($this->_contactId
, $filter);
274 if (!empty($softCreditList)) {
275 $this->assign('softCredit', TRUE);
276 $this->assign('softCreditRows', $softCreditList);
282 if ($this->_action
& CRM_Core_Action
::RENEW
) {
283 $path = 'CRM_Member_Form_MembershipRenewal';
284 $title = ts('Renew Membership');
287 $path = 'CRM_Member_Form_Membership';
288 $title = ts('Create Membership');
291 $controller = new CRM_Core_Controller_Simple($path, $title, $this->_action
);
292 $controller->setEmbedded(TRUE);
293 $controller->set('BAOName', $this->getBAOName());
294 $controller->set('id', $this->_id
);
295 $controller->set('cid', $this->_contactId
);
296 return $controller->run();
299 public function preProcess() {
300 $context = CRM_Utils_Request
::retrieve('context', 'String', $this);
301 $this->_action
= CRM_Utils_Request
::retrieve('action', 'String', $this, FALSE, 'browse');
302 $this->_id
= CRM_Utils_Request
::retrieve('id', 'Positive', $this);
304 if ($context == 'standalone') {
305 $this->_action
= CRM_Core_Action
::ADD
;
308 $this->_contactId
= CRM_Utils_Request
::retrieve('cid', 'Positive', $this, TRUE);
309 $this->assign('contactId', $this->_contactId
);
311 // check logged in url permission
312 CRM_Contact_Page_View
::checkUserPermission($this);
315 $this->assign('action', $this->_action
);
317 if ($this->_permission
== CRM_Core_Permission
::EDIT
&& !CRM_Core_Permission
::check('edit memberships')) {
318 // demote to view since user does not have edit membership rights
319 $this->_permission
= CRM_Core_Permission
::VIEW
;
320 $this->assign('permission', 'view');
325 * the main function that is called when the page loads, it decides the which action has to be taken for the page.
329 public function run() {
332 // check if we can process credit card membership
333 $newCredit = CRM_Core_Config
::isEnabledBackOfficeCreditCardPayments();
334 $this->assign('newCredit', $newCredit);
337 $this->_isPaymentProcessor
= TRUE;
340 $this->_isPaymentProcessor
= FALSE;
343 // Only show credit card membership signup if user has CiviContribute permission
344 if (CRM_Core_Permission
::access('CiviContribute')) {
345 $this->_accessContribution
= TRUE;
346 $this->assign('accessContribution', TRUE);
348 //show associated soft credit when contribution payment is paid by different person
349 if ($this->_id
&& $this->_contactId
) {
350 $filter = " AND cc.id IN (SELECT contribution_id FROM civicrm_membership_payment WHERE membership_id = {$this->_id})";
351 $softCreditList = CRM_Contribute_BAO_ContributionSoft
::getSoftContributionList($this->_contactId
, $filter);
352 if (!empty($softCreditList)) {
353 $this->assign('softCredit', TRUE);
354 $this->assign('softCreditRows', $softCreditList);
359 $this->_accessContribution
= FALSE;
360 $this->assign('accessContribution', FALSE);
361 $this->assign('softCredit', FALSE);
364 if ($this->_action
& CRM_Core_Action
::VIEW
) {
367 elseif ($this->_action
& (CRM_Core_Action
::UPDATE | CRM_Core_Action
::ADD | CRM_Core_Action
::DELETE | CRM_Core_Action
::RENEW
)) {
368 self
::setContext($this);
372 self
::setContext($this);
376 return parent
::run();
380 * @param CRM_Core_Form $form
381 * @param int $contactId
383 public static function setContext(&$form, $contactId = NULL) {
384 $context = CRM_Utils_Request
::retrieve('context', 'String', $form, FALSE, 'search');
386 $qfKey = CRM_Utils_Request
::retrieve('key', 'String', $form);
388 $searchContext = CRM_Utils_Request
::retrieve('searchContext', 'String', $form);
391 if (!CRM_Utils_Rule
::qfKey($qfKey)) {
396 $contactId = $form->_contactId
;
401 $url = CRM_Utils_System
::url('civicrm/member', 'reset=1');
405 $url = CRM_Utils_System
::url('civicrm/contact/view', "reset=1&force=1&cid={$contactId}&selectedChild=member");
409 $urlParams = 'force=1';
411 $urlParams .= "&qfKey=$qfKey";
413 $form->assign('searchKey', $qfKey);
415 if ($searchContext) {
416 $url = CRM_Utils_System
::url("civicrm/$searchContext/search", $urlParams);
419 $url = CRM_Utils_System
::url('civicrm/member/search', $urlParams);
424 $url = CRM_Utils_System
::url('civicrm/dashboard', 'reset=1');
428 $url = CRM_Utils_System
::url('civicrm/contact/view',
429 "reset=1&force=1&cid={$contactId}&selectedChild=activity"
434 $url = CRM_Utils_System
::url('civicrm/dashboard', 'reset=1');
438 $action = CRM_Utils_Request
::retrieve('action', 'String', $form);
440 $urlParams = 'force=1';
441 $urlString = 'civicrm/contact/search/custom';
442 if ($action == CRM_Core_Action
::UPDATE
) {
443 if ($form->_contactId
) {
444 $urlParams .= '&cid=' . $form->_contactId
;
447 $urlParams .= '&context=fulltext&action=view';
448 $urlString = 'civicrm/contact/view/membership';
451 $urlParams .= "$keyName=$qfKey";
453 $form->assign('searchKey', $qfKey);
454 $url = CRM_Utils_System
::url($urlString, $urlParams);
460 $cid = '&cid=' . $contactId;
462 $url = CRM_Utils_System
::url('civicrm/member/search', 'force=1' . $cid);
466 $session = CRM_Core_Session
::singleton();
467 $session->pushUserContext($url);
473 * @param string $status
474 * @param null $isPaymentProcessor
475 * @param null $accessContribution
476 * @param bool $isCancelSupported
477 * @param bool $isUpdateBilling
480 * (reference) of action links
482 public static function &links(
484 $isPaymentProcessor = NULL,
485 $accessContribution = NULL,
486 $isCancelSupported = FALSE,
487 $isUpdateBilling = FALSE
489 if (!CRM_Utils_Array
::value('view', self
::$_links)) {
490 self
::$_links['view'] = array(
491 CRM_Core_Action
::VIEW
=> array(
492 'name' => ts('View'),
493 'url' => 'civicrm/contact/view/membership',
494 'qs' => 'action=view&reset=1&cid=%%cid%%&id=%%id%%&context=membership&selectedChild=member',
495 'title' => ts('View Membership'),
500 if (!CRM_Utils_Array
::value('all', self
::$_links)) {
502 CRM_Core_Action
::UPDATE
=> array(
503 'name' => ts('Edit'),
504 'url' => 'civicrm/contact/view/membership',
505 'qs' => 'action=update&reset=1&cid=%%cid%%&id=%%id%%&context=membership&selectedChild=member',
506 'title' => ts('Edit Membership'),
508 CRM_Core_Action
::RENEW
=> array(
509 'name' => ts('Renew'),
510 'url' => 'civicrm/contact/view/membership',
511 'qs' => 'action=renew&reset=1&cid=%%cid%%&id=%%id%%&context=membership&selectedChild=member',
512 'title' => ts('Renew Membership'),
514 CRM_Core_Action
::FOLLOWUP
=> array(
515 'name' => ts('Renew-Credit Card'),
516 'url' => 'civicrm/contact/view/membership',
517 'qs' => 'action=renew&reset=1&cid=%%cid%%&id=%%id%%&context=membership&selectedChild=member&mode=live',
518 'title' => ts('Renew Membership Using Credit Card'),
520 CRM_Core_Action
::DELETE
=> array(
521 'name' => ts('Delete'),
522 'url' => 'civicrm/contact/view/membership',
523 'qs' => 'action=delete&reset=1&cid=%%cid%%&id=%%id%%&context=membership&selectedChild=member',
524 'title' => ts('Delete Membership'),
527 if (!$isPaymentProcessor ||
!$accessContribution) {
528 //unset the renew with credit card when payment
529 //processor is not available or user is not permitted to create contributions
530 unset($extraLinks[CRM_Core_Action
::FOLLOWUP
]);
532 self
::$_links['all'] = self
::$_links['view'] +
$extraLinks;
535 if ($isCancelSupported) {
536 $cancelMessage = ts('WARNING: If you cancel the recurring contribution associated with this membership, the membership will no longer be renewed automatically. However, the current membership status will not be affected.');
537 self
::$_links['all'][CRM_Core_Action
::DISABLE
] = array(
538 'name' => ts('Cancel Auto-renewal'),
539 'url' => 'civicrm/contribute/unsubscribe',
540 'qs' => 'reset=1&cid=%%cid%%&mid=%%id%%&context=membership&selectedChild=member',
541 'title' => ts('Cancel Auto Renew Subscription'),
542 'extra' => 'onclick = "if (confirm(\'' . $cancelMessage . '\') ) { return true; else return false;}"',
545 elseif (isset(self
::$_links['all'][CRM_Core_Action
::DISABLE
])) {
546 unset(self
::$_links['all'][CRM_Core_Action
::DISABLE
]);
549 if ($isUpdateBilling) {
550 self
::$_links['all'][CRM_Core_Action
::MAP
] = array(
551 'name' => ts('Change Billing Details'),
552 'url' => 'civicrm/contribute/updatebilling',
553 'qs' => 'reset=1&cid=%%cid%%&mid=%%id%%&context=membership&selectedChild=member',
554 'title' => ts('Change Billing Details'),
557 elseif (isset(self
::$_links['all'][CRM_Core_Action
::MAP
])) {
558 unset(self
::$_links['all'][CRM_Core_Action
::MAP
]);
560 return self
::$_links[$status];
564 * Define action links for membership types of related organization.
567 * self::$_membershipTypesLinks array of action links
569 public static function &membershipTypesLinks() {
570 if (!self
::$_membershipTypesLinks) {
571 self
::$_membershipTypesLinks = array(
572 CRM_Core_Action
::VIEW
=> array(
573 'name' => ts('Members'),
574 'url' => 'civicrm/member/search/',
575 'qs' => 'reset=1&force=1&type=%%id%%',
576 'title' => ts('Search'),
578 CRM_Core_Action
::UPDATE
=> array(
579 'name' => ts('Edit'),
580 'url' => 'civicrm/admin/member/membershipType',
581 'qs' => 'action=update&id=%%id%%&reset=1',
582 'title' => ts('Edit Membership Type'),
586 return self
::$_membershipTypesLinks;
590 * used for the to show the associated.
591 * contribution for the membership
593 * @param int $contactId
594 * @param int $membershipId
596 public static function associatedContribution($contactId = NULL, $membershipId = NULL) {
597 $controller = new CRM_Core_Controller_Simple(
598 'CRM_Contribute_Form_Search',
603 $controller->setEmbedded(TRUE);
604 $controller->reset();
605 $controller->set('force', 1);
606 $controller->set('cid', $contactId);
607 $controller->set('memberId', $membershipId);
608 $controller->set('context', 'contribution');
609 $controller->process();
619 public function getBAOName() {
620 return 'CRM_Member_BAO_Membership';
624 * Get a list of links based on permissioned FTs.
626 * @param int $memTypeID
629 * (reference ) action links
631 public static function getPermissionedLinks($memTypeID, &$links) {
632 if (!CRM_Financial_BAO_FinancialType
::isACLFinancialTypeStatus()) {
635 $finTypeId = CRM_Core_DAO
::getFieldValue('CRM_Member_DAO_MembershipType', $memTypeID, 'financial_type_id');
636 $finType = CRM_Contribute_PseudoConstant
::financialType($finTypeId);
637 if (!CRM_Core_Permission
::check('edit contributions of type ' . $finType)) {
638 unset($links[CRM_Core_Action
::UPDATE
]);
639 unset($links[CRM_Core_Action
::RENEW
]);
640 unset($links[CRM_Core_Action
::FOLLOWUP
]);
642 if (!CRM_Core_Permission
::check('delete contributions of type ' . $finType)) {
643 unset($links[CRM_Core_Action
::DELETE
]);