CRM/Admin/Page/AJAX.php

   1 <?php
   2 /*
   3  +--------------------------------------------------------------------+
   4  | CiviCRM version 4.7                                                |
   5  +--------------------------------------------------------------------+
   6  | Copyright CiviCRM LLC (c) 2004-2015                                |
   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  +--------------------------------------------------------------------+
  26  */
  27
  28 /**
  29  *
  30  * @package CRM
  31  * @copyright CiviCRM LLC (c) 2004-2015
  32  * $Id$
  33  *
  34  */
  35
  36 /**
  37  * This class contains all the function that are called using AJAX
  38  */
  39 class CRM_Admin_Page_AJAX {
  40
  41   /**
  42    * CRM-12337 Output navigation menu as executable javascript
  43    * @see smarty_function_crmNavigationMenu
  44    */
  45   public static function getNavigationMenu() {
  46     $contactID = CRM_Core_Session::singleton()->get('userID');
  47     if ($contactID) {
  48       CRM_Core_Page_AJAX::setJsHeaders();
  49       print CRM_Core_Smarty::singleton()->fetchWith('CRM/common/navigation.js.tpl', array(
  50         'navigation' => CRM_Core_BAO_Navigation::createNavigation($contactID),
  51       ));
  52     }
  53     CRM_Utils_System::civiExit();
  54   }
  55
  56   /**
  57    * Return menu tree as json data for editing.
  58    */
  59   public static function getNavigationList() {
  60     echo CRM_Core_BAO_Navigation::buildNavigation(TRUE, FALSE);
  61     CRM_Utils_System::civiExit();
  62   }
  63
  64   /**
  65    * Process drag/move action for menu tree
  66    */
  67   public static function menuTree() {
  68     CRM_Core_BAO_Navigation::processNavigation($_GET);
  69   }
  70
  71   /**
  72    * Build status message while.
  73    * enabling/ disabling various objects
  74    */
  75   public static function getStatusMsg() {
  76     require_once 'api/v3/utils.php';
  77     $recordID = CRM_Utils_Type::escape($_GET['id'], 'Integer');
  78     $entity = CRM_Utils_Type::escape($_GET['entity'], 'String');
  79     $ret = array();
  80
  81     if ($recordID && $entity && $recordBAO = _civicrm_api3_get_BAO($entity)) {
  82       switch ($recordBAO) {
  83         case 'CRM_Core_BAO_UFGroup':
  84           $method = 'getUFJoinRecord';
  85           $result = array($recordBAO, $method);
  86           $ufJoin = call_user_func_array(($result), array($recordID, TRUE));
  87           if (!empty($ufJoin)) {
  88             $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?');
  89           }
  90           else {
  91             $ret['content'] = ts('Are you sure you want to disable this profile?');
  92           }
  93           break;
  94
  95         case 'CRM_Price_BAO_PriceSet':
  96           $usedBy = CRM_Price_BAO_PriceSet::getUsedBy($recordID);
  97           $priceSet = CRM_Price_BAO_PriceSet::getTitle($recordID);
  98
  99           if (!CRM_Utils_System::isNull($usedBy)) {
 100             $template = CRM_Core_Smarty::singleton();
 101             $template->assign('usedBy', $usedBy);
 102             $comps = array(
 103               'Event' => 'civicrm_event',
 104               'Contribution' => 'civicrm_contribution_page',
 105               'EventTemplate' => 'civicrm_event_template',
 106             );
 107             $contexts = array();
 108             foreach ($comps as $name => $table) {
 109               if (array_key_exists($table, $usedBy)) {
 110                 $contexts[] = $name;
 111               }
 112             }
 113             $template->assign('contexts', $contexts);
 114
 115             $ret['illegal'] = TRUE;
 116             $table = $template->fetch('CRM/Price/Page/table.tpl');
 117             $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(
 118                 1 => $priceSet,
 119               )) . "<br/> $table";
 120           }
 121           else {
 122             $ret['content'] = ts('Are you sure you want to disable \'%1\' Price Set?', array(1 => $priceSet));
 123           }
 124           break;
 125
 126         case 'CRM_Event_BAO_Event':
 127           $ret['content'] = ts('Are you sure you want to disable this Event?');
 128           break;
 129
 130         case 'CRM_Core_BAO_UFField':
 131           $ret['content'] = ts('Are you sure you want to disable this CiviCRM Profile field?');
 132           break;
 133
 134         case 'CRM_Contribute_BAO_ManagePremiums':
 135           $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.');
 136           break;
 137
 138         case 'CRM_Contact_BAO_Relationship':
 139           $ret['content'] = ts('Are you sure you want to disable this relationship?');
 140           break;
 141
 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.');
 144           break;
 145
 146         case 'CRM_Financial_BAO_FinancialType':
 147           $ret['content'] = ts('Are you sure you want to disable this financial type?');
 148           break;
 149
 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).');
 154           }
 155           else {
 156             $ret['content'] = ts('Are you sure you want to disable this financial account?');
 157           }
 158           break;
 159
 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.');
 162           break;
 163
 164         case 'CRM_Financial_BAO_PaymentProcessorType':
 165           $ret['content'] = ts('Are you sure you want to disable this payment processor type?');
 166           break;
 167
 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.');
 170           break;
 171
 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.');
 174           break;
 175
 176         case 'CRM_Mailing_BAO_Component':
 177           $ret['content'] = ts('Are you sure you want to disable this component?');
 178           break;
 179
 180         case 'CRM_Core_BAO_CustomField':
 181           $ret['content'] = ts('Are you sure you want to disable this custom data field?');
 182           break;
 183
 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.');
 186           break;
 187
 188         case 'CRM_Core_BAO_MessageTemplate':
 189           $ret['content'] = ts('Are you sure you want to disable this message tempate?');
 190           break;
 191
 192         case 'CRM_ACL_BAO_ACL':
 193           $ret['content'] = ts('Are you sure you want to disable this ACL?');
 194           break;
 195
 196         case 'CRM_ACL_BAO_EntityRole':
 197           $ret['content'] = ts('Are you sure you want to disable this ACL Role Assignment?');
 198           break;
 199
 200         case 'CRM_Member_BAO_MembershipType':
 201           $ret['content'] = ts('Are you sure you want to disable this membership type?');
 202           break;
 203
 204         case 'CRM_Member_BAO_MembershipStatus':
 205           $ret['content'] = ts('Are you sure you want to disable this membership status rule?');
 206           break;
 207
 208         case 'CRM_Price_BAO_PriceField':
 209           $ret['content'] = ts('Are you sure you want to disable this price field?');
 210           break;
 211
 212         case 'CRM_Contact_BAO_Group':
 213           $ret['content'] = ts('Are you sure you want to disable this Group?');
 214           break;
 215
 216         case 'CRM_Core_BAO_OptionGroup':
 217           $ret['content'] = ts('Are you sure you want to disable this Option?');
 218           break;
 219
 220         case 'CRM_Contact_BAO_ContactType':
 221           $ret['content'] = ts('Are you sure you want to disable this Contact Type?');
 222           break;
 223
 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.');
 228           break;
 229
 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>';
 236           }
 237           break;
 238
 239         default:
 240           $ret['content'] = ts('Are you sure you want to disable this record?');
 241           break;
 242       }
 243     }
 244     else {
 245       $ret = array('status' => 'error', 'content' => 'Error: Unknown entity type.', 'illegal' => TRUE);
 246     }
 247     CRM_Core_Page_AJAX::returnJsonResponse($ret);
 248   }
 249
 250   public 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);
 254
 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();
 258     if ($usedForTagA) {
 259       $usedForTagA = explode(",", $usedForTagA);
 260       foreach ($usedForTagA as $key => $value) {
 261         $usedForClause[] = "t1.used_for LIKE '%{$value}%'";
 262       }
 263     }
 264     $usedForClause = !empty($usedForClause) ? implode(' OR ', $usedForClause) : '1';
 265     sort($usedForTagA);
 266
 267     // query to list mergable tags
 268     $query = "
 269 SELECT t1.name, t1.id, t1.used_for, t2.name as parent
 270 FROM   civicrm_tag t1
 271 LEFT JOIN civicrm_tag t2 ON t1.parent_id = t2.id
 272 WHERE  t1.id <> {$fromId} AND
 273        t1.name LIKE '%{$name}%' AND
 274        ({$usedForClause})
 275 LIMIT $limit";
 276     $dao = CRM_Core_DAO::executeQuery($query);
 277     $result = array();
 278
 279     while ($dao->fetch()) {
 280       $row = array(
 281         'id' => $dao->id,
 282         'text' => ($dao->parent ? "{$dao->parent} :: " : '') . $dao->name,
 283       );
 284       // Add warning about used_for types
 285       if (!empty($dao->used_for)) {
 286         $usedForTagB = explode(',', $dao->used_for);
 287         sort($usedForTagB);
 288         $usedForDiff = array_diff($usedForTagA, $usedForTagB);
 289         if (!empty($usedForDiff)) {
 290           $row['warning'] = TRUE;
 291         }
 292       }
 293       $result[] = $row;
 294     }
 295     CRM_Utils_JSON::output($result);
 296   }
 297
 298   /**
 299    * Get a list of mappings.
 300    *
 301    * This appears to be only used by scheduled reminders.
 302    */
 303   static public function mappingList() {
 304     if (empty($_GET['mappingID'])) {
 305       CRM_Utils_JSON::output(array('status' => 'error', 'error_msg' => 'required params missing.'));
 306     }
 307
 308     $selectionOptions = CRM_Core_BAO_ActionSchedule::getSelection1($_GET['mappingID'], $_GET['isLimit']);
 309
 310     $output = array(
 311       'sel4' => array(),
 312       'sel5' => array(),
 313       'recipientMapping' => $selectionOptions['recipientMapping'],
 314     );
 315     foreach (array(4, 5) as $sel) {
 316       foreach ($selectionOptions["sel$sel"] as $id => $name) {
 317         $output["sel$sel"][] = array(
 318           'value' => $name,
 319           'key' => $id,
 320         );
 321       }
 322     }
 323
 324     CRM_Utils_JSON::output($output);
 325   }
 326
 327   public static function mergeTags() {
 328     $tagAId = CRM_Utils_Type::escape($_POST['fromId'], 'Integer');
 329     $tagBId = CRM_Utils_Type::escape($_POST['toId'], 'Integer');
 330
 331     $result = CRM_Core_BAO_EntityTag::mergeTags($tagAId, $tagBId);
 332
 333     if (!empty($result['tagB_used_for'])) {
 334       $usedFor = CRM_Core_OptionGroup::values('tag_used_for');
 335       foreach ($result['tagB_used_for'] as & $val) {
 336         $val = $usedFor[$val];
 337       }
 338       $result['tagB_used_for'] = implode(', ', $result['tagB_used_for']);
 339     }
 340
 341     $result['message'] = ts('"%1" has been merged with "%2". All records previously tagged "%1" are now tagged "%2".',
 342       array(1 => $result['tagA'], 2 => $result['tagB'])
 343     );
 344
 345     CRM_Utils_JSON::output($result);
 346   }
 347
 348 }