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 * Main page for viewing contact.
40 class CRM_Contact_Page_View_Summary
extends CRM_Contact_Page_View
{
43 * Heart of the viewing process. The runner gets all the meta data for
44 * the contact and calls the appropriate type of page to view.
50 function preProcess() {
53 // actions buttom contextMenu
54 $menuItems = CRM_Contact_BAO_Contact
::contextMenu($this->_contactId
);
56 $this->assign('actionsMenuList', $menuItems);
58 //retrieve inline custom data
59 $entityType = $this->get('contactType');
60 if ($entitySubType = $this->get('contactSubtype')) {
61 $entitySubType = explode(CRM_Core_DAO
::VALUE_SEPARATOR
,
62 trim($entitySubType, CRM_Core_DAO
::VALUE_SEPARATOR
)
65 $groupTree = &CRM_Core_BAO_CustomGroup
::getTree($entityType,
72 CRM_Core_BAO_CustomGroup
::buildCustomDataView($this,
76 // also create the form element for the activity links box
77 $controller = new CRM_Core_Controller_Simple(
78 'CRM_Activity_Form_ActivityLinks',
85 $controller->setEmbedded(TRUE);
90 * Heart of the viewing process. The runner gets all the meta data for
91 * the contact and calls the appropriate type of page to view.
100 if ($this->_action
& CRM_Core_Action
::UPDATE
) {
107 return parent
::run();
111 * Edit name and address of a contact
117 // set the userContext stack
118 $session = CRM_Core_Session
::singleton();
119 $url = CRM_Utils_System
::url('civicrm/contact/view', 'reset=1&cid=' . $this->_contactId
);
120 $session->pushUserContext($url);
122 $controller = new CRM_Core_Controller_Simple('CRM_Contact_Form_Contact', ts('Contact Page'), CRM_Core_Action
::UPDATE
);
123 $controller->setEmbedded(TRUE);
124 $controller->process();
125 return $controller->run();
129 * View summary details of a contact
135 // Add js for tabs, in-place editing, and jstree for tags
136 CRM_Core_Resources
::singleton()
137 ->addScriptFile('civicrm', 'templates/CRM/Contact/Page/View/Summary.js')
138 ->addScriptFile('civicrm', 'packages/jquery/plugins/jstree/jquery.jstree.js', 0, 'html-header', FALSE)
139 ->addStyleFile('civicrm', 'packages/jquery/plugins/jstree/themes/default/style.css', 0, 'html-header')
140 ->addScriptFile('civicrm', 'templates/CRM/common/TabHeader.js')
142 'summaryPrint' => array('mode' => $this->_print
),
143 'tabSettings' => array('active' => CRM_Utils_Request
::retrieve('selectedChild', 'String', $this, FALSE, 'summary')),
145 $this->assign('summaryPrint', $this->_print
);
146 $session = CRM_Core_Session
::singleton();
147 $url = CRM_Utils_System
::url('civicrm/contact/view', 'reset=1&cid=' . $this->_contactId
);
148 $session->pushUserContext($url);
154 $params['id'] = $params['contact_id'] = $this->_contactId
;
155 $params['noRelationships'] = $params['noNotes'] = $params['noGroups'] = TRUE;
156 $contact = CRM_Contact_BAO_Contact
::retrieve($params, $defaults, TRUE);
158 $communicationType = array(
160 'type' => 'phoneType',
161 'id' => 'phone_type',
162 'daoName' => 'CRM_Core_DAO_Phone',
163 'fieldName' => 'phone_type_id',
166 'type' => 'IMProvider',
168 'daoName' => 'CRM_Core_DAO_IM',
169 'fieldName' => 'provider_id',
172 'type' => 'websiteType',
173 'id' => 'website_type',
174 'daoName' => 'CRM_Core_DAO_Website',
175 'fieldName' => 'website_type_id',
177 'address' => array('skip' => TRUE, 'customData' => 1),
178 'email' => array('skip' => TRUE),
179 'openid' => array('skip' => TRUE),
182 foreach ($communicationType as $key => $value) {
183 if (!empty($defaults[$key])) {
184 foreach ($defaults[$key] as & $val) {
185 CRM_Utils_Array
::lookupValue($val, 'location_type', CRM_Core_PseudoConstant
::get('CRM_Core_DAO_Address', 'location_type_id', array('labelColumn' => 'display_name')), FALSE);
186 if (empty($value['skip'])) {
187 $daoName = $value['daoName'];
188 $pseudoConst = $daoName::buildOptions($value['fieldName'], 'get');
189 CRM_Utils_Array
::lookupValue($val, $value['id'], $pseudoConst, FALSE);
192 if (isset($value['customData'])) {
193 foreach ($defaults[$key] as $blockId => $blockVal) {
194 $idValue = $blockVal['id'];
195 if ( $key == 'address' ) {
196 if (!empty($blockVal['master_id'])) {
197 $idValue = $blockVal['master_id'];
200 $groupTree = CRM_Core_BAO_CustomGroup
::getTree(ucfirst($key),
204 // we setting the prefix to dnc_ below so that we don't overwrite smarty's grouptree var.
205 $defaults[$key][$blockId]['custom'] = CRM_Core_BAO_CustomGroup
::buildCustomDataView($this, $groupTree, FALSE, NULL, "dnc_");
207 // reset template variable since that won't be of any use, and could be misleading
208 $this->assign("dnc_viewCustomData", NULL);
213 if (!empty($defaults['gender_id'])) {
214 $defaults['gender_display'] = CRM_Core_PseudoConstant
::getLabel('CRM_Contact_DAO_Contact', 'gender_id', $defaults['gender_id']);
217 $communicationStyle = CRM_Core_PseudoConstant
::get('CRM_Contact_DAO_Contact', 'communication_style_id');
218 if (!empty($communicationStyle)) {
219 if (!empty($defaults['communication_style_id'])) {
220 $defaults['communication_style_display'] = $communicationStyle[CRM_Utils_Array
::value('communication_style_id', $defaults)];
223 // Make sure the field is displayed as long as it is active, even if it is unset for this contact.
224 $defaults['communication_style_display'] = '';
228 // to make contact type label available in the template -
229 $contactType = array_key_exists('contact_sub_type', $defaults) ?
$defaults['contact_sub_type'] : $defaults['contact_type'];
230 $defaults['contact_type_label'] = CRM_Contact_BAO_ContactType
::contactTypePairs(TRUE, $contactType, ', ');
233 $contactTags = CRM_Core_BAO_EntityTag
::getContactTags($this->_contactId
);
235 if (!empty($contactTags)) {
236 $defaults['contactTag'] = implode(', ', $contactTags);
239 $defaults['privacy_values'] = CRM_Core_SelectValues
::privacy();
241 //Show blocks only if they are visible in edit form
242 $this->_editOptions
= CRM_Core_BAO_Setting
::valueOptions(
243 CRM_Core_BAO_Setting
::SYSTEM_PREFERENCES_NAME
,
244 'contact_edit_options'
247 foreach ($this->_editOptions
as $blockName => $value) {
248 $varName = '_show' . $blockName;
249 $this->$varName = $value;
250 $this->assign(substr($varName, 1), $this->$varName);
253 // get contact name of shared contact names
254 $sharedAddresses = array();
255 $shareAddressContactNames = CRM_Contact_BAO_Contact_Utils
::getAddressShareContactNames($defaults['address']);
256 foreach ($defaults['address'] as $key => $addressValue) {
257 if (!empty($addressValue['master_id']) &&
258 !$shareAddressContactNames[$addressValue['master_id']]['is_deleted']
260 $sharedAddresses[$key]['shared_address_display'] = array(
261 'address' => $addressValue['display'],
262 'name' => $shareAddressContactNames[$addressValue['master_id']]['name'],
266 $this->assign('sharedAddresses', $sharedAddresses);
268 //get the current employer name
269 if (CRM_Utils_Array
::value('contact_type', $defaults) == 'Individual') {
270 if ($contact->employer_id
&& $contact->organization_name
) {
271 $defaults['current_employer'] = $contact->organization_name
;
272 $defaults['current_employer_id'] = $contact->employer_id
;
275 //for birthdate format with respect to birth format set
276 $this->assign('birthDateViewFormat', CRM_Utils_Array
::value('qfMapping', CRM_Utils_Date
::checkBirthDateFormat()));
279 $defaults['external_identifier'] = $contact->external_identifier
;
280 $this->assign($defaults);
282 // FIXME: when we sort out TZ isssues with DATETIME/TIMESTAMP, we can skip next query
283 // also assign the last modifed details
284 $lastModified = CRM_Core_BAO_Log
::lastModified($this->_contactId
, 'civicrm_contact');
285 $this->assign_by_ref('lastModified', $lastModified);
290 $this->_viewOptions
= CRM_Core_BAO_Setting
::valueOptions(
291 CRM_Core_BAO_Setting
::SYSTEM_PREFERENCES_NAME
,
292 'contact_view_options',
296 // show the tabs only if user has generic access to CiviCRM
297 $accessCiviCRM = CRM_Core_Permission
::check('access CiviCRM');
299 $changeLog = $this->_viewOptions
['log'];
300 $this->assign_by_ref('changeLog', $changeLog);
301 $components = CRM_Core_Component
::getEnabledComponents();
303 foreach ($components as $name => $component) {
304 if (!empty($this->_viewOptions
[$name]) &&
305 CRM_Core_Permission
::access($component->name
)
307 $elem = $component->registerTab();
309 // FIXME: not very elegant, probably needs better approach
310 // allow explicit id, if not defined, use keyword instead
311 if (array_key_exists('id', $elem)) {
315 $i = $component->getKeyword();
319 //appending isTest to url for test soft credit CRM-3891.
320 //FIXME: hack ajax url.
321 $q = "reset=1&force=1&cid={$this->_contactId}";
322 if (CRM_Utils_Request
::retrieve('isTest', 'Positive', $this)) {
327 'url' => CRM_Utils_System
::url("civicrm/contact/view/$u", $q),
328 'title' => $elem['title'],
329 'weight' => $elem['weight'],
330 'count' => CRM_Contact_BAO_Contact
::getCountComponent($u, $this->_contactId
),
331 'class' => 'livePage',
333 // make sure to get maximum weight, rest of tabs go after
334 // FIXME: not very elegant again
335 if ($weight < $elem['weight']) {
336 $weight = $elem['weight'];
343 'title' => ts('Activities'),
344 'class' => 'livePage',
347 'title' => ts('Relationships'),
348 'class' => 'livePage',
351 'title' => ts('Groups'),
352 'class' => 'ajaxForm',
355 'title' => ts('Notes'),
356 'class' => 'livePage',
359 'title' => ts('Tags'),
362 'title' => ts('Change Log'),
366 foreach ($rest as $k => $v) {
367 if ($accessCiviCRM && !empty($this->_viewOptions
[$k])) {
368 $allTabs[] = $v +
array(
370 'url' => CRM_Utils_System
::url(
371 "civicrm/contact/view/$k",
372 "reset=1&cid={$this->_contactId}"
375 'count' => CRM_Contact_BAO_Contact
::getCountComponent($k, $this->_contactId
),
381 // now add all the custom tabs
382 $entityType = $this->get('contactType');
383 $activeGroups = CRM_Core_BAO_CustomGroup
::getActiveGroups(
385 'civicrm/contact/view/cd',
389 foreach ($activeGroups as $group) {
390 $id = "custom_{$group['id']}";
393 'url' => CRM_Utils_System
::url($group['path'], $group['query'] . "&selectedChild=$id"),
394 'title' => $group['title'],
396 'count' => CRM_Contact_BAO_Contact
::getCountComponent($id, $this->_contactId
, $group['table_name']),
401 // see if any other modules want to add any tabs
402 CRM_Utils_Hook
::tabs($allTabs, $this->_contactId
);
404 // now sort the tabs based on weight
405 usort($allTabs, array('CRM_Utils_Sort', 'cmpFunc'));
407 $this->assign('allTabs', $allTabs);
409 // hook for contact summary
410 // ignored but needed to prevent warnings
411 $contentPlacement = CRM_Utils_Hook
::SUMMARY_BELOW
;
412 CRM_Utils_Hook
::summary($this->_contactId
, $content, $contentPlacement);
414 $this->assign_by_ref('hookContent', $content);
415 $this->assign('hookContentPlacement', $contentPlacement);
419 function getTemplateFileName() {
420 if ($this->_contactId
) {
421 $contactSubtypes = $this->get('contactSubtype') ?
422 explode(CRM_Core_DAO
::VALUE_SEPARATOR
, $this->get('contactSubtype')) : array();
424 // there could be multiple subtypes. We check templates for each of the subtype, and return the first one found.
425 foreach ($contactSubtypes as $csType) {
427 $templateFile = "CRM/Contact/Page/View/SubType/{$csType}.tpl";
428 $template = CRM_Core_Page
::getTemplate();
429 if ($template->template_exists($templateFile)) {
430 return $templateFile;
435 return parent
::getTemplateFileName();