3 +--------------------------------------------------------------------+
4 | CiviCRM version 4.3 |
5 +--------------------------------------------------------------------+
6 | Copyright CiviCRM LLC (c) 2004-2013 |
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-2013
37 * This class generates form components for adding a petition
41 class CRM_Campaign_Form_Petition
extends CRM_Core_Form
{
49 public function preProcess() {
50 if (!CRM_Campaign_BAO_Campaign
::accessCampaign()) {
51 CRM_Utils_System
::permissionDenied();
54 $this->_context
= CRM_Utils_Request
::retrieve('context', 'String', $this);
56 $this->assign('context', $this->_context
);
58 $this->_action
= CRM_Utils_Request
::retrieve('action', 'String', $this);
60 if ($this->_action
& (CRM_Core_Action
::UPDATE | CRM_Core_Action
::DELETE
)) {
61 $this->_surveyId
= CRM_Utils_Request
::retrieve('id', 'Positive', $this, TRUE);
63 if ($this->_action
& CRM_Core_Action
::UPDATE
) {
64 CRM_Utils_System
::setTitle(ts('Edit Survey'));
67 CRM_Utils_System
::setTitle(ts('Delete Survey'));
71 $this->_cdType
= CRM_Utils_Array
::value('type', $_GET);
72 $this->assign('cdType', FALSE);
74 $this->assign('cdType', TRUE);
75 return CRM_Custom_Form_CustomData
::preProcess($this);
78 // when custom data is included in this page
79 if (CRM_Utils_Array
::value('hidden_custom', $_POST)) {
80 CRM_Custom_Form_CustomData
::preProcess($this);
81 CRM_Custom_Form_CustomData
::buildQuickForm($this);
84 $session = CRM_Core_Session
::singleton();
85 $url = CRM_Utils_System
::url('civicrm/campaign', 'reset=1&subPage=survey');
86 $session->pushUserContext($url);
88 $this->_values
= $this->get('values');
90 if (!is_array($this->_values
)) {
91 $this->_values
= array();
92 if ($this->_surveyId
) {
93 $params = array('id' => $this->_surveyId
);
94 CRM_Campaign_BAO_Survey
::retrieve($params, $this->_values
);
96 $this->set('values', $this->_values
);
99 $this->assign('action', $this->_action
);
100 $this->assign('surveyId', $this->_surveyId
);
102 $this->assign('entityID', $this->_surveyId
);
104 if ($this->_action
& (CRM_Core_Action
::UPDATE | CRM_Core_Action
::DELETE
)) {
105 $this->_surveyId
= CRM_Utils_Request
::retrieve('id', 'Positive', $this, TRUE);
107 if ($this->_action
& CRM_Core_Action
::UPDATE
) {
108 CRM_Utils_System
::setTitle(ts('Edit Petition'));
111 CRM_Utils_System
::setTitle(ts('Delete Petition'));
115 $session = CRM_Core_Session
::singleton();
116 $url = CRM_Utils_System
::url('civicrm/campaign', 'reset=1&subPage=petition');
117 $session->pushUserContext($url);
119 CRM_Utils_System
::appendBreadCrumb(array(array('title' => ts('Petition Dashboard'), 'url' => $url)));
123 * This function sets the default values for the form. Note that in edit/view mode
124 * the default values are retrieved from the database
128 * @return array array of default values
131 function setDefaultValues() {
132 $defaults = $this->_values
;
134 $ufContactJoinParams = array(
135 'entity_table' => 'civicrm_survey',
136 'entity_id' => $this->_surveyId
,
140 if ($ufContactGroupId = CRM_Core_BAO_UFJoin
::findUFGroupId($ufContactJoinParams)) {
141 $defaults['contact_profile_id'] = $ufContactGroupId;
143 $ufActivityJoinParams = array(
144 'entity_table' => 'civicrm_survey',
145 'entity_id' => $this->_surveyId
,
149 if ($ufActivityGroupId = CRM_Core_BAO_UFJoin
::findUFGroupId($ufActivityJoinParams)) {
150 $defaults['profile_id'] = $ufActivityGroupId;
153 if (!isset($defaults['is_active'])) {
154 $defaults['is_active'] = 1;
157 $defaultSurveys = CRM_Campaign_BAO_Survey
::getSurveys(TRUE, TRUE);
158 if (!isset($defaults['is_default']) && empty($defaultSurveys)) {
159 $defaults['is_default'] = 1;
166 public function buildQuickForm() {
168 if ($this->_action
& CRM_Core_Action
::DELETE
) {
173 'name' => ts('Delete'),
178 'name' => ts('Cancel'),
185 $this->add('text', 'title', ts('Petition Title'), CRM_Core_DAO
::getAttribute('CRM_Campaign_DAO_Survey', 'title'), TRUE);
187 $attributes = CRM_Core_DAO
::getAttribute('CRM_Campaign_DAO_Survey');
189 $petitionTypeID = CRM_Core_OptionGroup
::getValue('activity_type', 'petition', 'name');
190 $this->addElement('hidden', 'activity_type_id', $petitionTypeID);
192 // script / instructions / description of petition purpose
193 $this->addWysiwyg('instructions', ts('Introduction'), $attributes['instructions']);
196 $campaigns = CRM_Campaign_BAO_Campaign
::getCampaigns(CRM_Utils_Array
::value('campaign_id', $this->_values
));
197 $this->add('select', 'campaign_id', ts('Campaign'), array('' => ts('- select -')) +
$campaigns);
199 $customContactProfiles = CRM_Core_BAO_UFGroup
::getProfiles(array('Individual'));
201 $this->add('select', 'contact_profile_id', ts('Contact Profile'),
203 '' => ts('- select -')) +
$customContactProfiles, TRUE
206 $customProfiles = CRM_Core_BAO_UFGroup
::getProfiles(array('Activity'));
208 $this->add('select', 'profile_id', ts('Activity Profile'),
210 '' => ts('- select -')
214 // thank you title and text (html allowed in text)
215 $this->add('text', 'thankyou_title', ts('Thank-you Page Title'), CRM_Core_DAO
::getAttribute('CRM_Campaign_DAO_Survey', 'thankyou_title'));
216 $this->addWysiwyg('thankyou_text', ts('Thank-you Message'), CRM_Core_DAO
::getAttribute('CRM_Campaign_DAO_Survey', 'thankyou_text'));
218 // bypass email confirmation?
219 $this->add('checkbox', 'bypass_confirm', ts('Bypass email confirmation'));
221 //is share through social media
222 $this->addElement('checkbox', 'is_share', ts('Allow sharing through social media?'));
225 $this->add('checkbox', 'is_active', ts('Is Active?'));
228 $this->add('checkbox', 'is_default', ts('Is Default?'));
235 'name' => ts('Save'),
240 'name' => ts('Save and New'),
245 'name' => ts('Cancel'),
250 // add a form rule to check default value
251 $this->addFormRule(array('CRM_Campaign_Form_Petition', 'formRule'), $this);
255 * global validation rules for the form
258 static function formRule($fields, $files, $form) {
260 // Petitions should be unique by: title, campaign ID (if assigned) and activity type ID
261 // NOTE: This class is called for both Petition create / update AND for Survey Results tab, but this rule is only for Petition.
262 $where = array('activity_type_id = %1', 'title = %2');
264 1 => array($fields['activity_type_id'], 'Integer'),
265 2 => array($fields['title'], 'String'),
267 $uniqueRule = ts('activity type');
269 if (empty($fields['campaign_id'])) {
270 $where[] = 'campaign_id IS NULL';
272 $where[] = 'campaign_id = %3';
273 $params[3] = array($fields['campaign_id'], 'Integer');
274 $uniqueRule = ts('campaign and activity type');
277 // Exclude current Petition row if UPDATE.
278 if ($form->_surveyId
) {
279 $where[] = 'id != %4';
280 $params[4] = array($form->_surveyId
, 'Integer');
283 $whereClause = implode(' AND ', $where);
286 SELECT COUNT(*) AS row_count
291 $result = CRM_Core_DAO
::singleValueQuery($query, $params);
293 $errors['title'] = ts('This title is already associated with the selected %1. Please specify a unique title.', array(1 => $uniqueRule));
295 return empty($errors) ?
TRUE : $errors;
299 public function postProcess() {
300 // store the submitted values in an array
301 $params = $this->controller
->exportValues($this->_name
);
303 $session = CRM_Core_Session
::singleton();
305 $params['last_modified_id'] = $session->get('userID');
306 $params['last_modified_date'] = date('YmdHis');
307 $params['is_share'] = CRM_Utils_Array
::value('is_share', $params, FALSE);
309 if ($this->_surveyId
) {
311 if ($this->_action
& CRM_Core_Action
::DELETE
) {
312 CRM_Campaign_BAO_Survey
::del($this->_surveyId
);
313 CRM_Core_Session
::setStatus(ts(' Petition has been deleted.'), ts('Record Deleted'), 'success');
314 $session->replaceUserContext(CRM_Utils_System
::url('civicrm/campaign', 'reset=1&subPage=petition'));
318 $params['id'] = $this->_surveyId
;
321 $params['created_id'] = $session->get('userID');
322 $params['created_date'] = date('YmdHis');
325 $params['bypass_confirm'] = CRM_Utils_Array
::value('bypass_confirm', $params, 0);
326 $params['is_active'] = CRM_Utils_Array
::value('is_active', $params, 0);
327 $params['is_default'] = CRM_Utils_Array
::value('is_default', $params, 0);
329 $surveyId = CRM_Campaign_BAO_Survey
::create($params);
331 // also update the ProfileModule tables
332 $ufJoinParams = array(
334 'module' => 'CiviCampaign',
335 'entity_table' => 'civicrm_survey',
336 'entity_id' => $surveyId->id
,
339 // first delete all past entries
340 if ($this->_surveyId
) {
341 CRM_Core_BAO_UFJoin
::deleteAll($ufJoinParams);
343 if (CRM_Utils_Array
::value('profile_id', $params)) {
344 $ufJoinParams['weight'] = 1;
345 $ufJoinParams['uf_group_id'] = $params['profile_id'];
346 CRM_Core_BAO_UFJoin
::create($ufJoinParams);
349 if (CRM_Utils_Array
::value('contact_profile_id', $params)) {
350 $ufJoinParams['weight'] = 2;
351 $ufJoinParams['uf_group_id'] = $params['contact_profile_id'];
352 CRM_Core_BAO_UFJoin
::create($ufJoinParams);
355 if (!is_a($surveyId, 'CRM_Core_Error')) {
356 CRM_Core_Session
::setStatus(ts('Petition has been saved.'), ts('Saved'), 'success');
359 $buttonName = $this->controller
->getButtonName();
360 if ($buttonName == $this->getButtonName('next', 'new')) {
361 CRM_Core_Session
::setStatus(ts(' You can add another Petition.'), '', 'info');
362 $session->replaceUserContext(CRM_Utils_System
::url('civicrm/petition/add', 'reset=1&action=add'));
365 $session->replaceUserContext(CRM_Utils_System
::url('civicrm/campaign', 'reset=1&subPage=petition'));