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 create activities for a case
40 class CRM_Case_Form_Activity
extends CRM_Activity_Form_Activity
{
43 * The default variable defined
50 * The default case type variable defined
57 * The default values of an activity
61 public $_defaults = array();
64 * The array of releted contact info
68 public $_relatedContacts;
71 * Function to build the form
76 function preProcess() {
77 $this->_caseId
= CRM_Utils_Request
::retrieve('caseid', 'Positive', $this);
78 $this->_context
= CRM_Utils_Request
::retrieve('context', 'String', $this);
79 if (!$this->_context
) {
80 $this->_context
= 'caseActivity';
82 $this->_crmDir
= 'Case';
83 $this->assign('context', $this->_context
);
85 $result = parent
::preProcess();
87 $scheduleStatusId = CRM_Core_OptionGroup
::getValue('activity_status', 'Scheduled', 'name');
88 $this->assign('scheduleStatusId', $scheduleStatusId);
94 if (!$this->_caseId
&& $this->_activityId
) {
95 $this->_caseId
= CRM_Core_DAO
::getFieldValue('CRM_Case_DAO_CaseActivity', $this->_activityId
,
96 'case_id', 'activity_id'
100 $this->assign('caseId', $this->_caseId
);
103 if (!$this->_caseId ||
104 (!$this->_activityId
&& !$this->_activityTypeId
)
106 CRM_Core_Error
::fatal('required params missing.');
109 //check for case activity access.
110 if (!CRM_Case_BAO_Case
::accessCiviCase()) {
111 CRM_Core_Error
::fatal(ts('You are not authorized to access this page.'));
114 if ($this->_caseId
&&
115 !CRM_Core_Permission
::check('access all cases and activities')
117 $session = CRM_Core_Session
::singleton();
118 $allCases = CRM_Case_BAO_Case
::getCases(TRUE, $session->get('userID'), 'any');
119 if (!array_key_exists($this->_caseId
, $allCases)) {
120 CRM_Core_Error
::fatal(ts('You are not authorized to access this page.'));
124 //validate case activity id.
125 if ($this->_activityId
&&
126 ($this->_action
& CRM_Core_Action
::UPDATE
)
128 $valid = CRM_Case_BAO_Case
::checkPermission($this->_activityId
, 'edit',
129 $this->_activityTypeId
132 CRM_Core_Error
::fatal(ts('You are not authorized to access this page.'));
136 $this->_caseType
= CRM_Case_BAO_Case
::getCaseType($this->_caseId
, 'name');
137 $this->assign('caseType', $this->_caseType
);
139 $xmlProcessorProcess = new CRM_Case_XMLProcessor_Process();
140 $isMultiClient = $xmlProcessorProcess->getAllowMultipleCaseClients();
141 $this->assign('multiClient', $isMultiClient);
143 $clients = CRM_Case_BAO_Case
::getContactNames($this->_caseId
);
144 $this->assign('client_names', $clients);
146 // set context for pushUserContext and for statusBounce
147 if ($this->_context
== 'fulltext') {
148 if ($this->_action
== CRM_Core_Action
::UPDATE ||
$this->_action
== CRM_Core_Action
::DELETE
) {
149 $url = CRM_Utils_System
::url('civicrm/contact/view/case',
150 "reset=1&action=view&cid={$this->_currentlyViewedContactId}&id={$this->_caseId}&show=1&context={$this->_context}"
154 $url = CRM_Utils_System
::url('civicrm/contact/search/custom', 'force=1');
158 $url = CRM_Utils_System
::url('civicrm/contact/view/case',
159 "reset=1&action=view&cid={$this->_currentlyViewedContactId}&id={$this->_caseId}&show=1"
162 if (!$this->_activityId
) {
163 $caseTypes = CRM_Case_PseudoConstant
::caseType();
165 if (empty($caseTypes) && ($this->_activityTypeName
== 'Change Case Type') && !$this->_caseId
) {
166 $url = CRM_Utils_System
::url('civicrm/contact/view/case',
167 "reset=1&action=view&cid={$this->_currentlyViewedContactId}&id={$this->_caseId}&show=1"
169 $session = CRM_Core_Session
::singleton();
170 $session->pushUserContext($url);
171 CRM_Core_Error
::statusBounce(ts("You do not have any active Case Types"));
174 // check if activity count is within the limit
175 $xmlProcessor = new CRM_Case_XMLProcessor_Process();
176 $activityInst = $xmlProcessor->getMaxInstance($this->_caseType
);
178 // If not bounce back and also provide activity edit link
179 if (isset($activityInst[$this->_activityTypeName
])) {
180 $activityCount = CRM_Case_BAO_Case
::getCaseActivityCount($this->_caseId
, $this->_activityTypeId
);
181 if ($activityCount >= $activityInst[$this->_activityTypeName
]) {
182 if ($activityInst[$this->_activityTypeName
] == 1) {
183 $atArray = array('activity_type_id' => $this->_activityTypeId
);
184 $activities = CRM_Case_BAO_Case
::getCaseActivity($this->_caseId
,
186 $this->_currentUserId
188 $activities = array_keys($activities);
189 $activities = $activities[0];
190 $editUrl = CRM_Utils_System
::url('civicrm/case/activity',
191 "reset=1&cid={$this->_currentlyViewedContactId}&caseid={$this->_caseId}&action=update&id={$activities}"
194 CRM_Core_Error
::statusBounce(ts("You can not add another '%1' activity to this case. %2",
196 1 => $this->_activityTypeName
,
197 2 => "Do you want to <a href='$editUrl'>edit the existing activity</a> ?"
206 if ($this->_currentlyViewedContactId
) {
207 CRM_Contact_Page_View
::setTitle($this->_currentlyViewedContactId
);
210 $session = CRM_Core_Session
::singleton();
211 $session->pushUserContext($url);
215 * This function sets the default values for the form. For edit/view mode
216 * the default values are retrieved from the database
222 function setDefaultValues() {
223 $this->_defaults
= parent
::setDefaultValues();
224 $targetContactValues = array();
227 $clients = CRM_Case_BAO_Case
::getContactNames($this->_caseId
);
228 if (isset($this->_activityId
) && empty($_POST)) {
229 if (!CRM_Utils_Array
::crmIsEmptyArray($this->_defaults
['target_contact'])) {
230 $targetContactValues = array_combine(array_unique($this->_defaults
['target_contact']),
231 explode(';', trim($this->_defaults
['target_contact_value']))
234 //exclude all clients.
235 foreach ($clients as $clientId => $vals) {
236 if (array_key_exists($clientId, $targetContactValues)) {
237 unset($targetContactValues[$clientId]);
242 $this->assign('targetContactValues', empty($targetContactValues) ?
FALSE : $targetContactValues);
244 //return form for ajax
245 if ($this->_cdType
) {
246 return $this->_defaults
;
249 if (isset($this->_encounterMedium
)) {
250 $this->_defaults
['medium_id'] = $this->_encounterMedium
;
252 elseif (empty($this->_defaults
['medium_id'])) {
253 // set default encounter medium CRM-4816
254 $medium = CRM_Core_OptionGroup
::values('encounter_medium', FALSE, FALSE, FALSE, 'AND is_default = 1');
255 if (count($medium) == 1) {
256 $this->_defaults
['medium_id'] = key($medium);
260 return $this->_defaults
;
263 public function buildQuickForm() {
264 $this->_fields
['source_contact_id']['label'] = ts('Reported By');
265 $this->_fields
['status_id']['attributes'] = array('' => ts('- select -')) + CRM_Core_PseudoConstant
::activityStatus();
267 if ($this->_caseType
) {
268 $xmlProcessor = new CRM_Case_XMLProcessor_Process();
269 $aTypes = $xmlProcessor->get($this->_caseType
, 'ActivityTypes', TRUE);
271 // remove Open Case activity type since we're inside an existing case
272 $openCaseID = CRM_Core_OptionGroup
::getValue('activity_type', 'Open Case', 'name');
273 unset($aTypes[$openCaseID]);
275 $this->_fields
['followup_activity_type_id']['attributes'] = array(
276 '' => '- select activity type -'
280 $result = parent
::buildQuickForm();
282 if ($this->_action
& (CRM_Core_Action
::DELETE | CRM_Core_Action
::DETACH | CRM_Core_Action
::RENEW
)) {
286 if ($this->_cdType
) {
290 $this->assign('urlPath', 'civicrm/case/activity');
292 $encounterMediums = CRM_Case_PseudoConstant
::encounterMedium();
293 if ($this->_activityTypeFile
== 'OpenCase') {
294 $this->_encounterMedium
= CRM_Core_DAO
::getFieldValue('CRM_Activity_DAO_Activity', $this->_activityId
,
297 if (!array_key_exists($this->_encounterMedium
, $encounterMediums)) {
298 $encounterMediums[$this->_encounterMedium
] = CRM_Core_OptionGroup
::getLabel('encounter_medium',
299 $this->_encounterMedium
,
305 $this->add('select', 'medium_id', ts('Medium'), $encounterMediums, TRUE);
307 $this->_relatedContacts
= CRM_Case_BAO_Case
::getRelatedAndGlobalContacts($this->_caseId
);
308 //add case client in send a copy selector.CRM-4438.
309 $relatedContacts = CRM_Case_BAO_Case
::getContactNames($this->_caseId
);
310 if (!empty($relatedContacts)) {
311 foreach ($relatedContacts as $relatedContact) {
312 $this->_relatedContacts
[] = $relatedContact;
316 if (!empty($this->_relatedContacts
)) {
317 $checkBoxes = array();
318 foreach ($this->_relatedContacts
as $id => $row) {
319 $checkBoxes[$id] = $this->addElement('checkbox', $id, NULL, '');
322 $this->addGroup($checkBoxes, 'contact_check');
323 $this->addElement('checkbox', 'toggleSelect', NULL, NULL,
324 array('onclick' => "return toggleCheckboxVals('contact_check',this);")
326 $this->assign('searchRows', $this->_relatedContacts
);
329 $this->addFormRule(array('CRM_Case_Form_Activity', 'formRule'), $this);
335 * @param array $fields the input form values
336 * @param array $files the uploaded files if any
337 * @param array $options additional user data
339 * @return true if no errors, else array of errors
343 static function formRule($fields, $files, $self) {
344 // skip form rule if deleting
345 if (CRM_Utils_Array
::value('_qf_Activity_next_', $fields) == 'Delete' || CRM_Utils_Array
::value('_qf_Activity_next_', $fields) == 'Restore') {
349 return parent
::formrule($fields, $files, $self);
353 * Function to process the form
359 public function postProcess($params = NULL) {
360 $transaction = new CRM_Core_Transaction();
362 if ($this->_action
& CRM_Core_Action
::DELETE
) {
365 //block deleting activities which affects
366 //case attributes.CRM-4543
367 $activityCondition = " AND v.name IN ('Open Case', 'Change Case Type', 'Change Case Status', 'Change Case Start Date')";
368 $caseAttributeActivities = CRM_Core_OptionGroup
::values('activity_type', FALSE, FALSE, FALSE, $activityCondition);
370 if (!array_key_exists($this->_activityTypeId
, $caseAttributeActivities)) {
371 $params = array('id' => $this->_activityId
);
372 $activityDelete = CRM_Activity_BAO_Activity
::deleteActivity($params, TRUE);
373 if ($activityDelete) {
374 $statusMsg = ts('The selected activity has been moved to the Trash. You can view and / or restore deleted activities by checking "Deleted Activities" from the Case Activities search filter (under Manage Case).<br />');
378 $statusMsg = ts("Selected Activity cannot be deleted.");
382 'entity_table' => 'civicrm_activity',
383 'entity_id' => $this->_activityId
385 CRM_Core_BAO_EntityTag
::del($tagParams);
387 CRM_Core_Session
::setStatus('', $statusMsg, 'info');
391 if ($this->_action
& CRM_Core_Action
::RENEW
) {
393 $params = array('id' => $this->_activityId
);
394 $activityRestore = CRM_Activity_BAO_Activity
::restoreActivity($params);
395 if ($activityRestore) {
396 $statusMsg = ts('The selected activity has been restored.<br />');
398 CRM_Core_Session
::setStatus('', $statusMsg, 'info');
402 // store the submitted values in an array
403 $params = $this->controller
->exportValues($this->_name
);
404 if ($params['source_contact_id']) {
405 $params['source_contact_id'] = $params['source_contact_qid'];
408 //set parent id if its edit mode
409 if ($parentId = CRM_Utils_Array
::value('parent_id', $this->_defaults
)) {
410 $params['parent_id'] = $parentId;
413 // required for status msg
414 $recordStatus = 'created';
416 // store the dates with proper format
417 $params['activity_date_time'] = CRM_Utils_Date
::processDate($params['activity_date_time'], $params['activity_date_time_time']);
418 $params['activity_type_id'] = $this->_activityTypeId
;
420 // format with contact (target contact) values
421 if (isset($params['contact'][1])) {
422 $params['target_contact_id'] = explode(',', $params['contact'][1]);
425 $params['target_contact_id'] = array();
428 // format activity custom data
429 if (CRM_Utils_Array
::value('hidden_custom', $params)) {
430 if ($this->_activityId
) {
431 // unset custom fields-id from params since we want custom
432 // fields to be saved for new activity.
433 foreach ($params as $key => $value) {
435 if (preg_match('/^(custom_\d+_)(\d+)$/', $key, $match)) {
436 $params[$match[1] . '-1'] = $params[$key];
438 // for autocomplete transfer hidden value instead of label
439 if ($params[$key] && isset($params[$key . '_id'])) {
440 $params[$match[1] . '-1_id'] = $params[$key . '_id'];
441 unset($params[$key . '_id']);
443 unset($params[$key]);
448 // build custom data getFields array
449 $customFields = CRM_Core_BAO_CustomField
::getFields('Activity', FALSE, FALSE, $this->_activityTypeId
);
450 $customFields = CRM_Utils_Array
::crmArrayMerge($customFields,
451 CRM_Core_BAO_CustomField
::getFields('Activity', FALSE, FALSE,
455 $params['custom'] = CRM_Core_BAO_CustomField
::postProcess($params,
462 // assigning formatted value
463 if (CRM_Utils_Array
::value('assignee_contact_id', $params)) {
464 $params['assignee_contact_id'] = explode(',', $params['assignee_contact_id']);
467 $params['assignee_contact_id'] = array();
471 if (isset($this->_activityId
)) {
472 // activity which hasn't been modified by a user yet
473 if ($this->_defaults
['is_auto'] == 1) {
474 $params['is_auto'] = 0;
477 // always create a revision of an case activity. CRM-4533
478 $newActParams = $params;
480 // add target contact values in update mode
481 if (empty($params['target_contact_id']) && !empty($this->_defaults
['target_contact'])) {
482 $newActParams['target_contact_id'] = $this->_defaults
['target_contact'];
485 // record status for status msg
486 $recordStatus = 'updated';
489 if (!isset($newActParams)) {
490 // add more attachments if needed for old activity
491 CRM_Core_BAO_File
::formatAttachment($params,
496 // call begin post process, before the activity is created/updated.
497 $this->beginPostProcess($params);
498 $params['case_id'] = $this->_caseId
;
499 // activity create/update
500 $activity = CRM_Activity_BAO_Activity
::create($params);
502 // call end post process, after the activity has been created/updated.
503 $this->endPostProcess($params, $activity);
506 // since the params we need to set are very few, and we don't want rest of the
507 // work done by bao create method , lets use dao object to make the changes
508 $params = array('id' => $this->_activityId
);
509 $params['is_current_revision'] = 0;
510 $activity = new CRM_Activity_DAO_Activity();
511 $activity->copyValues($params);
515 // create a new version of activity if activity was found to
516 // have been modified/created by user
517 if (isset($newActParams)) {
518 // set proper original_id
519 if (CRM_Utils_Array
::value('original_id', $this->_defaults
)) {
520 $newActParams['original_id'] = $this->_defaults
['original_id'];
523 $newActParams['original_id'] = $activity->id
;
525 //is_current_revision will be set to 1 by default.
527 // add attachments if any
528 CRM_Core_BAO_File
::formatAttachment($newActParams,
533 // call begin post process, before the activity is created/updated.
534 $this->beginPostProcess($newActParams);
535 $newActParams['case_id'] = $this->_caseId
;
537 $activity = CRM_Activity_BAO_Activity
::create($newActParams);
539 // call end post process, after the activity has been created/updated.
540 $this->endPostProcess($newActParams, $activity);
542 // copy files attached to old activity if any, to new one,
543 // as long as users have not selected the 'delete attachment' option.
544 if (!CRM_Utils_Array
::value('is_delete_attachment', $newActParams)) {
545 CRM_Core_BAO_File
::copyEntityFile('civicrm_activity', $this->_activityId
,
546 'civicrm_activity', $activity->id
550 // copy back params to original var
551 $params = $newActParams;
555 // add tags if exists
556 $tagParams = array();
557 if (!empty($params['tag'])) {
558 foreach ($params['tag'] as $tag) {
559 $tagParams[$tag] = 1;
564 CRM_Core_BAO_EntityTag
::create($tagParams, 'civicrm_activity', $activity->id
);
567 if (isset($params['taglist']) && !empty($params['taglist'])) {
568 CRM_Core_Form_Tag
::postProcess($params['taglist'], $activity->id
, 'civicrm_activity', $this);
572 // update existing case record if needed
573 $caseParams = $params;
574 $caseParams['id'] = $this->_caseId
;
576 if (CRM_Utils_Array
::value('case_type_id', $caseParams)) {
577 $caseParams['case_type_id'] = CRM_Core_DAO
::VALUE_SEPARATOR
. $caseParams['case_type_id'] . CRM_Core_DAO
::VALUE_SEPARATOR
;
579 if (CRM_Utils_Array
::value('case_status_id', $caseParams)) {
580 $caseParams['status_id'] = $caseParams['case_status_id'];
583 // unset params intended for activities only
584 unset($caseParams['subject'], $caseParams['details'],
585 $caseParams['status_id'], $caseParams['custom']
587 $case = CRM_Case_BAO_Case
::create($caseParams);
589 // create case activity record
591 'activity_id' => $activity->id
,
592 'case_id' => $this->_caseId
,
594 CRM_Case_BAO_Case
::processCaseActivity($caseParams);
596 // Insert civicrm_log record for the activity (e.g. store the
597 // created / edited by contact id and date for the activity)
598 // Note - civicrm_log is already created by CRM_Activity_BAO_Activity::create()
600 // send copy to selected contacts.
602 $mailToContacts = array();
605 //check for notification settings for assignee contacts
606 $selectedContacts = array('contact_check');
607 $activityContacts = CRM_Core_OptionGroup
::values('activity_contacts', FALSE, FALSE, FALSE, NULL, 'name');
608 $assigneeID = CRM_Utils_Array
::key('Activity Assignees', $activityContacts);
609 if (CRM_Core_BAO_Setting
::getItem(CRM_Core_BAO_Setting
::SYSTEM_PREFERENCES_NAME
,
610 'activity_assignee_notification'
613 $selectedContacts[] = 'assignee_contact_id';
616 foreach ($selectedContacts as $dnt => $val) {
617 if (array_key_exists($val, $params) && !CRM_Utils_array
::crmIsEmptyArray($params[$val])) {
618 if ($val == 'contact_check') {
619 $mailStatus = ts("A copy of the activity has also been sent to selected contacts(s).");
622 $this->_relatedContacts
= CRM_Activity_BAO_ActivityAssignment
::getAssigneeNames($activity->id
, TRUE, FALSE);
623 $mailStatus .= ' ' . ts("A copy of the activity has also been sent to assignee contacts(s).");
626 //build an associative array with unique email addresses.
627 foreach ($params[$val] as $key => $value) {
628 if ($val == 'contact_check') {
635 if (isset($id) && array_key_exists($id, $this->_relatedContacts
)) {
636 //if email already exists in array then append with ', ' another role only otherwise add it to array.
637 if ($contactDetails = CRM_Utils_Array
::value($this->_relatedContacts
[$id]['email'], $mailToContacts)) {
638 $caseRole = CRM_Utils_Array
::value('role', $this->_relatedContacts
[$id]);
639 $mailToContacts[$this->_relatedContacts
[$id]['email']]['role'] = $contactDetails['role'] . ', ' . $caseRole;
642 $mailToContacts[$this->_relatedContacts
[$id]['email']] = $this->_relatedContacts
[$id];
649 if (!CRM_Utils_array
::crmIsEmptyArray($mailToContacts)) {
650 //include attachments while sending a copy of activity.
651 $attachments = CRM_Core_BAO_File
::getEntityFile('civicrm_activity',
655 $ics = new CRM_Activity_BAO_ICalendar($activity);
656 $ics->addAttachment($attachments, $mailToContacts);
658 $result = CRM_Case_BAO_Case
::sendActivityCopy($this->_currentlyViewedContactId
,
659 $activity->id
, $mailToContacts, $attachments, $this->_caseId
664 if (empty($result)) {
672 // create follow up activity if needed
673 $followupStatus = '';
674 if (CRM_Utils_Array
::value('followup_activity_type_id', $params)) {
675 $followupActivity = CRM_Activity_BAO_Activity
::createFollowupActivity($activity->id
, $params);
677 if ($followupActivity) {
679 'activity_id' => $followupActivity->id
,
680 'case_id' => $this->_caseId
,
682 CRM_Case_BAO_Case
::processCaseActivity($caseParams);
683 $followupStatus = ts("A followup activity has been scheduled.");
687 CRM_Core_Session
::setStatus('', ts("'%1' activity has been %2. %3 %4",
689 1 => $this->_activityTypeName
,
691 3 => $followupStatus,