3 +--------------------------------------------------------------------+
4 | Copyright CiviCRM LLC. All rights reserved. |
6 | This work is published under the GNU AGPLv3 license with some |
7 | permitted exceptions and without any warranty. For full license |
8 | and copyright information, see https://civicrm.org/licensing |
9 +--------------------------------------------------------------------+
13 * Class for grant form task actions.
14 * FIXME: This needs refactoring to properly inherit from CRM_Core_Form_Task and share more functions.
16 class CRM_Grant_Form_Task
extends CRM_Core_Form_Task
{
19 * The array that holds all the grant ids.
26 * Build all the data structures needed to build the form.
32 public function preProcess() {
33 self
::preProcessCommon($this);
37 * @param CRM_Core_Form $form
39 public static function preProcessCommon(&$form) {
40 $form->_grantIds
= [];
42 $values = $form->controller
->exportValues($form->get('searchFormName'));
44 $form->_task
= $values['task'];
45 $tasks = CRM_Grant_Task
::tasks();
46 if (!array_key_exists($form->_task
, $tasks)) {
47 CRM_Core_Error
::statusBounce(ts('You do not have permission to access this page.'));
49 $form->assign('taskName', $tasks[$form->_task
]);
52 if ($values['radio_ts'] == 'ts_sel') {
53 foreach ($values as $name => $value) {
54 if (substr($name, 0, CRM_Core_Form
::CB_PREFIX_LEN
) == CRM_Core_Form
::CB_PREFIX
) {
55 $ids[] = substr($name, CRM_Core_Form
::CB_PREFIX_LEN
);
60 $queryParams = $form->get('queryParams');
62 if ($form->get(CRM_Utils_Sort
::SORT_ORDER
)) {
63 $sortOrder = $form->get(CRM_Utils_Sort
::SORT_ORDER
);
65 $query = new CRM_Contact_BAO_Query($queryParams, NULL, NULL, FALSE, FALSE,
66 CRM_Contact_BAO_Query
::MODE_GRANT
68 $query->_distinctComponentClause
= ' civicrm_grant.id';
69 $query->_groupByComponentClause
= ' GROUP BY civicrm_grant.id ';
70 $result = $query->searchQuery(0, 0, $sortOrder);
71 while ($result->fetch()) {
72 $ids[] = $result->grant_id
;
77 $form->_componentClause
= ' civicrm_grant.id IN ( ' . implode(',', $ids) . ' ) ';
78 $form->assign('totalSelectedGrants', count($ids));
81 $form->_grantIds
= $form->_componentIds
= $ids;
83 //set the context for redirection for any task actions
84 $qfKey = CRM_Utils_Request
::retrieve('qfKey', 'String', $form);
85 $urlParams = 'force=1';
86 if (CRM_Utils_Rule
::qfKey($qfKey)) {
87 $urlParams .= "&qfKey=$qfKey";
90 $session = CRM_Core_Session
::singleton();
91 $session->replaceUserContext(CRM_Utils_System
::url('civicrm/grant/search', $urlParams));
95 * Given the grant id, compute the contact id
96 * since its used for things like send email
98 public function setContactIDs() {
99 $this->_contactIds
= CRM_Core_DAO
::getContactIDsFromComponent($this->_grantIds
,
105 * Simple shell that derived classes can call to add buttons to.
106 * the form with a customized title for the main Submit
108 * @param string $title
109 * Title of the main button.
110 * @param string $nextType
111 * @param string $backType
113 * @param bool $submitOnce
115 public function addDefaultButtons($title, $nextType = 'next', $backType = 'back', $submitOnce = FALSE) {
124 'name' => ts('Cancel'),