7ca43d4a2f94289eaec262a8e9399f0e5a274783
3 +--------------------------------------------------------------------+
5 +--------------------------------------------------------------------+
6 | Copyright CiviCRM LLC (c) 2004-2019 |
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 +--------------------------------------------------------------------+
30 * @copyright CiviCRM LLC (c) 2004-2019
34 * This is a shared parent class for form task actions.
36 abstract class CRM_Core_Form_Task
extends CRM_Core_Form
{
39 * The task being performed
46 * The additional clause that we restrict the search with
50 protected $_componentClause = NULL;
53 * The array that holds all the component ids
57 protected $_componentIds;
65 * The array that holds all the case ids
72 * The array that holds all the contact ids
79 * Must be set to entity table name (eg. civicrm_participant) by child class
83 static $tableName = NULL;
86 * Must be set to entity shortname (eg. event)
90 static $entityShortname = NULL;
93 * Build all the data structures needed to build the form.
95 * @throws \CRM_Core_Exception
97 public function preProcess() {
98 self
::preProcessCommon($this);
102 * Common pre-processing function.
104 * @param CRM_Core_Form_Task $form
106 * @throws \CRM_Core_Exception
108 public static function preProcessCommon(&$form) {
109 $form->_entityIds
= array();
111 $searchFormValues = $form->controller
->exportValues($form->get('searchFormName'));
113 $form->_task
= $searchFormValues['task'];
114 $className = 'CRM_' . ucfirst($form::$entityShortname) . '_Task';
115 $entityTasks = $className::tasks();
116 $form->assign('taskName', $entityTasks[$form->_task
]);
118 $entityIds = array();
119 if ($searchFormValues['radio_ts'] == 'ts_sel') {
120 foreach ($searchFormValues as $name => $value) {
121 if (substr($name, 0, CRM_Core_Form
::CB_PREFIX_LEN
) == CRM_Core_Form
::CB_PREFIX
) {
122 $entityIds[] = substr($name, CRM_Core_Form
::CB_PREFIX_LEN
);
127 $queryParams = $form->get('queryParams');
129 if ($form->get(CRM_Utils_Sort
::SORT_ORDER
)) {
130 $sortOrder = $form->get(CRM_Utils_Sort
::SORT_ORDER
);
133 $query = new CRM_Contact_BAO_Query($queryParams, NULL, NULL, FALSE, FALSE, $form->getQueryMode());
134 $query->_distinctComponentClause
= " ( " . $form::$tableName . ".id )";
135 $query->_groupByComponentClause
= " GROUP BY " . $form::$tableName . ".id ";
136 $result = $query->searchQuery(0, 0, $sortOrder);
137 $selector = $form::$entityShortname . '_id';
138 while ($result->fetch()) {
139 $entityIds[] = $result->$selector;
143 if (!empty($entityIds)) {
144 $form->_componentClause
= ' ' . $form::$tableName . '.id IN ( ' . implode(',', $entityIds) . ' ) ';
145 $form->assign('totalSelected' . ucfirst($form::$entityShortname) . 's', count($entityIds));
148 $form->_entityIds
= $form->_componentIds
= $entityIds;
150 // Some functions (eg. PDF letter tokens) rely on Ids being in specific fields rather than the generic $form->_entityIds
151 // So we set that specific field here (eg. for cases $form->_caseIds = $form->_entityIds).
152 // FIXME: This is really to handle legacy code that should probably be updated to use $form->_entityIds
153 $entitySpecificIdsName = '_' . $form::$entityShortname . 'Ids';
154 $form->$entitySpecificIdsName = $form->_entityIds
;
156 //set the context for redirection for any task actions
157 $qfKey = CRM_Utils_Request
::retrieve('qfKey', 'String', $form);
158 $urlParams = 'force=1';
159 if (CRM_Utils_Rule
::qfKey($qfKey)) {
160 $urlParams .= "&qfKey=$qfKey";
163 $session = CRM_Core_Session
::singleton();
164 $searchFormName = strtolower($form->get('searchFormName'));
165 if ($searchFormName == 'search') {
166 $session->replaceUserContext(CRM_Utils_System
::url('civicrm/' . $form::$entityShortname . '/search', $urlParams));
169 $session->replaceUserContext(CRM_Utils_System
::url("civicrm/contact/search/$searchFormName",
176 * Given the entity id, compute the contact id since its used for things like send email
177 * For example, for cases we need to override this function as the table name is civicrm_case_contact
179 public function setContactIDs() {
180 $this->_contactIds
= CRM_Core_DAO
::getContactIDsFromComponent($this->_entityIds
,
186 * Simple shell that derived classes can call to add buttons to
187 * the form with a customized title for the main Submit
189 * @param string $title
190 * Title of the main button.
191 * @param string $nextType
192 * Button type for the form after processing.
193 * @param string $backType
194 * @param bool $submitOnce
196 public function addDefaultButtons($title, $nextType = 'next', $backType = 'back', $submitOnce = FALSE) {
197 $this->addButtons(array(
205 'name' => ts('Cancel'),
212 * Get the query mode (eg. CRM_Core_BAO_Query::MODE_CASE)
213 * Should be overridden by child classes in most cases
217 public function getQueryMode() {
218 return $this->queryMode ?
: CRM_Contact_BAO_Query
::MODE_CONTACTS
;