3 +--------------------------------------------------------------------+
4 | CiviCRM version 4.6 |
5 +--------------------------------------------------------------------+
6 | Copyright CiviCRM LLC (c) 2004-2014 |
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-2014
37 * This class is to build the form for Deleting Group
39 class CRM_Custom_Form_DeleteGroup
extends CRM_Core_Form
{
49 * The title of the group being deleted
56 * Set up variables to build the form
61 public function preProcess() {
62 $this->_id
= $this->get('id');
65 $params = array('id' => $this->_id
);
66 CRM_Core_BAO_CustomGroup
::retrieve($params, $defaults);
67 $this->_title
= $defaults['title'];
69 //check wheter this contain any custom fields
70 $customField = new CRM_Core_DAO_CustomField();
71 $customField->custom_group_id
= $this->_id
;
73 if ($customField->find(TRUE)) {
74 CRM_Core_Session
::setStatus(ts("The Group '%1' cannot be deleted! You must Delete all custom fields in this group prior to deleting the group.", array(1 => $this->_title
)), ts('Deletion Error'), 'error');
75 $url = CRM_Utils_System
::url('civicrm/admin/custom/group', "reset=1");
76 CRM_Utils_System
::redirect($url);
79 $this->assign('title', $this->_title
);
81 CRM_Utils_System
::setTitle(ts('Confirm Custom Group Delete'));
85 * Build the form object
89 public function buildQuickForm() {
91 $this->addButtons(array(
94 'name' => ts('Delete Custom Group'),
99 'name' => ts('Cancel'),
106 * Process the form when submitted
110 public function postProcess() {
111 $group = new CRM_Core_DAO_CustomGroup();
112 $group->id
= $this->_id
;
115 $wt = CRM_Utils_Weight
::delWeight('CRM_Core_DAO_CustomGroup', $this->_id
);
116 CRM_Core_BAO_CustomGroup
::deleteGroup($group);
117 CRM_Core_Session
::setStatus(ts("The Group '%1' has been deleted.", array(1 => $group->title
)), '', 'success');