3 +--------------------------------------------------------------------+
4 | CiviCRM version 4.4 |
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 is to build the form for deleting a Survey
39 class CRM_Campaign_Form_Survey_Delete
extends CRM_Core_Form
{
42 * The id of the object being deleted
53 protected $_surveyTitle;
57 * Function to set variables up before form is built
62 public function preProcess() {
63 if (!CRM_Campaign_BAO_Campaign
::accessCampaign()) {
64 CRM_Utils_System
::permissionDenied();
67 $this->_surveyId
= CRM_Utils_Request
::retrieve('id', 'Positive', $this, FALSE);
68 $params = array('id' => $this->_surveyId
);
69 CRM_Campaign_BAO_Survey
::retrieve($params, $surveyInfo);
70 $this->_surveyTitle
= $surveyInfo['title'];
71 $this->assign('surveyTitle', $this->_surveyTitle
);
72 CRM_Utils_System
::setTitle(ts('Delete Survey') . ' - ' . $this->_surveyTitle
);
76 * Function to actually build the form
81 public function buildQuickForm() {
82 $this->addButtons(array(
85 'name' => ts('Delete'),
90 'name' => ts('Cancel'),
97 * Process the form when submitted
102 public function postProcess() {
103 if ($this->_surveyId
) {
104 CRM_Campaign_BAO_Survey
::del($this->_surveyId
);
105 CRM_Core_Session
::setStatus('', ts("'%1' survey has been deleted.", array(1 => $this->_surveyTitle
)), 'success');
106 CRM_Utils_System
::redirect(CRM_Utils_System
::url('civicrm/campaign', 'reset=1&subPage=survey'));
108 CRM_Core_Error
::fatal(ts('Delete action is missing expected survey ID.'));