3 +--------------------------------------------------------------------+
4 | CiviCRM version 4.5 |
5 +--------------------------------------------------------------------+
6 | Copyright CiviCRM LLC (c) 2004-2014 |
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-2014
37 * This class contains all the function that are called using AJAX
39 class CRM_Admin_Page_AJAX
{
42 * CRM-12337 Output navigation menu as executable javascript
43 * @see smarty_function_crmNavigationMenu
45 static function getNavigationMenu() {
46 $contactID = CRM_Core_Session
::singleton()->get('userID');
48 // Set headers to encourage browsers to cache for a long time
50 header('Expires: '.gmdate('D, d M Y H:i:s \G\M\T', time() +
$year));
51 header('Content-Type: application/javascript');
52 header("Cache-Control: max-age=$year, public");
54 print CRM_Core_Smarty
::singleton()->fetchWith('CRM/common/navigation.js.tpl', array(
55 'navigation' => CRM_Core_BAO_Navigation
::createNavigation($contactID),
58 CRM_Utils_System
::civiExit();
62 * Return menu tree as json data for editing
64 static function getNavigationList() {
65 echo CRM_Core_BAO_Navigation
::buildNavigation(TRUE, FALSE);
66 CRM_Utils_System
::civiExit();
70 * Function to process drag/move action for menu tree
72 static function menuTree() {
73 CRM_Core_BAO_Navigation
::processNavigation($_GET);
77 * Function to build status message while
78 * enabling/ disabling various objects
80 static function getStatusMsg() {
81 require_once('api/v3/utils.php');
82 $recordID = CRM_Utils_Type
::escape($_GET['id'], 'Integer');
83 $entity = CRM_Utils_Type
::escape($_GET['entity'], 'String');
86 if ($recordID && $entity && $recordBAO = _civicrm_api3_get_BAO($entity)) {
88 case 'CRM_Core_BAO_UFGroup':
89 $method = 'getUFJoinRecord';
90 $result = array($recordBAO, $method);
91 $ufJoin = call_user_func_array(($result), array($recordID, TRUE));
92 if (!empty($ufJoin)) {
93 $ret['content'] = ts('This profile is currently used for %1.', array(1 => implode(', ', $ufJoin))) . ' <br/><br/>' . ts('If you disable the profile - it will be removed from these forms and/or modules. Do you want to continue?');
96 $ret['content'] = ts('Are you sure you want to disable this profile?');
100 case 'CRM_Price_BAO_PriceSet':
101 $usedBy = CRM_Price_BAO_PriceSet
::getUsedBy($recordID);
102 $priceSet = CRM_Price_BAO_PriceSet
::getTitle($recordID);
104 if (!CRM_Utils_System
::isNull($usedBy)) {
105 $template = CRM_Core_Smarty
::singleton();
106 $template->assign('usedBy', $usedBy);
108 'Event' => 'civicrm_event',
109 'Contribution' => 'civicrm_contribution_page',
110 'EventTemplate' => 'civicrm_event_template'
113 foreach ($comps as $name => $table) {
114 if (array_key_exists($table, $usedBy)) {
118 $template->assign('contexts', $contexts);
120 $ret['illegal'] = TRUE;
121 $table = $template->fetch('CRM/Price/Page/table.tpl');
122 $ret['content'] = ts('Unable to disable the \'%1\' price set - it is currently in use by one or more active events, contribution pages or contributions.', array(
123 1 => $priceSet)) . "<br/> $table";
126 $ret['content'] = ts('Are you sure you want to disable \'%1\' Price Set?', array(1 => $priceSet));
130 case 'CRM_Event_BAO_Event':
131 $ret['content'] = ts('Are you sure you want to disable this Event?');
134 case 'CRM_Core_BAO_UFField':
135 $ret['content'] = ts('Are you sure you want to disable this CiviCRM Profile field?');
138 case 'CRM_Contribute_BAO_ManagePremiums':
139 $ret['content'] = ts('Are you sure you want to disable this premium? This action will remove the premium from any contribution pages that currently offer it. However it will not delete the premium record - so you can re-enable it and add it back to your contribution page(s) at a later time.');
142 case 'CRM_Contact_BAO_RelationshipType':
143 $ret['content'] = ts('Are you sure you want to disable this relationship type?') . '<br/><br/>' . ts('Users will no longer be able to select this value when adding or editing relationships between contacts.');
146 case 'CRM_Financial_BAO_FinancialType':
147 $ret['content'] = ts('Are you sure you want to disable this financial type?');
150 case 'CRM_Financial_BAO_FinancialAccount':
151 if (!CRM_Financial_BAO_FinancialAccount
::getARAccounts($recordID)) {
152 $ret['illegal'] = TRUE;
153 $ret['content'] = ts('The selected financial account cannot be disabled because at least one Accounts Receivable type account is required (to ensure that accounting transactions are in balance).');
156 $ret['content'] = ts('Are you sure you want to disable this financial account?');
160 case 'CRM_Financial_BAO_PaymentProcessor':
161 $ret['content'] = ts('Are you sure you want to disable this payment processor?') . ' <br/><br/>' . ts('Users will no longer be able to select this value when adding or editing transaction pages.');
164 case 'CRM_Financial_BAO_PaymentProcessorType':
165 $ret['content'] = ts('Are you sure you want to disable this payment processor type?');
168 case 'CRM_Core_BAO_LocationType':
169 $ret['content'] = ts('Are you sure you want to disable this location type?') . ' <br/><br/>' . ts('Users will no longer be able to select this value when adding or editing contact locations.');
172 case 'CRM_Event_BAO_ParticipantStatusType':
173 $ret['content'] = ts('Are you sure you want to disable this Participant Status?') . '<br/><br/> ' . ts('Users will no longer be able to select this value when adding or editing Participant Status.');
176 case 'CRM_Mailing_BAO_Component':
177 $ret['content'] = ts('Are you sure you want to disable this component?');
180 case 'CRM_Core_BAO_CustomField':
181 $ret['content'] = ts('Are you sure you want to disable this custom data field?');
184 case 'CRM_Core_BAO_CustomGroup':
185 $ret['content'] = ts('Are you sure you want to disable this custom data group? Any profile fields that are linked to custom fields of this group will be disabled.');
188 case 'CRM_Core_BAO_MessageTemplate':
189 $ret['content'] = ts('Are you sure you want to disable this message tempate?');
192 case 'CRM_ACL_BAO_ACL':
193 $ret['content'] = ts('Are you sure you want to disable this ACL?');
196 case 'CRM_ACL_BAO_EntityRole':
197 $ret['content'] = ts('Are you sure you want to disable this ACL Role Assignment?');
200 case 'CRM_Member_BAO_MembershipType':
201 $ret['content'] = ts('Are you sure you want to disable this membership type?');
204 case 'CRM_Member_BAO_MembershipStatus':
205 $ret['content'] = ts('Are you sure you want to disable this membership status rule?');
208 case 'CRM_Price_BAO_PriceField':
209 $ret['content'] = ts('Are you sure you want to disable this price field?');
212 case 'CRM_Contact_BAO_Group':
213 $ret['content'] = ts('Are you sure you want to disable this Group?');
216 case 'CRM_Core_BAO_OptionGroup':
217 $ret['content'] = ts('Are you sure you want to disable this Option?');
220 case 'CRM_Contact_BAO_ContactType':
221 $ret['content'] = ts('Are you sure you want to disable this Contact Type?');
224 case 'CRM_Core_BAO_OptionValue':
225 $label = CRM_Core_DAO
::getFieldValue('CRM_Core_DAO_OptionValue', $recordID, 'label');
226 $ret['content'] = ts('Are you sure you want to disable the \'%1\' option ?', array(1 => $label));
227 $ret['content'] .= '<br /><br />' . ts('WARNING - Disabling an option which has been assigned to existing records will result in that option being cleared when the record is edited.');
230 case 'CRM_Contribute_BAO_ContributionRecur':
231 $recurDetails = CRM_Contribute_BAO_ContributionRecur
::getSubscriptionDetails($recordID);
232 $ret['content'] = ts('Are you sure you want to mark this recurring contribution as cancelled?');
233 $ret['content'] .= '<br /><br /><strong>' . ts('WARNING - This action sets the CiviCRM recurring contribution status to Cancelled, but does NOT send a cancellation request to the payment processor. You will need to ensure that this recurring payment (subscription) is cancelled by the payment processor.') . '</strong>';
234 if ($recurDetails->membership_id
) {
235 $ret['content'] .= '<br /><br /><strong>' . ts('This recurring contribution is linked to an auto-renew membership. If you cancel it, the associated membership will no longer renew automatically. However, the current membership status will not be affected.') . '</strong>';
240 $ret['content'] = ts('Are you sure you want to disable this record?');
245 $ret = array('status' => 'error', 'content' => 'Error: Unknown entity type.', 'illegal' => TRUE);
247 CRM_Core_Page_AJAX
::returnJsonResponse($ret);
250 static function mergeTagList() {
251 $name = CRM_Utils_Type
::escape($_GET['term'], 'String');
252 $fromId = CRM_Utils_Type
::escape($_GET['fromId'], 'Integer');
253 $limit = CRM_Core_BAO_Setting
::getItem(CRM_Core_BAO_Setting
::SYSTEM_PREFERENCES_NAME
, 'search_autocomplete_count', NULL, 10);
255 // build used-for clause to be used in main query
256 $usedForTagA = CRM_Core_DAO
::getFieldValue('CRM_Core_DAO_Tag', $fromId, 'used_for');
257 $usedForClause = array();
259 $usedForTagA = explode(",", $usedForTagA);
260 foreach ($usedForTagA as $key => $value) {
261 $usedForClause[] = "t1.used_for LIKE '%{$value}%'";
264 $usedForClause = !empty($usedForClause) ?
implode(' OR ', $usedForClause) : '1';
267 // query to list mergable tags
269 SELECT t1.name, t1.id, t1.used_for, t2.name as parent
271 LEFT JOIN civicrm_tag t2 ON t1.parent_id = t2.id
272 WHERE t1.id <> {$fromId} AND
273 t1.name LIKE '%{$name}%' AND
276 $dao = CRM_Core_DAO
::executeQuery($query);
279 while ($dao->fetch()) {
282 'text' => ($dao->parent ?
"{$dao->parent} :: " : '') . $dao->name
,
284 // Add warning about used_for types
285 if (!empty($dao->used_for
)) {
286 $usedForTagB = explode(',', $dao->used_for
);
288 $usedForDiff = array_diff($usedForTagA, $usedForTagB);
289 if (!empty($usedForDiff)) {
290 $row['warning'] = TRUE;
295 print json_encode($result);
296 CRM_Utils_System
::civiExit();
299 function mappingList() {
300 $params = array('mappingID');
301 foreach ($params as $param) {
302 $
$param = CRM_Utils_Array
::value($param, $_POST);
306 echo json_encode(array('error_msg' => 'required params missing.'));
307 CRM_Utils_System
::civiExit();
310 $selectionOptions = CRM_Core_BAO_ActionSchedule
::getSelection1($mappingID);
311 extract($selectionOptions);
314 foreach ($sel4 as $id => $name) {
321 echo json_encode($elements);
322 CRM_Utils_System
::civiExit();
325 function mappingList1() {
326 $params = array('mappingID');
327 foreach ($params as $param) {
328 $
$param = CRM_Utils_Array
::value($param, $_POST);
332 echo json_encode(array('error_msg' => 'required params missing.'));
333 CRM_Utils_System
::civiExit();
336 $selectionOptions = CRM_Core_BAO_ActionSchedule
::getSelection1($mappingID);
337 extract($selectionOptions);
340 foreach ($sel5 as $id => $name) {
341 $elements['sel5'][] = array(
346 $elements['recipientMapping'] = $recipientMapping;
348 echo json_encode($elements);
349 CRM_Utils_System
::civiExit();
352 static function mergeTags() {
353 $tagAId = CRM_Utils_Type
::escape($_POST['fromId'], 'Integer');
354 $tagBId = CRM_Utils_Type
::escape($_POST['toId'], 'Integer');
356 $result = CRM_Core_BAO_EntityTag
::mergeTags($tagAId, $tagBId);
358 if (!empty($result['tagB_used_for'])) {
359 $usedFor = CRM_Core_OptionGroup
::values('tag_used_for');
360 foreach ($result['tagB_used_for'] as & $val) {
361 $val = $usedFor[$val];
363 $result['tagB_used_for'] = implode(', ', $result['tagB_used_for']);
366 $result['message'] = ts('"%1" has been merged with "%2". All records previously tagged "%1" are now tagged "%2".',
367 array(1 => $result['tagA'], 2 => $result['tagB'])
370 echo json_encode($result);
371 CRM_Utils_System
::civiExit();
374 function recipient() {
375 $params = array('recipient');
376 foreach ($params as $param) {
377 $
$param = CRM_Utils_Array
::value($param, $_POST);
381 echo json_encode(array('error_msg' => 'required params missing.'));
382 CRM_Utils_System
::civiExit();
385 switch ($recipient) {
386 case 'Participant Status':
387 $values = CRM_Event_PseudoConstant
::participantStatus();
390 case 'participant_role':
391 $values = CRM_Event_PseudoConstant
::participantRole();
399 foreach ($values as $id => $name) {
406 echo json_encode($elements);
407 CRM_Utils_System
::civiExit();