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 provides the functionality for batch profile update
39 class CRM_Contact_Form_Task_Batch
extends CRM_Contact_Form_Task
{
42 * The title of the group
49 * Maximum contacts that should be allowed to update
52 protected $_maxContacts = 100;
55 * Maximum profile fields that will be displayed
58 protected $_maxFields = 9;
61 * Variable to store redirect path
64 protected $_userContext;
67 * When not to reset sort_name
69 protected $_preserveDefault = TRUE;
72 * Build all the data structures needed to build the form
76 public function preProcess() {
78 * initialize the task and row fields
84 * Build the form object
89 public function buildQuickForm() {
90 $ufGroupId = $this->get('ufGroupId');
93 CRM_Core_Error
::fatal('ufGroupId is missing');
95 $this->_title
= ts('Batch Update') . ' - ' . CRM_Core_BAO_UFGroup
::getTitle($ufGroupId);
96 CRM_Utils_System
::setTitle($this->_title
);
98 $this->addDefaultButtons(ts('Save'));
99 $this->_fields
= CRM_Core_BAO_UFGroup
::getFields($ufGroupId, FALSE, CRM_Core_Action
::VIEW
);
101 // remove file type field and then limit fields
102 $suppressFields = FALSE;
103 $removehtmlTypes = array('File', 'Autocomplete-Select');
104 foreach ($this->_fields
as $name => $field) {
105 if ($cfID = CRM_Core_BAO_CustomField
::getKeyID($name) &&
106 in_array($this->_fields
[$name]['html_type'], $removehtmlTypes)
108 $suppressFields = TRUE;
109 unset($this->_fields
[$name]);
113 //FIX ME: phone ext field is added at the end and it gets removed because of below code
114 //$this->_fields = array_slice($this->_fields, 0, $this->_maxFields);
116 $this->addButtons(array(
119 'name' => ts('Update Contact(s)'),
124 'name' => ts('Cancel'),
130 $this->assign('profileTitle', $this->_title
);
131 $this->assign('componentIds', $this->_contactIds
);
133 // if below fields are missing we should not reset sort name / display name
135 $preserveDefaultsArray = array(
136 'first_name', 'last_name', 'middle_name',
137 'organization_name', 'prefix_id', 'suffix_id',
141 foreach ($this->_contactIds
as $contactId) {
142 $profileFields = $this->_fields
;
143 CRM_Core_BAO_Address
::checkContactSharedAddressFields($profileFields, $contactId);
144 foreach ($profileFields as $name => $field) {
145 CRM_Core_BAO_UFGroup
::buildProfile($this, $field, NULL, $contactId);
147 if (in_array($field['name'], $preserveDefaultsArray)) {
148 $this->_preserveDefault
= FALSE;
153 $this->assign('fields', $this->_fields
);
155 // don't set the status message when form is submitted.
156 $buttonName = $this->controller
->getButtonName('submit');
158 if ($suppressFields && $buttonName != '_qf_BatchUpdateProfile_next') {
159 CRM_Core_Session
::setStatus(ts("File or Autocomplete-Select type field(s) in the selected profile are not supported for Batch Update."), ts('Some Fields Excluded'), 'info');
162 $this->addDefaultButtons(ts('Update Contacts'));
163 $this->addFormRule(array('CRM_Contact_Form_Task_Batch', 'formRule'));
167 * Set default values for the form.
172 public function setDefaultValues() {
173 if (empty($this->_fields
)) {
177 $defaults = $sortName = array();
178 foreach ($this->_contactIds
as $contactId) {
179 $details[$contactId] = array();
182 $sortName[$contactId] = CRM_Core_DAO
::getFieldValue('CRM_Contact_DAO_Contact',
187 CRM_Core_BAO_UFGroup
::setProfileDefaults($contactId, $this->_fields
, $defaults, FALSE);
190 $this->assign('sortName', $sortName);
198 * @param array $fields the input form values
200 * @return true if no errors, else array of errors
203 public static function formRule($fields) {
205 $externalIdentifiers = array();
206 foreach ($fields['field'] as $componentId => $field) {
207 foreach ($field as $fieldName => $fieldValue) {
208 if ($fieldName == 'external_identifier') {
209 if (in_array($fieldValue, $externalIdentifiers)) {
210 $errors["field[$componentId][external_identifier]"] = ts('Duplicate value for External ID.');
213 $externalIdentifiers[$componentId] = $fieldValue;
223 * Process the form after the input has been submitted and validated
228 public function postProcess() {
229 $params = $this->exportValues();
231 $ufGroupId = $this->get('ufGroupId');
233 $inValidSubtypeCnt = 0;
234 //send profile notification email if 'notify' field is set
235 $notify = CRM_Core_DAO
::getFieldValue('CRM_Core_DAO_UFGroup', $ufGroupId, 'notify');
236 foreach ($params['field'] as $key => $value) {
239 //validate subtype before updating
240 if (!empty($value['contact_sub_type']) && !CRM_Contact_BAO_ContactType
::isAllowEdit($key)) {
241 unset($value['contact_sub_type']);
242 $inValidSubtypeCnt++
;
245 $value['preserveDBName'] = $this->_preserveDefault
;
247 //parse street address, CRM-7768
248 self
::parseStreetAddress($value, $this);
250 CRM_Contact_BAO_Contact
::createProfileContact($value, $this->_fields
, $key, NULL, $ufGroupId, NULL, TRUE);
252 $values = CRM_Core_BAO_UFGroup
::checkFieldsEmptyValues($ufGroupId, $key, NULL);
253 CRM_Core_BAO_UFGroup
::commonSendMail($key, $values);
257 CRM_Core_Session
::setStatus('', ts("Updates Saved"), 'success');
258 if ($inValidSubtypeCnt) {
259 CRM_Core_Session
::setStatus(ts('Contact Subtype field of 1 contact has not been updated.', array('plural' => 'Contact Subtype field of %count contacts has not been updated.', 'count' => $inValidSubtypeCnt)), ts('Invalid Subtype'));
264 * Parse street address
265 * @param array $contactValues contact values
266 * @param CRM_Core_Form $form form object
268 public static function parseStreetAddress(&$contactValues, &$form) {
269 if (!is_array($contactValues) ||
!is_array($form->_fields
)) {
273 static $parseAddress;
274 $addressFldKey = 'street_address';
275 if (!isset($parseAddress)) {
276 $parseAddress = FALSE;
277 foreach ($form->_fields
as $key => $fld) {
278 if (strpos($key, $addressFldKey) !== FALSE) {
279 $parseAddress = CRM_Utils_Array
::value('street_address_parsing',
280 CRM_Core_BAO_Setting
::valueOptions(CRM_Core_BAO_Setting
::SYSTEM_PREFERENCES_NAME
,
290 if (!$parseAddress) {
294 $allParseValues = array();
295 foreach ($contactValues as $key => $value) {
296 if (strpos($key, $addressFldKey) !== FALSE) {
297 $locTypeId = substr($key, strlen($addressFldKey) +
1);
299 // parse address field.
300 $parsedFields = CRM_Core_BAO_Address
::parseStreetAddress($value);
302 //street address consider to be parsed properly,
303 //If we get street_name and street_number.
304 if (empty($parsedFields['street_name']) ||
empty($parsedFields['street_number'])) {
305 $parsedFields = array_fill_keys(array_keys($parsedFields), '');
308 //merge parse values.
309 foreach ($parsedFields as $fldKey => $parseVal) {
311 $fldKey .= "-{$locTypeId}";
313 $allParseValues[$fldKey] = $parseVal;
318 //finally merge all parse values
319 if (!empty($allParseValues)) {
320 $contactValues +
= $allParseValues;