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 * Page for displaying list of contact Subtypes
39 class CRM_Admin_Page_ContactType
extends CRM_Core_Page_Basic
{
42 * The action links that we need to display for the browse screen
47 static $_links = NULL;
52 * @return string Classname of BAO.
54 function getBAOName() {
55 return 'CRM_Contact_BAO_ContactType';
61 * @return array (reference) of action links
64 if (!(self
::$_links)) {
65 self
::$_links = array(
66 CRM_Core_Action
::UPDATE
=>
69 'url' => 'civicrm/admin/options/subtype',
70 'qs' => 'action=update&id=%%id%%&reset=1',
71 'title' => ts('Edit Contact Type'),
73 CRM_Core_Action
::DISABLE
=>
75 'name' => ts('Disable'),
76 'extra' => 'onclick = "enableDisable( %%id%%,\'' .
77 'CRM_Contact_BAO_ContactType' . '\',\'' . 'enable-disable' .
79 'ref' => 'disable-action',
80 'title' => ts('Disable Contact Type'),
82 CRM_Core_Action
::ENABLE
=>
84 'name' => ts('Enable'),
85 'extra' => 'onclick = "enableDisable( %%id%%,\'' .
86 'CRM_Contact_BAO_ContactType' . '\',\'' . 'disable-enable' .
88 'ref' => 'enable-action',
89 'title' => ts('Enable Contact Type'),
91 CRM_Core_Action
::DELETE
=>
93 'name' => ts('Delete'),
94 'url' => 'civicrm/admin/options/subtype',
95 'qs' => 'action=delete&id=%%id%%',
96 'title' => ts('Delete Contact Type'),
100 return self
::$_links;
104 $action = CRM_Utils_Request
::retrieve('action', 'String', $this, FALSE, 0);
105 $this->assign('action', $action);
106 $id = CRM_Utils_Request
::retrieve('id', 'Positive', $this, FALSE, 0);
110 return parent
::run();
114 $rows = CRM_Contact_BAO_ContactType
::contactTypeInfo(TRUE);
115 foreach ($rows as $key => $value) {
117 if (CRM_Utils_Array
::value('is_reserved', $value)) {
118 $mask = CRM_Core_Action
::UPDATE
;
121 $mask -= CRM_Core_Action
::DELETE
- 2;
122 if (CRM_Utils_Array
::value('is_active', $value)) {
123 $mask -= CRM_Core_Action
::ENABLE
;
126 $mask -= CRM_Core_Action
::DISABLE
;
129 $rows[$key]['action'] = CRM_Core_Action
::formLink(self
::links(), $mask,
130 array('id' => $value['id']),
133 'contactType.manage.action',
138 $this->assign('rows', $rows);
142 * Get name of edit form
144 * @return string Classname of edit form.
146 function editForm() {
147 return 'CRM_Admin_Form_ContactType';
153 * @return string name of this page.
155 function editName() {
156 return 'Contact Types';
162 * @return string user context.
164 function userContext($mode = NULL) {
165 return 'civicrm/admin/options/subtype';