drupal-civicrm/sites/all/modules/civicrm/CRM/Report/Form.php

4988 lines
159 KiB
PHP
Raw Permalink Normal View History

2018-01-14 15:10:16 +02:00
<?php
/*
+--------------------------------------------------------------------+
| CiviCRM version 4.7 |
+--------------------------------------------------------------------+
| Copyright CiviCRM LLC (c) 2004-2017 |
+--------------------------------------------------------------------+
| This file is a part of CiviCRM. |
| |
| CiviCRM is free software; you can copy, modify, and distribute it |
| under the terms of the GNU Affero General Public License |
| Version 3, 19 November 2007 and the CiviCRM Licensing Exception. |
| |
| CiviCRM is distributed in the hope that it will be useful, but |
| WITHOUT ANY WARRANTY; without even the implied warranty of |
| MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. |
| See the GNU Affero General Public License for more details. |
| |
| You should have received a copy of the GNU Affero General Public |
| License and the CiviCRM Licensing Exception along |
| with this program; if not, contact CiviCRM LLC |
| at info[AT]civicrm[DOT]org. If you have questions about the |
| GNU Affero General Public License or the licensing of CiviCRM, |
| see the CiviCRM license FAQ at http://civicrm.org/licensing |
+--------------------------------------------------------------------+
*/
/**
* Class CRM_Report_Form
*/
class CRM_Report_Form extends CRM_Core_Form {
const ROW_COUNT_LIMIT = 50;
/**
* Operator types - used for displaying filter elements
*/
const
OP_INT = 1,
OP_STRING = 2,
OP_DATE = 4,
OP_DATETIME = 5,
OP_FLOAT = 8,
OP_SELECT = 64,
OP_MULTISELECT = 65,
OP_MULTISELECT_SEPARATOR = 66,
OP_MONTH = 128,
OP_ENTITYREF = 256;
/**
* The id of the report instance
*
* @var integer
*/
protected $_id;
/**
* The id of the report template
*
* @var integer;
*/
protected $_templateID;
/**
* The report title
*
* @var string
*/
protected $_title;
protected $_noFields = FALSE;
/**
* The set of all columns in the report. An associative array
* with column name as the key and attributes as the value
*
* @var array
*/
protected $_columns = array();
/**
* The set of filters in the report
*
* @var array
*/
protected $_filters = array();
/**
* The set of optional columns in the report
*
* @var array
*/
public $_options = array();
/**
* By default most reports hide contact id.
* Setting this to true makes it available
*/
protected $_exposeContactID = TRUE;
/**
* Set of statistic fields
*
* @var array
*/
protected $_statFields = array();
/**
* Set of statistics data
*
* @var array
*/
protected $_statistics = array();
/**
* List of fields not to be repeated during display
*
* @var array
*/
protected $_noRepeats = array();
/**
* List of fields not to be displayed
*
* @var array
*/
protected $_noDisplay = array();
/**
* Object type that a custom group extends
*
* @var null
*/
protected $_customGroupExtends = NULL;
protected $_customGroupExtendsJoin = array();
protected $_customGroupFilters = TRUE;
protected $_customGroupGroupBy = FALSE;
protected $_customGroupJoin = 'LEFT JOIN';
/**
* Build tags filter
*/
protected $_tagFilter = FALSE;
/**
* specify entity table for tags filter
*/
protected $_tagFilterTable = 'civicrm_contact';
/**
* Build groups filter.
*
* @var bool
*/
protected $_groupFilter = FALSE;
/**
* Has the report been optimised for group filtering.
*
* The functionality for group filtering has been improved but not
* all reports have been adjusted to take care of it.
*
* This property exists to highlight the reports which are still using the
* slow method & allow group filtering to still work for them until they
* can be migrated.
*
* In order to protect extensions we have to default to TRUE - but I have
* separately marked every class with a groupFilter in the hope that will trigger
* people to fix them as they touch them.
*
* CRM-19170
*
* @var bool
*/
protected $groupFilterNotOptimised = TRUE;
/**
* Navigation fields
*
* @var array
*/
public $_navigation = array();
public $_drilldownReport = array();
/**
* Array of tabs to display on report.
*
* E.g we define the tab title, the tpl and the tab-specific part of the css or html link.
*
* $this->tabs['OrderBy'] = array(
* 'title' => ts('Sorting'),
* 'tpl' => 'OrderBy',
* 'div_label' => 'order-by',
* );
*
* @var array
*/
protected $tabs = array();
/**
* Should we add paging.
*
* @var bool
*/
protected $addPaging = TRUE;
/**
* An attribute for checkbox/radio form field layout
*
* @var array
*/
protected $_fourColumnAttribute = array(
'</td><td width="25%">',
'</td><td width="25%">',
'</td><td width="25%">',
'</tr><tr><td>',
);
protected $_force = 1;
protected $_params = NULL;
protected $_formValues = NULL;
protected $_instanceValues = NULL;
protected $_instanceForm = FALSE;
protected $_criteriaForm = FALSE;
protected $_instanceButtonName = NULL;
protected $_createNewButtonName = NULL;
protected $_printButtonName = NULL;
protected $_pdfButtonName = NULL;
protected $_csvButtonName = NULL;
protected $_groupButtonName = NULL;
protected $_chartButtonName = NULL;
protected $_csvSupported = TRUE;
protected $_add2groupSupported = TRUE;
protected $_groups = NULL;
protected $_grandFlag = FALSE;
protected $_rowsFound = NULL;
protected $_selectAliases = array();
protected $_rollup = NULL;
/**
* Table containing list of contact IDs within the group filter.
*
* @var string
*/
protected $groupTempTable = '';
/**
* @var array
*/
protected $_aliases = array();
/**
* @var string
*/
protected $_where;
/**
* @var string
*/
protected $_from;
/**
* SQL Limit clause
* @var string
*/
protected $_limit = NULL;
/**
* This can be set to specify a limit to the number of rows
* Since it is currently envisaged as part of the api usage it is only being applied
* when $_output mode is not 'html' or 'group' so as not to have to interpret / mess with that part
* of the code (see limit() fn.
*
* @var integer
*/
protected $_limitValue = NULL;
/**
* This can be set to specify row offset
* See notes on _limitValue
* @var integer
*/
protected $_offsetValue = NULL;
/**
* @var null
*/
protected $_sections = NULL;
protected $_autoIncludeIndexedFieldsAsOrderBys = 0;
protected $_absoluteUrl = FALSE;
/**
* Flag to indicate if result-set is to be stored in a class variable which could be retrieved using getResultSet() method.
*
* @var boolean
*/
protected $_storeResultSet = FALSE;
/**
* When _storeResultSet Flag is set use this var to store result set in form of array
*
* @var boolean
*/
protected $_resultSet = array();
/**
* To what frequency group-by a date column
*
* @var array
*/
protected $_groupByDateFreq = array(
'MONTH' => 'Month',
'YEARWEEK' => 'Week',
'QUARTER' => 'Quarter',
'YEAR' => 'Year',
);
/**
* Variables to hold the acl inner join and where clause
*/
protected $_aclFrom = NULL;
protected $_aclWhere = NULL;
/**
* Array of DAO tables having columns included in SELECT or ORDER BY clause.
*
* Where has also been added to this although perhaps the 'includes both' array should have a different name.
*
* @var array
*/
protected $_selectedTables = array();
/**
* Array of DAO tables having columns included in WHERE or HAVING clause
*
* @var array
*/
protected $filteredTables;
/**
* Output mode e.g 'print', 'csv', 'pdf'.
*
* @var string
*/
protected $_outputMode;
/**
* Format of any chart in use.
*
* (it's unclear if this could be merged with outputMode at this stage)
*
* @var
*/
protected $_format;
public $_having = NULL;
public $_select = NULL;
public $_selectClauses = array();
public $_columnHeaders = array();
public $_orderBy = NULL;
public $_orderByFields = array();
public $_orderByArray = array();
/**
* Array of clauses to group by.
*
* @var array
*/
protected $_groupByArray = array();
public $_groupBy = NULL;
public $_whereClauses = array();
public $_havingClauses = array();
/**
* DashBoardRowCount Dashboard row count
* @var Integer
*/
public $_dashBoardRowCount;
/**
* Is this being called without a form controller (ie. the report is being render outside the normal form
* - e.g the api is retrieving the rows
* @var boolean
*/
public $noController = FALSE;
/**
* Variable to hold the currency alias
*/
protected $_currencyColumn = NULL;
/**
* @var string
*/
protected $_interval;
/**
* @var bool
*/
protected $_sendmail;
/**
* @var int
*/
protected $_chartId;
/**
* @var int
*/
public $_section;
/**
* @var string Report description.
*/
public $_description;
/**
* @var bool Is an address field selected.
* This was intended to determine if the address table should be joined in
* The isTableSelected function is now preferred for this purpose
*/
protected $_addressField;
/**
* @var bool Is an email field selected.
* This was intended to determine if the email table should be joined in
* The isTableSelected function is now preferred for this purpose
*/
protected $_emailField;
/**
* @var bool Is a phone field selected.
* This was intended to determine if the phone table should be joined in
* The isTableSelected function is now preferred for this purpose
*/
protected $_phoneField;
/**
* @var bool Create new report instance? (or update existing) on save.
*/
protected $_createNew;
/**
* When a grand total row has calculated the status we pop it off to here.
*
* This allows us to access it from the stats function and avoid recalculating.
*/
protected $rollupRow = array();
/**
* @var string Database attributes - character set and collation
*/
protected $_databaseAttributes = ' DEFAULT CHARACTER SET utf8 COLLATE utf8_unicode_ci';
/**
* SQL being run in this report.
*
* The sql in the report is stored in this variable in order to be displayed on the developer tab.
*
* @var string
*/
protected $sql;
/**
* SQL being run in this report as an array.
*
* The sql in the report is stored in this variable in order to be returned to api & test calls.
*
* @var string
*/
protected $sqlArray;
/**
* Class constructor.
*/
public function __construct() {
parent::__construct();
$this->addClass('crm-report-form');
if ($this->_tagFilter) {
$this->buildTagFilter();
}
if ($this->_exposeContactID) {
if (array_key_exists('civicrm_contact', $this->_columns)) {
$this->_columns['civicrm_contact']['fields']['exposed_id'] = array(
'name' => 'id',
'title' => ts('Contact ID'),
'no_repeat' => TRUE,
);
}
}
if ($this->_groupFilter) {
$this->buildGroupFilter();
}
// Get all custom groups
$allGroups = CRM_Core_PseudoConstant::get('CRM_Core_DAO_CustomField', 'custom_group_id');
// Get the custom groupIds for which the user has VIEW permission
// If the user has 'access all custom data' permission, we'll leave $permCustomGroupIds empty
// and addCustomDataToColumns() will allow access to all custom groups.
$permCustomGroupIds = array();
if (!CRM_Core_Permission::check('access all custom data')) {
$permCustomGroupIds = CRM_ACL_API::group(CRM_Core_Permission::VIEW, NULL, 'civicrm_custom_group', $allGroups, NULL);
// do not allow custom data for reports if user doesn't have
// permission to access custom data.
if (!empty($this->_customGroupExtends) && empty($permCustomGroupIds)) {
$this->_customGroupExtends = array();
}
}
// merge custom data columns to _columns list, if any
$this->addCustomDataToColumns(TRUE, $permCustomGroupIds);
// add / modify display columns, filters ..etc
CRM_Utils_Hook::alterReportVar('columns', $this->_columns, $this);
//assign currencyColumn variable to tpl
$this->assign('currencyColumn', $this->_currencyColumn);
}
/**
* Shared pre-process function.
*
* If overriding preProcess function this should still be called.
*
* @throws \Exception
*/
public function preProcessCommon() {
$this->_force = CRM_Utils_Request::retrieve('force', 'Boolean');
$this->_dashBoardRowCount = CRM_Utils_Request::retrieve('rowCount', 'Integer');
$this->_section = CRM_Utils_Request::retrieve('section', 'Integer');
$this->assign('section', $this->_section);
CRM_Core_Region::instance('page-header')->add(array(
'markup' => sprintf('<!-- Report class: [%s] -->', htmlentities(get_class($this))),
));
if (!$this->noController) {
$this->setID($this->get('instanceId'));
if (!$this->_id) {
$this->setID(CRM_Report_Utils_Report::getInstanceID());
if (!$this->_id) {
$this->setID(CRM_Report_Utils_Report::getInstanceIDForPath());
}
}
// set qfkey so that pager picks it up and use it in the "Next > Last >>" links.
// FIXME: Note setting it in $_GET doesn't work, since pager generates link based on QUERY_STRING
$_SERVER['QUERY_STRING'] .= "&qfKey={$this->controller->_key}";
}
if ($this->_id) {
$this->assign('instanceId', $this->_id);
$params = array('id' => $this->_id);
$this->_instanceValues = array();
CRM_Core_DAO::commonRetrieve('CRM_Report_DAO_ReportInstance',
$params,
$this->_instanceValues
);
if (empty($this->_instanceValues)) {
CRM_Core_Error::fatal("Report could not be loaded.");
}
$this->_title = $this->_instanceValues['title'];
if (!empty($this->_instanceValues['permission']) &&
(!(CRM_Core_Permission::check($this->_instanceValues['permission']) ||
CRM_Core_Permission::check('administer Reports')
))
) {
CRM_Utils_System::permissionDenied();
CRM_Utils_System::civiExit();
}
$formValues = CRM_Utils_Array::value('form_values', $this->_instanceValues);
if ($formValues) {
$this->_formValues = unserialize($formValues);
}
else {
$this->_formValues = NULL;
}
$this->setOutputMode();
if ($this->_outputMode == 'copy') {
$this->_createNew = TRUE;
$this->_params = $this->_formValues;
$this->_params['view_mode'] = 'criteria';
$this->_params['title'] = $this->getTitle() . ts(' (copy created by %1 on %2)', array(
CRM_Core_Session::singleton()->getLoggedInContactDisplayName(),
CRM_Utils_Date::customFormat(date('Y-m-d H:i')),
));
// Do not pass go. Do not collect another chance to re-run the same query.
CRM_Report_Form_Instance::postProcess($this);
}
// lets always do a force if reset is found in the url.
// Hey why not? see CRM-17225 for more about this. The use of reset to be force is historical for reasons stated
// in the comment line above these 2.
if (!empty($_REQUEST['reset'])
&& !in_array(CRM_Utils_Request::retrieve('output', 'String'), array('save', 'criteria'))) {
$this->_force = 1;
}
// set the mode
$this->assign('mode', 'instance');
}
elseif (!$this->noController) {
list($optionValueID, $optionValue) = CRM_Report_Utils_Report::getValueIDFromUrl();
$instanceCount = CRM_Report_Utils_Report::getInstanceCount($optionValue);
if (($instanceCount > 0) && $optionValueID) {
$this->assign('instanceUrl',
CRM_Utils_System::url('civicrm/report/list',
"reset=1&ovid=$optionValueID"
)
);
}
if ($optionValueID) {
$this->_description = CRM_Core_DAO::getFieldValue('CRM_Core_DAO_OptionValue', $optionValueID, 'description');
}
// set the mode
$this->assign('mode', 'template');
}
// lets display the Report Settings section
$this->_instanceForm = $this->_force || $this->_id || (!empty($_POST));
// Do not display Report Settings section if administer Reports permission is absent OR
// if report instance is reserved and administer reserved reports absent
if (!CRM_Core_Permission::check('administer Reports') ||
($this->_instanceValues['is_reserved'] &&
!CRM_Core_Permission::check('administer reserved reports'))
) {
$this->_instanceForm = FALSE;
}
$this->assign('criteriaForm', FALSE);
// Display Report Criteria section if user has access Report Criteria OR administer Reports AND report instance is not reserved
if (CRM_Core_Permission::check('administer Reports') ||
CRM_Core_Permission::check('access Report Criteria')
) {
if (!$this->_instanceValues['is_reserved'] ||
CRM_Core_Permission::check('administer reserved reports')
) {
$this->assign('criteriaForm', TRUE);
$this->_criteriaForm = TRUE;
}
}
// Special permissions check for private instance if it's not the current contact instance
if ($this->_id &&
(CRM_Report_BAO_ReportInstance::reportIsPrivate($this->_id) &&
!CRM_Report_BAO_ReportInstance::contactIsOwner($this->_id))) {
if (!CRM_Core_Permission::check('access all private reports')) {
$this->_instanceForm = FALSE;
$this->assign('criteriaForm', FALSE);
}
}
$this->_instanceButtonName = $this->getButtonName('submit', 'save');
$this->_createNewButtonName = $this->getButtonName('submit', 'next');
$this->_groupButtonName = $this->getButtonName('submit', 'group');
$this->_chartButtonName = $this->getButtonName('submit', 'chart');
}
/**
* Add bread crumb.
*/
public function addBreadCrumb() {
$breadCrumbs
= array(
array(
'title' => ts('Report Templates'),
'url' => CRM_Utils_System::url('civicrm/admin/report/template/list', 'reset=1'),
),
);
CRM_Utils_System::appendBreadCrumb($breadCrumbs);
}
/**
* Pre process function.
*
* Called prior to build form.
*/
public function preProcess() {
$this->preProcessCommon();
if (!$this->_id) {
$this->addBreadCrumb();
}
foreach ($this->_columns as $tableName => $table) {
$this->setTableAlias($table, $tableName);
$expFields = array();
// higher preference to bao object
$daoOrBaoName = CRM_Utils_Array::value('bao', $table, CRM_Utils_Array::value('dao', $table));
if ($daoOrBaoName) {
if (method_exists($daoOrBaoName, 'exportableFields')) {
$expFields = $daoOrBaoName::exportableFields();
}
else {
$expFields = $daoOrBaoName::export();
}
}
$doNotCopy = array('required', 'default');
$fieldGroups = array('fields', 'filters', 'group_bys', 'order_bys');
foreach ($fieldGroups as $fieldGrp) {
if (!empty($table[$fieldGrp]) && is_array($table[$fieldGrp])) {
foreach ($table[$fieldGrp] as $fieldName => $field) {
// $name is the field name used to reference the BAO/DAO export fields array
$name = isset($field['name']) ? $field['name'] : $fieldName;
// Sometimes the field name key in the BAO/DAO export fields array is
// different from the actual database field name.
// Unset $field['name'] so that actual database field name can be obtained
// from the BAO/DAO export fields array.
unset($field['name']);
if (array_key_exists($name, $expFields)) {
foreach ($doNotCopy as $dnc) {
// unset the values we don't want to be copied.
unset($expFields[$name][$dnc]);
}
if (empty($field)) {
$this->_columns[$tableName][$fieldGrp][$fieldName] = $expFields[$name];
}
else {
foreach ($expFields[$name] as $property => $val) {
if (!array_key_exists($property, $field)) {
$this->_columns[$tableName][$fieldGrp][$fieldName][$property] = $val;
}
}
}
}
// fill other vars
if (!empty($field['no_repeat'])) {
$this->_noRepeats[] = "{$tableName}_{$fieldName}";
}
if (!empty($field['no_display'])) {
$this->_noDisplay[] = "{$tableName}_{$fieldName}";
}
// set alias = table-name, unless already set
$alias = isset($field['alias']) ? $field['alias'] : (
isset($this->_columns[$tableName]['alias']) ? $this->_columns[$tableName]['alias'] : $tableName
);
$this->_columns[$tableName][$fieldGrp][$fieldName]['alias'] = $alias;
// set name = fieldName, unless already set
if (!isset($this->_columns[$tableName][$fieldGrp][$fieldName]['name'])) {
$this->_columns[$tableName][$fieldGrp][$fieldName]['name'] = $name;
}
// set dbAlias = alias.name, unless already set
if (!isset($this->_columns[$tableName][$fieldGrp][$fieldName]['dbAlias'])) {
$this->_columns[$tableName][$fieldGrp][$fieldName]['dbAlias']
= $alias . '.' .
$this->_columns[$tableName][$fieldGrp][$fieldName]['name'];
}
// a few auto fills for filters
if ($fieldGrp == 'filters') {
// fill operator types
if (!array_key_exists('operatorType', $this->_columns[$tableName][$fieldGrp][$fieldName])) {
switch (CRM_Utils_Array::value('type', $this->_columns[$tableName][$fieldGrp][$fieldName])) {
case CRM_Utils_Type::T_MONEY:
case CRM_Utils_Type::T_FLOAT:
$this->_columns[$tableName][$fieldGrp][$fieldName]['operatorType'] = CRM_Report_Form::OP_FLOAT;
break;
case CRM_Utils_Type::T_INT:
$this->_columns[$tableName][$fieldGrp][$fieldName]['operatorType'] = CRM_Report_Form::OP_INT;
break;
case CRM_Utils_Type::T_DATE:
$this->_columns[$tableName][$fieldGrp][$fieldName]['operatorType'] = CRM_Report_Form::OP_DATE;
break;
case CRM_Utils_Type::T_BOOLEAN:
$this->_columns[$tableName][$fieldGrp][$fieldName]['operatorType'] = CRM_Report_Form::OP_SELECT;
if (!array_key_exists('options', $this->_columns[$tableName][$fieldGrp][$fieldName])) {
$this->_columns[$tableName][$fieldGrp][$fieldName]['options']
= array(
'' => ts('Any'),
'0' => ts('No'),
'1' => ts('Yes'),
);
}
break;
default:
if ($daoOrBaoName &&
array_key_exists('pseudoconstant', $this->_columns[$tableName][$fieldGrp][$fieldName])
) {
// with multiple options operator-type is generally multi-select
$this->_columns[$tableName][$fieldGrp][$fieldName]['operatorType'] = CRM_Report_Form::OP_MULTISELECT;
if (!array_key_exists('options', $this->_columns[$tableName][$fieldGrp][$fieldName])) {
// fill options
$this->_columns[$tableName][$fieldGrp][$fieldName]['options'] = CRM_Core_PseudoConstant::get($daoOrBaoName, $fieldName);
}
}
break;
}
}
}
}
}
}
// copy filters to a separate handy variable
if (array_key_exists('filters', $table)) {
$this->_filters[$tableName] = $this->_columns[$tableName]['filters'];
}
if (array_key_exists('group_bys', $table)) {
$groupBys[$tableName] = $this->_columns[$tableName]['group_bys'];
}
if (array_key_exists('fields', $table)) {
$reportFields[$tableName] = $this->_columns[$tableName]['fields'];
}
}
if ($this->_force) {
$this->setDefaultValues(FALSE);
}
CRM_Report_Utils_Get::processFilter($this->_filters, $this->_defaults);
CRM_Report_Utils_Get::processGroupBy($groupBys, $this->_defaults);
CRM_Report_Utils_Get::processFields($reportFields, $this->_defaults);
CRM_Report_Utils_Get::processChart($this->_defaults);
if ($this->_force) {
$this->_formValues = $this->_defaults;
$this->postProcess();
}
}
/**
* Set default values.
*
* @param bool $freeze
*
* @return array
*/
public function setDefaultValues($freeze = TRUE) {
$freezeGroup = array();
// FIXME: generalizing form field naming conventions would reduce
// Lots of lines below.
foreach ($this->_columns as $tableName => $table) {
if (array_key_exists('fields', $table)) {
foreach ($table['fields'] as $fieldName => $field) {
if (empty($field['no_display'])) {
if (isset($field['required'])) {
// set default
$this->_defaults['fields'][$fieldName] = 1;
if ($freeze) {
// find element object, so that we could use quickform's freeze method
// for required elements
$obj = $this->getElementFromGroup("fields", $fieldName);
if ($obj) {
$freezeGroup[] = $obj;
}
}
}
elseif (isset($field['default'])) {
$this->_defaults['fields'][$fieldName] = $field['default'];
}
}
}
}
if (array_key_exists('group_bys', $table)) {
foreach ($table['group_bys'] as $fieldName => $field) {
if (isset($field['default'])) {
if (!empty($field['frequency'])) {
$this->_defaults['group_bys_freq'][$fieldName] = 'MONTH';
}
$this->_defaults['group_bys'][$fieldName] = $field['default'];
}
}
}
if (array_key_exists('filters', $table)) {
foreach ($table['filters'] as $fieldName => $field) {
if (isset($field['default'])) {
if (CRM_Utils_Array::value('type', $field) & CRM_Utils_Type::T_DATE
) {
if (is_array($field['default'])) {
$this->_defaults["{$fieldName}_from"] = CRM_Utils_Array::value('from', $field['default']);
$this->_defaults["{$fieldName}_to"] = CRM_Utils_Array::value('to', $field['default']);
$this->_defaults["{$fieldName}_relative"] = 0;
}
else {
$this->_defaults["{$fieldName}_relative"] = $field['default'];
}
}
else {
if ((CRM_Utils_Array::value('type', $field) & CRM_Utils_Type::T_INT) && is_array($field['default'])) {
$this->_defaults["{$fieldName}_min"] = CRM_Utils_Array::value('min', $field['default']);
$this->_defaults["{$fieldName}_max"] = CRM_Utils_Array::value('max', $field['default']);
}
$this->_defaults["{$fieldName}_value"] = $field['default'];
}
}
//assign default value as "in" for multiselect
//operator, To freeze the select element
if (CRM_Utils_Array::value('operatorType', $field) ==
CRM_Report_Form::OP_MULTISELECT
) {
$this->_defaults["{$fieldName}_op"] = 'in';
}
if (CRM_Utils_Array::value('operatorType', $field) ==
CRM_Report_Form::OP_ENTITYREF
) {
$this->_defaults["{$fieldName}_op"] = 'in';
}
elseif (CRM_Utils_Array::value('operatorType', $field) ==
CRM_Report_Form::OP_MULTISELECT_SEPARATOR
) {
$this->_defaults["{$fieldName}_op"] = 'mhas';
}
elseif ($op = CRM_Utils_Array::value('default_op', $field)) {
$this->_defaults["{$fieldName}_op"] = $op;
}
}
}
if (
empty($this->_formValues['order_bys']) &&
(array_key_exists('order_bys', $table) &&
is_array($table['order_bys']))
) {
if (!array_key_exists('order_bys', $this->_defaults)) {
$this->_defaults['order_bys'] = array();
}
foreach ($table['order_bys'] as $fieldName => $field) {
if (!empty($field['default']) || !empty($field['default_order']) ||
CRM_Utils_Array::value('default_is_section', $field) ||
!empty($field['default_weight'])
) {
$order_by = array(
'column' => $fieldName,
'order' => CRM_Utils_Array::value('default_order', $field, 'ASC'),
'section' => CRM_Utils_Array::value('default_is_section', $field, 0),
);
if (!empty($field['default_weight'])) {
$this->_defaults['order_bys'][(int) $field['default_weight']] = $order_by;
}
else {
array_unshift($this->_defaults['order_bys'], $order_by);
}
}
}
}
foreach ($this->_options as $fieldName => $field) {
if (isset($field['default'])) {
$this->_defaults['options'][$fieldName] = $field['default'];
}
}
}
if (!empty($this->_submitValues)) {
$this->preProcessOrderBy($this->_submitValues);
}
else {
$this->preProcessOrderBy($this->_defaults);
}
// lets finish freezing task here itself
if (!empty($freezeGroup)) {
foreach ($freezeGroup as $elem) {
$elem->freeze();
}
}
if ($this->_formValues) {
$this->_defaults = array_merge($this->_defaults, $this->_formValues);
}
if ($this->_instanceValues) {
$this->_defaults = array_merge($this->_defaults, $this->_instanceValues);
}
CRM_Report_Form_Instance::setDefaultValues($this, $this->_defaults);
return $this->_defaults;
}
/**
* Get element from group.
*
* @param string $group
* @param string $grpFieldName
*
* @return bool
*/
public function getElementFromGroup($group, $grpFieldName) {
$eleObj = $this->getElement($group);
foreach ($eleObj->_elements as $index => $obj) {
if ($grpFieldName == $obj->_attributes['name']) {
return $obj;
}
}
return FALSE;
}
/**
* Setter for $_params.
*
* @param array $params
*/
public function setParams($params) {
$this->_params = $params;
}
/**
* Setter for $_id.
*
* @param int $instanceID
*/
public function setID($instanceID) {
$this->_id = $instanceID;
}
/**
* Setter for $_force.
*
* @param bool $isForce
*/
public function setForce($isForce) {
$this->_force = $isForce;
}
/**
* Setter for $_limitValue.
*
* @param int $_limitValue
*/
public function setLimitValue($_limitValue) {
$this->_limitValue = $_limitValue;
}
/**
* Setter for $_offsetValue.
*
* @param int $_offsetValue
*/
public function setOffsetValue($_offsetValue) {
$this->_offsetValue = $_offsetValue;
}
/**
* Setter for $addPaging.
*
* @param bool $value
*/
public function setAddPaging($value) {
$this->addPaging = $value;
}
/**
* Getter for $_defaultValues.
*
* @return array
*/
public function getDefaultValues() {
return $this->_defaults;
}
/**
* Add columns to report.
*/
public function addColumns() {
$options = array();
$colGroups = NULL;
foreach ($this->_columns as $tableName => $table) {
if (array_key_exists('fields', $table)) {
foreach ($table['fields'] as $fieldName => $field) {
$groupTitle = '';
if (empty($field['no_display'])) {
foreach (array('table', 'field') as $var) {
if (!empty(${$var}['grouping'])) {
if (!is_array(${$var}['grouping'])) {
$tableName = ${$var}['grouping'];
}
else {
$tableName = array_keys(${$var}['grouping']);
$tableName = $tableName[0];
$groupTitle = array_values(${$var}['grouping']);
$groupTitle = $groupTitle[0];
}
}
}
if (!$groupTitle && isset($table['group_title'])) {
$groupTitle = $table['group_title'];
// Having a group_title is secret code for being a custom group
// which cryptically translates to needing an accordion.
// here we make that explicit.
$colGroups[$tableName]['use_accordian_for_field_selection'] = TRUE;
}
$colGroups[$tableName]['fields'][$fieldName] = CRM_Utils_Array::value('title', $field);
if ($groupTitle && empty($colGroups[$tableName]['group_title'])) {
$colGroups[$tableName]['group_title'] = $groupTitle;
}
$options[$fieldName] = CRM_Utils_Array::value('title', $field);
}
}
}
}
$this->addCheckBox("fields", ts('Select Columns'), $options, NULL,
NULL, NULL, NULL, $this->_fourColumnAttribute, TRUE
);
if (!empty($colGroups)) {
$this->tabs['FieldSelection'] = array(
'title' => ts('Columns'),
'tpl' => 'FieldSelection',
'div_label' => 'col-groups',
);
// Note this assignment is only really required in buildForm. It is being 'over-called'
// to reduce risk of being missed due to overridden functions.
$this->assign('tabs', $this->tabs);
}
$this->assign('colGroups', $colGroups);
}
/**
* Add filters to report.
*/
public function addFilters() {
$filters = $filterGroups = array();
$count = 1;
foreach ($this->_filters as $table => $attributes) {
if (isset($this->_columns[$table]['group_title'])) {
// The presence of 'group_title' is secret code for 'is_a_custom_table'
// which magically means to 'display in an accordian'
// here we make this explicit.
$filterGroups[$table] = array(
'group_title' => $this->_columns[$table]['group_title'],
'use_accordian_for_field_selection' => TRUE,
);
}
foreach ($attributes as $fieldName => $field) {
// get ready with option value pair
// @ todo being able to specific options for a field (e.g a date field) in the field spec as an array rather than an override
// would be useful
$operations = $this->getOperationPair(
CRM_Utils_Array::value('operatorType', $field),
$fieldName);
$filters[$table][$fieldName] = $field;
switch (CRM_Utils_Array::value('operatorType', $field)) {
case CRM_Report_Form::OP_MONTH:
if (!array_key_exists('options', $field) ||
!is_array($field['options']) || empty($field['options'])
) {
// If there's no option list for this filter, define one.
$field['options'] = array(
1 => ts('January'),
2 => ts('February'),
3 => ts('March'),
4 => ts('April'),
5 => ts('May'),
6 => ts('June'),
7 => ts('July'),
8 => ts('August'),
9 => ts('September'),
10 => ts('October'),
11 => ts('November'),
12 => ts('December'),
);
// Add this option list to this column _columns. This is
// required so that filter statistics show properly.
$this->_columns[$table]['filters'][$fieldName]['options'] = $field['options'];
}
case CRM_Report_Form::OP_MULTISELECT:
case CRM_Report_Form::OP_MULTISELECT_SEPARATOR:
// assume a multi-select field
if (!empty($field['options']) ||
$fieldName == 'state_province_id' || $fieldName == 'county_id'
) {
$element = $this->addElement('select', "{$fieldName}_op", ts('Operator:'), $operations);
if (count($operations) <= 1) {
$element->freeze();
}
if ($fieldName == 'state_province_id' ||
$fieldName == 'county_id'
) {
$this->addChainSelect($fieldName . '_value', array(
'multiple' => TRUE,
'label' => NULL,
'class' => 'huge',
));
}
else {
$this->addElement('select', "{$fieldName}_value", NULL, $field['options'], array(
'style' => 'min-width:250px',
'class' => 'crm-select2 huge',
'multiple' => TRUE,
'placeholder' => ts('- select -'),
));
}
}
break;
case CRM_Report_Form::OP_SELECT:
// assume a select field
$this->addElement('select', "{$fieldName}_op", ts('Operator:'), $operations);
if (!empty($field['options'])) {
$this->addElement('select', "{$fieldName}_value", NULL, $field['options']);
}
break;
case CRM_Report_Form::OP_ENTITYREF:
$this->addElement('select', "{$fieldName}_op", ts('Operator:'), $operations);
$this->setEntityRefDefaults($field, $table);
$this->addEntityRef("{$fieldName}_value", NULL, $field['attributes']);
break;
case CRM_Report_Form::OP_DATE:
// build datetime fields
CRM_Core_Form_Date::buildDateRange($this, $fieldName, $count, '_from', '_to', ts('From:'), FALSE, $operations);
$count++;
break;
case CRM_Report_Form::OP_DATETIME:
// build datetime fields
CRM_Core_Form_Date::buildDateRange($this, $fieldName, $count, '_from', '_to', ts('From:'), FALSE, $operations, 'searchDate', TRUE);
$count++;
break;
case CRM_Report_Form::OP_INT:
case CRM_Report_Form::OP_FLOAT:
// and a min value input box
$this->add('text', "{$fieldName}_min", ts('Min'));
// and a max value input box
$this->add('text', "{$fieldName}_max", ts('Max'));
default:
// default type is string
$this->addElement('select', "{$fieldName}_op", ts('Operator:'), $operations,
array('onchange' => "return showHideMaxMinVal( '$fieldName', this.value );")
);
// we need text box for value input
$this->add('text', "{$fieldName}_value", NULL, array('class' => 'huge'));
break;
}
}
}
if (!empty($filters)) {
$this->tabs['Filters'] = array(
'title' => ts('Filters'),
'tpl' => 'Filters',
'div_label' => 'set-filters',
);
}
$this->assign('filters', $filters);
$this->assign('filterGroups', $filterGroups);
}
/**
* Function to assign the tabs to the template in the correct order.
*
* We want the tabs to wind up in this order (if not overridden).
*
* - Field Selection
* - Group Bys
* - Order Bys
* - Other Options
* - Filters
*/
protected function assignTabs() {
$order = array(
'FieldSelection',
'GroupBy',
'OrderBy',
'ReportOptions',
'Filters',
);
$order = array_intersect_key(array_fill_keys($order, 1), $this->tabs);
$order = array_merge($order, $this->tabs);
$this->assign('tabs', $order);
}
/**
* The intent is to add a tab for developers to view the sql.
*
* Currently using dpm.
*
* @param string $sql
*/
protected function addToDeveloperTab($sql) {
if (!CRM_Core_Permission::check('view report sql')) {
return;
}
$this->tabs['Developer'] = array(
'title' => ts('Developer'),
'tpl' => 'Developer',
'div_label' => 'set-developer',
);
$this->assignTabs();
$this->sqlArray[] = $sql;
foreach ($this->sqlArray as $sql) {
foreach (array('LEFT JOIN') as $term) {
$sql = str_replace($term, '<br>&nbsp&nbsp' . $term, $sql);
}
foreach (array('FROM', 'WHERE', 'GROUP BY', 'ORDER BY', 'LIMIT', ';') as $term) {
$sql = str_replace($term, '<br><br>' . $term, $sql);
}
$this->sqlFormattedArray[] = $sql;
$this->assign('sql', implode(';<br><br><br><br>', $this->sqlFormattedArray));
}
}
/**
* Add options defined in $this->_options to the report.
*/
public function addOptions() {
if (!empty($this->_options)) {
// FIXME: For now lets build all elements as checkboxes.
// Once we clear with the format we can build elements based on type
foreach ($this->_options as $fieldName => $field) {
$options = array();
if ($field['type'] == 'select') {
$this->addElement('select', "{$fieldName}", $field['title'], $field['options']);
}
elseif ($field['type'] == 'checkbox') {
$options[$field['title']] = $fieldName;
$this->addCheckBox($fieldName, NULL,
$options, NULL,
NULL, NULL, NULL, $this->_fourColumnAttribute
);
}
}
}
if (!empty($this->_options) &&
(!$this->_id
|| ($this->_id && CRM_Report_BAO_ReportInstance::contactCanAdministerReport($this->_id)))
) {
$this->tabs['ReportOptions'] = array(
'title' => ts('Display Options'),
'tpl' => 'ReportOptions',
'div_label' => 'other-options',
);
}
$this->assign('otherOptions', $this->_options);
}
/**
* Add chart options to the report.
*/
public function addChartOptions() {
if (!empty($this->_charts)) {
$this->addElement('select', "charts", ts('Chart'), $this->_charts);
$this->assign('charts', $this->_charts);
$this->addElement('submit', $this->_chartButtonName, ts('View'));
}
}
/**
* Add group by options to the report.
*/
public function addGroupBys() {
$options = $freqElements = array();
foreach ($this->_columns as $tableName => $table) {
if (array_key_exists('group_bys', $table)) {
foreach ($table['group_bys'] as $fieldName => $field) {
if (!empty($field)) {
$options[$field['title']] = $fieldName;
if (!empty($field['frequency'])) {
$freqElements[$field['title']] = $fieldName;
}
}
}
}
}
$this->addCheckBox("group_bys", ts('Group by columns'), $options, NULL,
NULL, NULL, NULL, $this->_fourColumnAttribute
);
$this->assign('groupByElements', $options);
if (!empty($options)) {
$this->tabs['GroupBy'] = array(
'title' => ts('Grouping'),
'tpl' => 'GroupBy',
'div_label' => 'group-by-elements',
);
}
foreach ($freqElements as $name) {
$this->addElement('select', "group_bys_freq[$name]",
ts('Frequency'), $this->_groupByDateFreq
);
}
}
/**
* Add data for order by tab.
*/
public function addOrderBys() {
$options = array();
foreach ($this->_columns as $tableName => $table) {
// Report developer may define any column to order by; include these as order-by options.
if (array_key_exists('order_bys', $table)) {
foreach ($table['order_bys'] as $fieldName => $field) {
if (!empty($field)) {
$options[$fieldName] = $field['title'];
}
}
}
// Add searchable custom fields as order-by options, if so requested
// (These are already indexed, so allowing to order on them is cheap.)
if ($this->_autoIncludeIndexedFieldsAsOrderBys &&
array_key_exists('extends', $table) && !empty($table['extends'])
) {
foreach ($table['fields'] as $fieldName => $field) {
if (empty($field['no_display'])) {
$options[$fieldName] = $field['title'];
}
}
}
}
asort($options);
$this->assign('orderByOptions', $options);
if (!empty($options)) {
$this->tabs['OrderBy'] = array(
'title' => ts('Sorting'),
'tpl' => 'OrderBy',
'div_label' => 'order-by-elements',
);
}
if (!empty($options)) {
$options = array(
'-' => ' - none - ',
) + $options;
for ($i = 1; $i <= 5; $i++) {
$this->addElement('select', "order_bys[{$i}][column]", ts('Order by Column'), $options);
$this->addElement('select', "order_bys[{$i}][order]", ts('Order by Order'), array(
'ASC' => ts('Ascending'),
'DESC' => ts('Descending'),
));
$this->addElement('checkbox', "order_bys[{$i}][section]", ts('Order by Section'), FALSE, array('id' => "order_by_section_$i"));
$this->addElement('checkbox', "order_bys[{$i}][pageBreak]", ts('Page Break'), FALSE, array('id' => "order_by_pagebreak_$i"));
}
}
}
/**
* This adds the tab referred to as Title and Format, rendered through Instance.tpl.
*
* @todo call this tab into the report template in the same way as OrderBy etc, ie
* by adding a description of the tab to $this->tabs, causing the tab to be added in
* Criteria.tpl.
*/
public function buildInstanceAndButtons() {
CRM_Report_Form_Instance::buildForm($this);
$this->_actionButtonName = $this->getButtonName('submit');
$this->addTaskMenu($this->getActions($this->_id));
$this->assign('instanceForm', $this->_instanceForm);
// CRM-16274 Determine if user has 'edit all contacts' or equivalent
$permission = CRM_Core_Permission::getPermission();
if ($permission == CRM_Core_Permission::EDIT &&
$this->_add2groupSupported
) {
$this->addElement('select', 'groups', ts('Group'),
array('' => ts('Add Contacts to Group')) +
CRM_Core_PseudoConstant::nestedGroup(),
array('class' => 'crm-select2 crm-action-menu fa-plus huge')
);
$this->assign('group', TRUE);
}
$this->addElement('submit', $this->_groupButtonName, '', array('style' => 'display: none;'));
$this->addChartOptions();
$showResultsLabel = $this->getResultsLabel();
$this->addButtons(array(
array(
'type' => 'submit',
'name' => $showResultsLabel,
'isDefault' => TRUE,
),
)
);
}
/**
* Has this form been submitted already?
*
* @return bool
*/
public function resultsDisplayed() {
$buttonName = $this->controller->getButtonName();
return ($buttonName || $this->_outputMode);
}
/**
* Get the actions for this report instance.
*
* @param int $instanceId
*
* @return array
*/
protected function getActions($instanceId) {
$actions = CRM_Report_BAO_ReportInstance::getActionMetadata();
if (empty($instanceId)) {
$actions['report_instance.save'] = array(
'title' => ts('Create Report'),
'data' => array(
'is_confirm' => TRUE,
'confirm_title' => ts('Create Report'),
'confirm_refresh_fields' => json_encode(array(
'title' => array('selector' => '.crm-report-instanceForm-form-block-title', 'prepend' => ''),
'description' => array('selector' => '.crm-report-instanceForm-form-block-description', 'prepend' => ''),
)),
),
);
}
if (!$this->_csvSupported) {
unset($actions['report_instance.csv']);
}
return $actions;
}
/**
* Main build form function.
*/
public function buildQuickForm() {
$this->addColumns();
$this->addFilters();
$this->addOptions();
$this->addGroupBys();
$this->addOrderBys();
$this->buildInstanceAndButtons();
// Add form rule for report.
if (is_callable(array(
$this,
'formRule',
))) {
$this->addFormRule(array(get_class($this), 'formRule'), $this);
}
$this->assignTabs();
}
/**
* A form rule function for custom data.
*
* The rule ensures that fields selected in group_by if any) should only be the ones
* present in display/select fields criteria;
* note: works if and only if any custom field selected in group_by.
*
* @param array $fields
* @param array $ignoreFields
*
* @return array
*/
public function customDataFormRule($fields, $ignoreFields = array()) {
$errors = array();
if (!empty($this->_customGroupExtends) && $this->_customGroupGroupBy &&
!empty($fields['group_bys'])
) {
foreach ($this->_columns as $tableName => $table) {
if ((substr($tableName, 0, 13) == 'civicrm_value' ||
substr($tableName, 0, 12) == 'custom_value') &&
!empty($this->_columns[$tableName]['fields'])
) {
foreach ($this->_columns[$tableName]['fields'] as $fieldName => $field) {
if (array_key_exists($fieldName, $fields['group_bys']) &&
!array_key_exists($fieldName, $fields['fields'])
) {
$errors['fields'] = "Please make sure fields selected in 'Group by Columns' section are also selected in 'Display Columns' section.";
}
elseif (array_key_exists($fieldName, $fields['group_bys'])) {
foreach ($fields['fields'] as $fld => $val) {
if (!array_key_exists($fld, $fields['group_bys']) &&
!in_array($fld, $ignoreFields)
) {
$errors['fields'] = "Please ensure that fields selected in 'Display Columns' are also selected in 'Group by Columns' section.";
}
}
}
}
}
}
}
return $errors;
}
/**
* Get operators to display on form.
*
* Note: $fieldName param allows inheriting class to build operationPairs specific to a field.
*
* @param string $type
* @param string $fieldName
*
* @return array
*/
public function getOperationPair($type = "string", $fieldName = NULL) {
// FIXME: At some point we should move these key-val pairs
// to option_group and option_value table.
switch ($type) {
case CRM_Report_Form::OP_INT:
case CRM_Report_Form::OP_FLOAT:
$result = array(
'lte' => ts('Is less than or equal to'),
'gte' => ts('Is greater than or equal to'),
'bw' => ts('Is between'),
'eq' => ts('Is equal to'),
'lt' => ts('Is less than'),
'gt' => ts('Is greater than'),
'neq' => ts('Is not equal to'),
'nbw' => ts('Is not between'),
'nll' => ts('Is empty (Null)'),
'nnll' => ts('Is not empty (Null)'),
);
return $result;
case CRM_Report_Form::OP_SELECT:
$result = array(
'eq' => ts('Is equal to'),
);
return $result;
case CRM_Report_Form::OP_MONTH:
case CRM_Report_Form::OP_MULTISELECT:
case CRM_Report_Form::OP_ENTITYREF:
$result = array(
'in' => ts('Is one of'),
'notin' => ts('Is not one of'),
);
return $result;
case CRM_Report_Form::OP_DATE:
$result = array(
'nll' => ts('Is empty (Null)'),
'nnll' => ts('Is not empty (Null)'),
);
return $result;
case CRM_Report_Form::OP_MULTISELECT_SEPARATOR:
// use this operator for the values, concatenated with separator. For e.g if
// multiple options for a column is stored as ^A{val1}^A{val2}^A
$result = array(
'mhas' => ts('Is one of'),
'mnot' => ts('Is not one of'),
);
return $result;
default:
// type is string
$result = array(
'has' => ts('Contains'),
'sw' => ts('Starts with'),
'ew' => ts('Ends with'),
'nhas' => ts('Does not contain'),
'eq' => ts('Is equal to'),
'neq' => ts('Is not equal to'),
'nll' => ts('Is empty (Null)'),
'nnll' => ts('Is not empty (Null)'),
);
return $result;
}
}
/**
* Build the tag filter field to display on the filters tab.
*/
public function buildTagFilter() {
$contactTags = CRM_Core_BAO_Tag::getTags($this->_tagFilterTable);
if (!empty($contactTags)) {
$this->_columns['civicrm_tag'] = array(
'dao' => 'CRM_Core_DAO_Tag',
'filters' => array(
'tagid' => array(
'name' => 'tag_id',
'title' => ts('Tag'),
'type' => CRM_Utils_Type::T_INT,
'tag' => TRUE,
'operatorType' => CRM_Report_Form::OP_MULTISELECT,
'options' => $contactTags,
),
),
);
}
}
/**
* Adds group filters to _columns (called from _Construct).
*/
public function buildGroupFilter() {
$this->_columns['civicrm_group']['filters'] = array(
'gid' => array(
'name' => 'group_id',
'title' => ts('Group'),
'type' => CRM_Utils_Type::T_INT,
'operatorType' => CRM_Report_Form::OP_MULTISELECT,
'group' => TRUE,
'options' => CRM_Core_PseudoConstant::nestedGroup(),
),
);
if (empty($this->_columns['civicrm_group']['dao'])) {
$this->_columns['civicrm_group']['dao'] = 'CRM_Contact_DAO_GroupContact';
}
if (empty($this->_columns['civicrm_group']['alias'])) {
$this->_columns['civicrm_group']['alias'] = 'cgroup';
}
}
/**
* Get SQL operator from form text version.
*
* @param string $operator
*
* @return string
*/
public function getSQLOperator($operator = "like") {
switch ($operator) {
case 'eq':
return '=';
case 'lt':
return '<';
case 'lte':
return '<=';
case 'gt':
return '>';
case 'gte':
return '>=';
case 'ne':
case 'neq':
return '!=';
case 'nhas':
return 'NOT LIKE';
case 'in':
return 'IN';
case 'notin':
return 'NOT IN';
case 'nll':
return 'IS NULL';
case 'nnll':
return 'IS NOT NULL';
default:
// type is string
return 'LIKE';
}
}
/**
* Generate where clause.
*
* This can be overridden in reports for special treatment of a field
*
* @param array $field Field specifications
* @param string $op Query operator (not an exact match to sql)
* @param mixed $value
* @param float $min
* @param float $max
*
* @return null|string
*/
public function whereClause(&$field, $op, $value, $min, $max) {
$type = CRM_Utils_Type::typeToString(CRM_Utils_Array::value('type', $field));
// CRM-18010: Ensure type of each report filters
if (!$type) {
trigger_error('Type is not defined for field ' . $field['name'], E_USER_WARNING);
}
$clause = NULL;
switch ($op) {
case 'bw':
case 'nbw':
if (($min !== NULL && strlen($min) > 0) ||
($max !== NULL && strlen($max) > 0)
) {
$clauses = array();
if ($min) {
$min = CRM_Utils_Type::escape($min, $type);
if ($op == 'bw') {
$clauses[] = "( {$field['dbAlias']} >= $min )";
}
else {
$clauses[] = "( {$field['dbAlias']} < $min OR {$field['dbAlias']} IS NULL )";
}
}
if ($max) {
$max = CRM_Utils_Type::escape($max, $type);
if ($op == 'bw') {
$clauses[] = "( {$field['dbAlias']} <= $max )";
}
else {
$clauses[] = "( {$field['dbAlias']} > $max )";
}
}
if (!empty($clauses)) {
if ($op == 'bw') {
$clause = implode(' AND ', $clauses);
}
else {
$clause = '(' . implode('OR', $clauses) . ')';
}
}
}
break;
case 'has':
case 'nhas':
if ($value !== NULL && strlen($value) > 0) {
$value = CRM_Utils_Type::escape($value, $type);
if (strpos($value, '%') === FALSE) {
$value = "'%{$value}%'";
}
else {
$value = "'{$value}'";
}
$sqlOP = $this->getSQLOperator($op);
$clause = "( {$field['dbAlias']} $sqlOP $value )";
}
break;
case 'in':
case 'notin':
if ((is_string($value) || is_numeric($value)) && strlen($value)) {
$value = explode(',', $value);
}
if ($value !== NULL && is_array($value) && count($value) > 0) {
$sqlOP = $this->getSQLOperator($op);
if (CRM_Utils_Array::value('type', $field) ==
CRM_Utils_Type::T_STRING
) {
//cycle through selections and escape values
foreach ($value as $key => $selection) {
$value[$key] = CRM_Utils_Type::escape($selection, $type);
}
$clause
= "( {$field['dbAlias']} $sqlOP ( '" . implode("' , '", $value) .
"') )";
}
else {
// for numerical values
$clause = "{$field['dbAlias']} $sqlOP (" . implode(', ', $value) .
")";
}
if ($op == 'notin') {
$clause = "( " . $clause . " OR {$field['dbAlias']} IS NULL )";
}
else {
$clause = "( " . $clause . " )";
}
}
break;
case 'mhas':
case 'mnot':
// multiple has or multiple not
if ($value !== NULL && count($value) > 0) {
$value = CRM_Utils_Type::escapeAll($value, $type);
$operator = $op == 'mnot' ? 'NOT' : '';
$regexp = "([[:cntrl:]]|^)" . implode('([[:cntrl:]]|$)|([[:cntrl:]]|^)', (array) $value) . "([[:cntrl:]]|$)";
$clause = "{$field['dbAlias']} {$operator} REGEXP '{$regexp}'";
}
break;
case 'sw':
case 'ew':
if ($value !== NULL && strlen($value) > 0) {
$value = CRM_Utils_Type::escape($value, $type);
if (strpos($value, '%') === FALSE) {
if ($op == 'sw') {
$value = "'{$value}%'";
}
else {
$value = "'%{$value}'";
}
}
else {
$value = "'{$value}'";
}
$sqlOP = $this->getSQLOperator($op);
$clause = "( {$field['dbAlias']} $sqlOP $value )";
}
break;
case 'nll':
case 'nnll':
$sqlOP = $this->getSQLOperator($op);
$clause = "( {$field['dbAlias']} $sqlOP )";
break;
case 'eq':
case 'neq':
case 'ne':
//CRM-18457: some custom field passes value in array format against binary operator
if (is_array($value) && count($value)) {
$value = $value[0];
}
default:
if ($value !== NULL && $value !== '') {
if (isset($field['clause'])) {
// FIXME: we not doing escape here. Better solution is to use two
// different types - data-type and filter-type
$clause = $field['clause'];
}
elseif (!is_array($value)) {
$value = CRM_Utils_Type::escape($value, $type);
$sqlOP = $this->getSQLOperator($op);
if ($field['type'] == CRM_Utils_Type::T_STRING) {
$value = "'{$value}'";
}
$clause = "( {$field['dbAlias']} $sqlOP $value )";
}
}
break;
}
if (!empty($field['group']) && $clause) {
$clause = $this->whereGroupClause($field, $value, $op);
}
elseif (!empty($field['tag']) && $clause) {
// not using left join in query because if any contact
// belongs to more than one tag, results duplicate
// entries.
$clause = $this->whereTagClause($field, $value, $op);
}
elseif (!empty($field['membership_org']) && $clause) {
$clause = $this->whereMembershipOrgClause($value, $op);
}
elseif (!empty($field['membership_type']) && $clause) {
$clause = $this->whereMembershipTypeClause($value, $op);
}
return $clause;
}
/**
* Get SQL where clause for a date field.
*
* @param string $fieldName
* @param string $relative
* @param string $from
* @param string $to
* @param string $type
* @param string $fromTime
* @param string $toTime
*
* @return null|string
*/
public function dateClause(
$fieldName,
$relative, $from, $to, $type = NULL, $fromTime = NULL, $toTime = NULL
) {
$clauses = array();
if (in_array($relative, array_keys($this->getOperationPair(CRM_Report_Form::OP_DATE)))) {
$sqlOP = $this->getSQLOperator($relative);
return "( {$fieldName} {$sqlOP} )";
}
list($from, $to) = $this->getFromTo($relative, $from, $to, $fromTime, $toTime);
if ($from) {
$from = ($type == CRM_Utils_Type::T_DATE) ? substr($from, 0, 8) : $from;
$clauses[] = "( {$fieldName} >= $from )";
}
if ($to) {
$to = ($type == CRM_Utils_Type::T_DATE) ? substr($to, 0, 8) : $to;
$clauses[] = "( {$fieldName} <= {$to} )";
}
if (!empty($clauses)) {
return implode(' AND ', $clauses);
}
return NULL;
}
/**
* Get values for from and to for date ranges.
*
* @param bool $relative
* @param string $from
* @param string $to
* @param string $fromTime
* @param string $toTime
*
* @return array
*/
public function getFromTo($relative, $from, $to, $fromTime = NULL, $toTime = NULL) {
if (empty($toTime)) {
$toTime = '235959';
}
//FIX ME not working for relative
if ($relative) {
list($term, $unit) = CRM_Utils_System::explode('.', $relative, 2);
$dateRange = CRM_Utils_Date::relativeToAbsolute($term, $unit);
$from = substr($dateRange['from'], 0, 8);
//Take only Date Part, Sometime Time part is also present in 'to'
$to = substr($dateRange['to'], 0, 8);
}
$from = CRM_Utils_Date::processDate($from, $fromTime);
$to = CRM_Utils_Date::processDate($to, $toTime);
return array($from, $to);
}
/**
* Alter display of rows.
*
* Iterate through the rows retrieved via SQL and make changes for display purposes,
* such as rendering contacts as links.
*
* @param array $rows
* Rows generated by SQL, with an array for each row.
*/
public function alterDisplay(&$rows) {
}
/**
* Alter the way in which custom data fields are displayed.
*
* @param array $rows
*/
public function alterCustomDataDisplay(&$rows) {
// custom code to alter rows having custom values
if (empty($this->_customGroupExtends)) {
return;
}
$customFields = array();
$customFieldIds = array();
foreach ($this->_params['fields'] as $fieldAlias => $value) {
if ($fieldId = CRM_Core_BAO_CustomField::getKeyID($fieldAlias)) {
$customFieldIds[$fieldAlias] = $fieldId;
}
}
if (empty($customFieldIds)) {
return;
}
// skip for type date and ContactReference since date format is already handled
$query = "
SELECT cg.table_name, cf.id
FROM civicrm_custom_field cf
INNER JOIN civicrm_custom_group cg ON cg.id = cf.custom_group_id
WHERE cg.extends IN ('" . implode("','", $this->_customGroupExtends) . "') AND
cg.is_active = 1 AND
cf.is_active = 1 AND
cf.is_searchable = 1 AND
cf.data_type NOT IN ('ContactReference', 'Date') AND
cf.id IN (" . implode(",", $customFieldIds) . ")";
$dao = CRM_Core_DAO::executeQuery($query);
while ($dao->fetch()) {
$customFields[$dao->table_name . '_custom_' . $dao->id] = $dao->id;
}
$dao->free();
$entryFound = FALSE;
foreach ($rows as $rowNum => $row) {
foreach ($row as $tableCol => $val) {
if (array_key_exists($tableCol, $customFields)) {
$rows[$rowNum][$tableCol] = CRM_Core_BAO_CustomField::displayValue($val, $customFields[$tableCol]);
$entryFound = TRUE;
}
}
// skip looking further in rows, if first row itself doesn't
// have the column we need
if (!$entryFound) {
break;
}
}
}
/**
* Remove duplicate rows.
*
* @param array $rows
*/
public function removeDuplicates(&$rows) {
if (empty($this->_noRepeats)) {
return;
}
$checkList = array();
foreach ($rows as $key => $list) {
foreach ($list as $colName => $colVal) {
if (array_key_exists($colName, $checkList) &&
$checkList[$colName] == $colVal
) {
$rows[$key][$colName] = "";
}
if (in_array($colName, $this->_noRepeats)) {
$checkList[$colName] = $colVal;
}
}
}
}
/**
* Fix subtotal display.
*
* @param array $row
* @param array $fields
* @param bool $subtotal
*/
public function fixSubTotalDisplay(&$row, $fields, $subtotal = TRUE) {
foreach ($row as $colName => $colVal) {
if (in_array($colName, $fields)) {
}
elseif (isset($this->_columnHeaders[$colName])) {
if ($subtotal) {
$row[$colName] = 'Subtotal';
$subtotal = FALSE;
}
else {
unset($row[$colName]);
}
}
}
}
/**
* Calculate grant total.
*
* @param array $rows
*
* @return bool
*/
public function grandTotal(&$rows) {
if (!$this->_rollup || count($rows) == 1) {
return FALSE;
}
$this->moveSummaryColumnsToTheRightHandSide();
if ($this->_limit && count($rows) >= self::ROW_COUNT_LIMIT) {
return FALSE;
}
$this->rollupRow = array_pop($rows);
foreach ($this->_columnHeaders as $fld => $val) {
if (!in_array($fld, $this->_statFields)) {
if (!$this->_grandFlag) {
$this->rollupRow[$fld] = ts('Grand Total');
$this->_grandFlag = TRUE;
}
else {
$this->rollupRow[$fld] = "";
}
}
}
$this->assign('grandStat', $this->rollupRow);
return TRUE;
}
/**
* Format display output.
*
* @param array $rows
* @param bool $pager
*/
public function formatDisplay(&$rows, $pager = TRUE) {
// set pager based on if any limit was applied in the query.
if ($pager) {
$this->setPager();
}
// allow building charts if any
if (!empty($this->_params['charts']) && !empty($rows)) {
$this->buildChart($rows);
$this->assign('chartEnabled', TRUE);
$this->_chartId = "{$this->_params['charts']}_" .
($this->_id ? $this->_id : substr(get_class($this), 16)) . '_' .
session_id();
$this->assign('chartId', $this->_chartId);
}
// unset columns not to be displayed.
foreach ($this->_columnHeaders as $key => $value) {
if (!empty($value['no_display'])) {
unset($this->_columnHeaders[$key]);
}
}
// unset columns not to be displayed.
if (!empty($rows)) {
foreach ($this->_noDisplay as $noDisplayField) {
foreach ($rows as $rowNum => $row) {
unset($this->_columnHeaders[$noDisplayField]);
}
}
}
// build array of section totals
$this->sectionTotals();
// process grand-total row
$this->grandTotal($rows);
// use this method for formatting rows for display purpose.
$this->alterDisplay($rows);
CRM_Utils_Hook::alterReportVar('rows', $rows, $this);
// use this method for formatting custom rows for display purpose.
$this->alterCustomDataDisplay($rows);
}
/**
* Build chart.
*
* @param array $rows
*/
public function buildChart(&$rows) {
// override this method for building charts.
}
// select() method below has been added recently (v3.3), and many of the report templates might
// still be having their own select() method. We should fix them as and when encountered and move
// towards generalizing the select() method below.
/**
* Generate the SELECT clause and set class variable $_select.
*/
public function select() {
$select = $this->_selectAliases = array();
foreach ($this->_columns as $tableName => $table) {
if (array_key_exists('fields', $table)) {
foreach ($table['fields'] as $fieldName => $field) {
if ($tableName == 'civicrm_address') {
// deprecated, use $this->isTableSelected.
$this->_addressField = TRUE;
}
if ($tableName == 'civicrm_email') {
$this->_emailField = TRUE;
}
if ($tableName == 'civicrm_phone') {
$this->_phoneField = TRUE;
}
if (!empty($field['required']) ||
!empty($this->_params['fields'][$fieldName])
) {
// 1. In many cases we want select clause to be built in slightly different way
// for a particular field of a particular type.
// 2. This method when used should receive params by reference and modify $this->_columnHeaders
// as needed.
$selectClause = $this->selectClause($tableName, 'fields', $fieldName, $field);
if ($selectClause) {
$select[] = $selectClause;
continue;
}
// include statistics columns only if set
if (!empty($field['statistics'])) {
$select = $this->addStatisticsToSelect($field, $tableName, $fieldName, $select);
}
else {
$select = $this->addBasicFieldToSelect($tableName, $fieldName, $field, $select);
}
}
}
}
// select for group bys
if (array_key_exists('group_bys', $table)) {
foreach ($table['group_bys'] as $fieldName => $field) {
if ($tableName == 'civicrm_address') {
$this->_addressField = TRUE;
}
if ($tableName == 'civicrm_email') {
$this->_emailField = TRUE;
}
if ($tableName == 'civicrm_phone') {
$this->_phoneField = TRUE;
}
// 1. In many cases we want select clause to be built in slightly different way
// for a particular field of a particular type.
// 2. This method when used should receive params by reference and modify $this->_columnHeaders
// as needed.
$selectClause = $this->selectClause($tableName, 'group_bys', $fieldName, $field);
if ($selectClause) {
$select[] = $selectClause;
continue;
}
if (!empty($this->_params['group_bys']) &&
!empty($this->_params['group_bys'][$fieldName]) &&
!empty($this->_params['group_bys_freq'])
) {
switch (CRM_Utils_Array::value($fieldName, $this->_params['group_bys_freq'])) {
case 'YEARWEEK':
$select[] = "DATE_SUB({$field['dbAlias']}, INTERVAL WEEKDAY({$field['dbAlias']}) DAY) AS {$tableName}_{$fieldName}_start";
$select[] = "YEARWEEK({$field['dbAlias']}) AS {$tableName}_{$fieldName}_subtotal";
$select[] = "WEEKOFYEAR({$field['dbAlias']}) AS {$tableName}_{$fieldName}_interval";
$field['title'] = 'Week';
break;
case 'YEAR':
$select[] = "MAKEDATE(YEAR({$field['dbAlias']}), 1) AS {$tableName}_{$fieldName}_start";
$select[] = "YEAR({$field['dbAlias']}) AS {$tableName}_{$fieldName}_subtotal";
$select[] = "YEAR({$field['dbAlias']}) AS {$tableName}_{$fieldName}_interval";
$field['title'] = 'Year';
break;
case 'MONTH':
$select[] = "DATE_SUB({$field['dbAlias']}, INTERVAL (DAYOFMONTH({$field['dbAlias']})-1) DAY) as {$tableName}_{$fieldName}_start";
$select[] = "MONTH({$field['dbAlias']}) AS {$tableName}_{$fieldName}_subtotal";
$select[] = "MONTHNAME({$field['dbAlias']}) AS {$tableName}_{$fieldName}_interval";
$field['title'] = 'Month';
break;
case 'QUARTER':
$select[] = "STR_TO_DATE(CONCAT( 3 * QUARTER( {$field['dbAlias']} ) -2 , '/', '1', '/', YEAR( {$field['dbAlias']} ) ), '%m/%d/%Y') AS {$tableName}_{$fieldName}_start";
$select[] = "QUARTER({$field['dbAlias']}) AS {$tableName}_{$fieldName}_subtotal";
$select[] = "QUARTER({$field['dbAlias']}) AS {$tableName}_{$fieldName}_interval";
$field['title'] = 'Quarter';
break;
}
// for graphs and charts -
if (!empty($this->_params['group_bys_freq'][$fieldName])) {
$this->_interval = $field['title'];
$this->_columnHeaders["{$tableName}_{$fieldName}_start"]['title']
= $field['title'] . ' Beginning';
$this->_columnHeaders["{$tableName}_{$fieldName}_start"]['type'] = $field['type'];
$this->_columnHeaders["{$tableName}_{$fieldName}_start"]['group_by'] = $this->_params['group_bys_freq'][$fieldName];
// just to make sure these values are transferred to rows.
// since we 'll need them for calculation purpose,
// e.g making subtotals look nicer or graphs
$this->_columnHeaders["{$tableName}_{$fieldName}_interval"] = array('no_display' => TRUE);
$this->_columnHeaders["{$tableName}_{$fieldName}_subtotal"] = array('no_display' => TRUE);
}
}
}
}
}
$this->_selectClauses = $select;
$this->_select = "SELECT " . implode(', ', $select) . " ";
}
/**
* Build select clause for a single field.
*
* @param string $tableName
* @param string $tableKey
* @param string $fieldName
* @param string $field
*
* @return bool
*/
public function selectClause(&$tableName, $tableKey, &$fieldName, &$field) {
return FALSE;
}
/**
* Build where clause.
*/
public function where() {
$this->storeWhereHavingClauseArray();
if (empty($this->_whereClauses)) {
$this->_where = "WHERE ( 1 ) ";
$this->_having = "";
}
else {
$this->_where = "WHERE " . implode(' AND ', $this->_whereClauses);
}
if ($this->_aclWhere) {
$this->_where .= " AND {$this->_aclWhere} ";
}
if (!empty($this->_havingClauses)) {
// use this clause to construct group by clause.
$this->_having = "HAVING " . implode(' AND ', $this->_havingClauses);
}
}
/**
* Store Where clauses into an array.
*
* Breaking out this step makes over-riding more flexible as the clauses can be used in constructing a
* temp table that may not be part of the final where clause or added
* in other functions
*/
public function storeWhereHavingClauseArray() {
foreach ($this->_columns as $tableName => $table) {
if (array_key_exists('filters', $table)) {
foreach ($table['filters'] as $fieldName => $field) {
// respect pseudofield to filter spec so fields can be marked as
// not to be handled here
if (!empty($field['pseudofield'])) {
continue;
}
$clause = NULL;
if (CRM_Utils_Array::value('type', $field) & CRM_Utils_Type::T_DATE) {
if (CRM_Utils_Array::value('operatorType', $field) ==
CRM_Report_Form::OP_MONTH
) {
$op = CRM_Utils_Array::value("{$fieldName}_op", $this->_params);
$value = CRM_Utils_Array::value("{$fieldName}_value", $this->_params);
if (is_array($value) && !empty($value)) {
$clause
= "(month({$field['dbAlias']}) $op (" . implode(', ', $value) .
'))';
}
}
else {
$relative = CRM_Utils_Array::value("{$fieldName}_relative", $this->_params);
$from = CRM_Utils_Array::value("{$fieldName}_from", $this->_params);
$to = CRM_Utils_Array::value("{$fieldName}_to", $this->_params);
$fromTime = CRM_Utils_Array::value("{$fieldName}_from_time", $this->_params);
$toTime = CRM_Utils_Array::value("{$fieldName}_to_time", $this->_params);
$clause = $this->dateClause($field['dbAlias'], $relative, $from, $to, $field['type'], $fromTime, $toTime);
}
}
else {
$op = CRM_Utils_Array::value("{$fieldName}_op", $this->_params);
if ($op) {
$clause = $this->whereClause($field,
$op,
CRM_Utils_Array::value("{$fieldName}_value", $this->_params),
CRM_Utils_Array::value("{$fieldName}_min", $this->_params),
CRM_Utils_Array::value("{$fieldName}_max", $this->_params)
);
}
}
if (!empty($clause)) {
if (!empty($field['having'])) {
$this->_havingClauses[] = $clause;
}
else {
$this->_whereClauses[] = $clause;
}
}
}
}
}
}
/**
* Set output mode.
*/
public function processReportMode() {
$this->setOutputMode();
$this->_sendmail
= CRM_Utils_Request::retrieve(
'sendmail',
'Boolean',
CRM_Core_DAO::$_nullObject
);
$this->_absoluteUrl = FALSE;
$printOnly = FALSE;
$this->assign('printOnly', FALSE);
if ($this->_outputMode == 'print' ||
($this->_sendmail && !$this->_outputMode)
) {
$this->assign('printOnly', TRUE);
$printOnly = TRUE;
$this->addPaging = FALSE;
$this->assign('outputMode', 'print');
$this->_outputMode = 'print';
if ($this->_sendmail) {
$this->_absoluteUrl = TRUE;
}
}
elseif ($this->_outputMode == 'pdf') {
$printOnly = TRUE;
$this->addPaging = FALSE;
$this->_absoluteUrl = TRUE;
}
elseif ($this->_outputMode == 'csv') {
$printOnly = TRUE;
$this->_absoluteUrl = TRUE;
$this->addPaging = FALSE;
}
elseif ($this->_outputMode == 'group') {
$this->assign('outputMode', 'group');
}
elseif ($this->_outputMode == 'create_report' && $this->_criteriaForm) {
$this->assign('outputMode', 'create_report');
}
elseif ($this->_outputMode == 'copy' && $this->_criteriaForm) {
$this->_createNew = TRUE;
}
$this->assign('outputMode', $this->_outputMode);
$this->assign('printOnly', $printOnly);
// Get today's date to include in printed reports
if ($printOnly) {
$reportDate = CRM_Utils_Date::customFormat(date('Y-m-d H:i'));
$this->assign('reportDate', $reportDate);
}
}
/**
* Post Processing function for Form.
*
* postProcessCommon should be used to set other variables from input as the api accesses that function.
* This function is not accessed when the api calls the report.
*/
public function beginPostProcess() {
$this->setParams($this->controller->exportValues($this->_name));
if (empty($this->_params) &&
$this->_force
) {
$this->setParams($this->_formValues);
}
// hack to fix params when submitted from dashboard, CRM-8532
// fields array is missing because form building etc is skipped
// in dashboard mode for report
//@todo - this could be done in the dashboard no we have a setter
if (empty($this->_params['fields']) && !$this->_noFields) {
$this->setParams($this->_formValues);
}
$this->processReportMode();
if ($this->_outputMode == 'save' || $this->_outputMode == 'copy') {
$this->_createNew = ($this->_outputMode == 'copy');
CRM_Report_Form_Instance::postProcess($this);
}
if ($this->_outputMode == 'delete') {
CRM_Report_BAO_ReportInstance::doFormDelete($this->_id, 'civicrm/report/list?reset=1', 'civicrm/report/list?reset=1');
}
$this->_formValues = $this->_params;
$this->beginPostProcessCommon();
}
/**
* BeginPostProcess function run in both report mode and non-report mode (api).
*/
public function beginPostProcessCommon() {
}
/**
* Build the report query.
*
* @param bool $applyLimit
*
* @return string
*/
public function buildQuery($applyLimit = TRUE) {
$this->buildGroupTempTable();
$this->select();
$this->from();
$this->customDataFrom();
$this->buildPermissionClause();
$this->where();
if (array_key_exists('civicrm_contribution', $this->getVar('_columns'))) {
$this->getPermissionedFTQuery($this);
}
$this->groupBy();
$this->orderBy();
// order_by columns not selected for display need to be included in SELECT
$unselectedSectionColumns = $this->unselectedSectionColumns();
foreach ($unselectedSectionColumns as $alias => $section) {
$this->_select .= ", {$section['dbAlias']} as {$alias}";
}
if ($applyLimit && empty($this->_params['charts'])) {
$this->limit();
}
CRM_Utils_Hook::alterReportVar('sql', $this, $this);
$sql = "{$this->_select} {$this->_from} {$this->_where} {$this->_groupBy} {$this->_having} {$this->_orderBy} {$this->_limit}";
$this->addToDeveloperTab($sql);
return $sql;
}
/**
* Build group by clause.
*/
public function groupBy() {
if (!empty($this->_params['group_bys']) &&
is_array($this->_params['group_bys'])
) {
foreach ($this->_columns as $tableName => $table) {
if (array_key_exists('group_bys', $table)) {
foreach ($table['group_bys'] as $fieldName => $field) {
if (!empty($this->_params['group_bys'][$fieldName])) {
$this->_groupByArray[] = $field['dbAlias'];
}
}
}
}
}
if (!empty($this->_groupByArray)) {
$this->_groupBy = CRM_Contact_BAO_Query::getGroupByFromSelectColumns($this->_selectClauses, $this->_groupByArray);
}
}
/**
* Build order by clause.
*/
public function orderBy() {
$this->_orderBy = "";
$this->_sections = array();
$this->storeOrderByArray();
if (!empty($this->_orderByArray) && !$this->_rollup == 'WITH ROLLUP') {
$this->_orderBy = "ORDER BY " . implode(', ', $this->_orderByArray);
}
$this->assign('sections', $this->_sections);
}
/**
* Extract order by fields and store as an array.
*
* In some cases other functions want to know which fields are selected for ordering by
* Separating this into a separate function allows it to be called separately from constructing
* the order by clause
*/
public function storeOrderByArray() {
$orderBys = array();
if (!empty($this->_params['order_bys']) &&
is_array($this->_params['order_bys']) &&
!empty($this->_params['order_bys'])
) {
// Process order_bys in user-specified order
foreach ($this->_params['order_bys'] as $orderBy) {
$orderByField = array();
foreach ($this->_columns as $tableName => $table) {
if (array_key_exists('order_bys', $table)) {
// For DAO columns defined in $this->_columns
$fields = $table['order_bys'];
}
elseif (array_key_exists('extends', $table)) {
// For custom fields referenced in $this->_customGroupExtends
$fields = CRM_Utils_Array::value('fields', $table, array());
}
else {
continue;
}
if (!empty($fields) && is_array($fields)) {
foreach ($fields as $fieldName => $field) {
if ($fieldName == $orderBy['column']) {
$orderByField = array_merge($field, $orderBy);
$orderByField['tplField'] = "{$tableName}_{$fieldName}";
break 2;
}
}
}
}
if (!empty($orderByField)) {
$this->_orderByFields[$orderByField['tplField']] = $orderByField;
$orderBys[] = "{$orderByField['dbAlias']} {$orderBy['order']}";
// Record any section headers for assignment to the template
if (!empty($orderBy['section'])) {
$orderByField['pageBreak'] = CRM_Utils_Array::value('pageBreak', $orderBy);
$this->_sections[$orderByField['tplField']] = $orderByField;
}
}
}
}
$this->_orderByArray = $orderBys;
$this->assign('sections', $this->_sections);
}
/**
* Determine unselected columns.
*
* @return array
*/
public function unselectedSectionColumns() {
if (is_array($this->_sections)) {
return array_diff_key($this->_sections, $this->getSelectColumns());
}
else {
return array();
}
}
/**
* Build output rows.
*
* @param string $sql
* @param array $rows
*/
public function buildRows($sql, &$rows) {
$dao = CRM_Core_DAO::executeQuery($sql);
if (!is_array($rows)) {
$rows = array();
}
// use this method to modify $this->_columnHeaders
$this->modifyColumnHeaders();
$unselectedSectionColumns = $this->unselectedSectionColumns();
while ($dao->fetch()) {
$row = array();
foreach ($this->_columnHeaders as $key => $value) {
if (property_exists($dao, $key)) {
$row[$key] = $dao->$key;
}
}
// section headers not selected for display need to be added to row
foreach ($unselectedSectionColumns as $key => $values) {
if (property_exists($dao, $key)) {
$row[$key] = $dao->$key;
}
}
$rows[] = $row;
}
}
/**
* Calculate section totals.
*
* When "order by" fields are marked as sections, this assigns to the template
* an array of total counts for each section. This data is used by the Smarty
* plugin {sectionTotal}.
*/
public function sectionTotals() {
// Reports using order_bys with sections must populate $this->_selectAliases in select() method.
if (empty($this->_selectAliases)) {
return;
}
if (!empty($this->_sections)) {
// build the query with no LIMIT clause
$select = str_ireplace('SELECT SQL_CALC_FOUND_ROWS ', 'SELECT ', $this->_select);
$sql = "{$select} {$this->_from} {$this->_where} {$this->_groupBy} {$this->_having} {$this->_orderBy}";
// pull section aliases out of $this->_sections
$sectionAliases = array_keys($this->_sections);
$ifnulls = array();
foreach (array_merge($sectionAliases, $this->_selectAliases) as $alias) {
$ifnulls[] = "ifnull($alias, '') as $alias";
}
$this->_select = "SELECT " . implode(", ", $ifnulls);
$this->_select = CRM_Contact_BAO_Query::appendAnyValueToSelect($ifnulls, $sectionAliases);
// Group (un-limited) report by all aliases and get counts. This might
// be done more efficiently when the contents of $sql are known, ie. by
// overriding this method in the report class.
$query = $this->_select .
", count(*) as ct from ($sql) as subquery group by " .
implode(", ", $sectionAliases);
// initialize array of total counts
$totals = array();
$dao = CRM_Core_DAO::executeQuery($query);
while ($dao->fetch()) {
// let $this->_alterDisplay translate any integer ids to human-readable values.
$rows[0] = $dao->toArray();
$this->alterDisplay($rows);
$row = $rows[0];
// add totals for all permutations of section values
$values = array();
$i = 1;
$aliasCount = count($sectionAliases);
foreach ($sectionAliases as $alias) {
$values[] = $row[$alias];
$key = implode(CRM_Core_DAO::VALUE_SEPARATOR, $values);
if ($i == $aliasCount) {
// the last alias is the lowest-level section header; use count as-is
$totals[$key] = $dao->ct;
}
else {
// other aliases are higher level; roll count into their total
$totals[$key] += $dao->ct;
}
}
}
$this->assign('sectionTotals', $totals);
}
}
/**
* Modify column headers.
*/
public function modifyColumnHeaders() {
// use this method to modify $this->_columnHeaders
}
/**
* Move totals columns to the right edge of the table.
*
* It seems like a more logical layout to have any totals columns on the far right regardless of
* the location of the rest of their table.
*/
public function moveSummaryColumnsToTheRightHandSide() {
$statHeaders = (array_intersect_key($this->_columnHeaders, array_flip($this->_statFields)));
$this->_columnHeaders = array_merge(array_diff_key($this->_columnHeaders, $statHeaders), $this->_columnHeaders, $statHeaders);
}
/**
* Assign rows to the template.
*
* @param array $rows
*/
public function doTemplateAssignment(&$rows) {
$this->assign_by_ref('columnHeaders', $this->_columnHeaders);
$this->assign_by_ref('rows', $rows);
$this->assign('statistics', $this->statistics($rows));
}
/**
* Build report statistics.
*
* Override this method to build your own statistics.
*
* @param array $rows
*
* @return array
*/
public function statistics(&$rows) {
$statistics = array();
$count = count($rows);
// Why do we increment the count for rollup seems to artificially inflate the count.
// It seems perhaps intentional to include the summary row in the count of results - although
// this just seems odd.
if ($this->_rollup && ($this->_rollup != '') && $this->_grandFlag) {
$count++;
}
$this->countStat($statistics, $count);
$this->groupByStat($statistics);
$this->filterStat($statistics);
return $statistics;
}
/**
* Add count statistics.
*
* @param array $statistics
* @param int $count
*/
public function countStat(&$statistics, $count) {
$statistics['counts']['rowCount'] = array(
'title' => ts('Row(s) Listed'),
'value' => $count,
);
if ($this->_rowsFound && ($this->_rowsFound > $count)) {
$statistics['counts']['rowsFound'] = array(
'title' => ts('Total Row(s)'),
'value' => $this->_rowsFound,
);
}
}
/**
* Add group by statistics.
*
* @param array $statistics
*/
public function groupByStat(&$statistics) {
if (!empty($this->_params['group_bys']) &&
is_array($this->_params['group_bys']) &&
!empty($this->_params['group_bys'])
) {
foreach ($this->_columns as $tableName => $table) {
if (array_key_exists('group_bys', $table)) {
foreach ($table['group_bys'] as $fieldName => $field) {
if (!empty($this->_params['group_bys'][$fieldName])) {
$combinations[] = $field['title'];
}
}
}
}
$statistics['groups'][] = array(
'title' => ts('Grouping(s)'),
'value' => implode(' & ', $combinations),
);
}
}
/**
* Filter statistics.
*
* @param array $statistics
*/
public function filterStat(&$statistics) {
foreach ($this->_columns as $tableName => $table) {
if (array_key_exists('filters', $table)) {
foreach ($table['filters'] as $fieldName => $field) {
if ((CRM_Utils_Array::value('type', $field) & CRM_Utils_Type::T_DATE ||
CRM_Utils_Array::value('type', $field) & CRM_Utils_Type::T_TIME) &&
CRM_Utils_Array::value('operatorType', $field) !=
CRM_Report_Form::OP_MONTH
) {
list($from, $to)
= $this->getFromTo(
CRM_Utils_Array::value("{$fieldName}_relative", $this->_params),
CRM_Utils_Array::value("{$fieldName}_from", $this->_params),
CRM_Utils_Array::value("{$fieldName}_to", $this->_params),
CRM_Utils_Array::value("{$fieldName}_from_time", $this->_params),
CRM_Utils_Array::value("{$fieldName}_to_time", $this->_params)
);
$from_time_format = !empty($this->_params["{$fieldName}_from_time"]) ? 'h' : 'd';
$from = CRM_Utils_Date::customFormat($from, NULL, array($from_time_format));
$to_time_format = !empty($this->_params["{$fieldName}_to_time"]) ? 'h' : 'd';
$to = CRM_Utils_Date::customFormat($to, NULL, array($to_time_format));
if ($from || $to) {
$statistics['filters'][] = array(
'title' => $field['title'],
'value' => ts("Between %1 and %2", array(1 => $from, 2 => $to)),
);
}
elseif (in_array($rel = CRM_Utils_Array::value("{$fieldName}_relative", $this->_params),
array_keys($this->getOperationPair(CRM_Report_Form::OP_DATE))
)) {
$pair = $this->getOperationPair(CRM_Report_Form::OP_DATE);
$statistics['filters'][] = array(
'title' => $field['title'],
'value' => $pair[$rel],
);
}
}
else {
$op = CRM_Utils_Array::value("{$fieldName}_op", $this->_params);
$value = NULL;
if ($op) {
$pair = $this->getOperationPair(
CRM_Utils_Array::value('operatorType', $field),
$fieldName
);
$min = CRM_Utils_Array::value("{$fieldName}_min", $this->_params);
$max = CRM_Utils_Array::value("{$fieldName}_max", $this->_params);
$val = CRM_Utils_Array::value("{$fieldName}_value", $this->_params);
if (in_array($op, array('bw', 'nbw')) && ($min || $max)) {
$value = "{$pair[$op]} $min " . ts('and') . " $max";
}
elseif ($val && CRM_Utils_Array::value('operatorType', $field) & self::OP_ENTITYREF) {
$this->setEntityRefDefaults($field, $tableName);
$result = civicrm_api3($field['attributes']['entity'], 'getlist',
array('id' => $val) +
CRM_Utils_Array::value('api', $field['attributes'], array()));
$values = array();
foreach ($result['values'] as $v) {
$values[] = $v['label'];
}
$value = "{$pair[$op]} " . implode(', ', $values);
}
elseif ($op == 'nll' || $op == 'nnll') {
$value = $pair[$op];
}
elseif (is_array($val) && (!empty($val))) {
$options = CRM_Utils_Array::value('options', $field, array());
foreach ($val as $key => $valIds) {
if (isset($options[$valIds])) {
$val[$key] = $options[$valIds];
}
}
$pair[$op] = (count($val) == 1) ? (($op == 'notin' || $op ==
'mnot') ? ts('Is Not') : ts('Is')) : CRM_Utils_Array::value($op, $pair);
$val = implode(', ', $val);
$value = "{$pair[$op]} " . $val;
}
elseif (!is_array($val) && (!empty($val) || $val == '0') &&
isset($field['options']) &&
is_array($field['options']) && !empty($field['options'])
) {
$value = CRM_Utils_Array::value($op, $pair) . " " .
CRM_Utils_Array::value($val, $field['options'], $val);
}
elseif ($val) {
$value = CRM_Utils_Array::value($op, $pair) . " " . $val;
}
}
if ($value && empty($field['no_display'])) {
$statistics['filters'][] = array(
'title' => CRM_Utils_Array::value('title', $field),
'value' => $value,
);
}
}
}
}
}
}
/**
* End post processing.
*
* @param array|null $rows
*/
public function endPostProcess(&$rows = NULL) {
$this->assign('report_class', get_class($this));
if ($this->_storeResultSet) {
$this->_resultSet = $rows;
}
if ($this->_outputMode == 'print' ||
$this->_outputMode == 'pdf' ||
$this->_sendmail
) {
$content = $this->compileContent();
$url = CRM_Utils_System::url("civicrm/report/instance/{$this->_id}",
"reset=1", TRUE
);
if ($this->_sendmail) {
$config = CRM_Core_Config::singleton();
$attachments = array();
if ($this->_outputMode == 'csv') {
$content
= $this->_formValues['report_header'] . '<p>' . ts('Report URL') .
": {$url}</p>" . '<p>' .
ts('The report is attached as a CSV file.') . '</p>' .
$this->_formValues['report_footer'];
$csvFullFilename = $config->templateCompileDir .
CRM_Utils_File::makeFileName('CiviReport.csv');
$csvContent = CRM_Report_Utils_Report::makeCsv($this, $rows);
file_put_contents($csvFullFilename, $csvContent);
$attachments[] = array(
'fullPath' => $csvFullFilename,
'mime_type' => 'text/csv',
'cleanName' => 'CiviReport.csv',
);
}
if ($this->_outputMode == 'pdf') {
// generate PDF content
$pdfFullFilename = $config->templateCompileDir .
CRM_Utils_File::makeFileName('CiviReport.pdf');
file_put_contents($pdfFullFilename,
CRM_Utils_PDF_Utils::html2pdf($content, "CiviReport.pdf",
TRUE, array('orientation' => 'landscape')
)
);
// generate Email Content
$content
= $this->_formValues['report_header'] . '<p>' . ts('Report URL') .
": {$url}</p>" . '<p>' .
ts('The report is attached as a PDF file.') . '</p>' .
$this->_formValues['report_footer'];
$attachments[] = array(
'fullPath' => $pdfFullFilename,
'mime_type' => 'application/pdf',
'cleanName' => 'CiviReport.pdf',
);
}
if (CRM_Report_Utils_Report::mailReport($content, $this->_id,
$this->_outputMode, $attachments
)
) {
CRM_Core_Session::setStatus(ts("Report mail has been sent."), ts('Sent'), 'success');
}
else {
CRM_Core_Session::setStatus(ts("Report mail could not be sent."), ts('Mail Error'), 'error');
}
return;
}
elseif ($this->_outputMode == 'print') {
echo $content;
}
else {
if ($chartType = CRM_Utils_Array::value('charts', $this->_params)) {
$config = CRM_Core_Config::singleton();
//get chart image name
$chartImg = $this->_chartId . '.png';
//get image url path
$uploadUrl
= str_replace('/persist/contribute/', '/persist/', $config->imageUploadURL) .
'openFlashChart/';
$uploadUrl .= $chartImg;
//get image doc path to overwrite
$uploadImg
= str_replace('/persist/contribute/', '/persist/', $config->imageUploadDir) .
'openFlashChart/' . $chartImg;
//Load the image
$chart = imagecreatefrompng($uploadUrl);
//convert it into formatted png
CRM_Utils_System::setHttpHeader('Content-type', 'image/png');
//overwrite with same image
imagepng($chart, $uploadImg);
//delete the object
imagedestroy($chart);
}
CRM_Utils_PDF_Utils::html2pdf($content, "CiviReport.pdf", FALSE, array('orientation' => 'landscape'));
}
CRM_Utils_System::civiExit();
}
elseif ($this->_outputMode == 'csv') {
CRM_Report_Utils_Report::export2csv($this, $rows);
}
elseif ($this->_outputMode == 'group') {
$group = $this->_params['groups'];
$this->add2group($group);
}
}
/**
* Set store result set indicator to TRUE.
*
* @todo explain what this does
*/
public function storeResultSet() {
$this->_storeResultSet = TRUE;
}
/**
* Get result set.
*
* @return bool
*/
public function getResultSet() {
return $this->_resultSet;
}
/**
* Get the sql used to generate the report.
*
* @return string
*/
public function getReportSql() {
return $this->sqlArray;
}
/**
* Use the form name to create the tpl file name.
*
* @return string
*/
public function getTemplateFileName() {
$defaultTpl = parent::getTemplateFileName();
$template = CRM_Core_Smarty::singleton();
if (!$template->template_exists($defaultTpl)) {
$defaultTpl = 'CRM/Report/Form.tpl';
}
return $defaultTpl;
}
/**
* Compile the report content.
*
* Although this function is super-short it is useful to keep separate so it can be over-ridden by report classes.
*
* @return string
*/
public function compileContent() {
$templateFile = $this->getHookedTemplateFileName();
return CRM_Utils_Array::value('report_header', $this->_formValues) .
CRM_Core_Form::$_template->fetch($templateFile) .
CRM_Utils_Array::value('report_footer', $this->_formValues);
}
/**
* Post process function.
*/
public function postProcess() {
// get ready with post process params
$this->beginPostProcess();
// build query
$sql = $this->buildQuery();
// build array of result based on column headers. This method also allows
// modifying column headers before using it to build result set i.e $rows.
$rows = array();
$this->buildRows($sql, $rows);
// format result set.
$this->formatDisplay($rows);
// assign variables to templates
$this->doTemplateAssignment($rows);
// do print / pdf / instance stuff if needed
$this->endPostProcess($rows);
}
/**
* Set limit.
*
* @param int $rowCount
*
* @return array
*/
public function limit($rowCount = self::ROW_COUNT_LIMIT) {
// lets do the pager if in html mode
$this->_limit = NULL;
// CRM-14115, over-ride row count if rowCount is specified in URL
if ($this->_dashBoardRowCount) {
$rowCount = $this->_dashBoardRowCount;
}
if ($this->addPaging) {
$this->_select = preg_replace('/SELECT(\s+SQL_CALC_FOUND_ROWS)?\s+/i', 'SELECT SQL_CALC_FOUND_ROWS ', $this->_select);
$pageId = CRM_Utils_Request::retrieve('crmPID', 'Integer');
// @todo all http vars should be extracted in the preProcess
// - not randomly in the class
if (!$pageId && !empty($_POST)) {
if (isset($_POST['PagerBottomButton']) && isset($_POST['crmPID_B'])) {
$pageId = max((int) $_POST['crmPID_B'], 1);
}
elseif (isset($_POST['PagerTopButton']) && isset($_POST['crmPID'])) {
$pageId = max((int) $_POST['crmPID'], 1);
}
unset($_POST['crmPID_B'], $_POST['crmPID']);
}
$pageId = $pageId ? $pageId : 1;
$this->set(CRM_Utils_Pager::PAGE_ID, $pageId);
$offset = ($pageId - 1) * $rowCount;
$offset = CRM_Utils_Type::escape($offset, 'Int');
$rowCount = CRM_Utils_Type::escape($rowCount, 'Int');
$this->_limit = " LIMIT $offset, $rowCount";
return array($offset, $rowCount);
}
if ($this->_limitValue) {
if ($this->_offsetValue) {
$this->_limit = " LIMIT {$this->_offsetValue}, {$this->_limitValue} ";
}
else {
$this->_limit = " LIMIT " . $this->_limitValue;
}
}
}
/**
* Set pager.
*
* @param int $rowCount
*/
public function setPager($rowCount = self::ROW_COUNT_LIMIT) {
// CRM-14115, over-ride row count if rowCount is specified in URL
if ($this->_dashBoardRowCount) {
$rowCount = $this->_dashBoardRowCount;
}
if ($this->_limit && ($this->_limit != '')) {
if (!$this->_rowsFound) {
$sql = "SELECT FOUND_ROWS();";
$this->_rowsFound = CRM_Core_DAO::singleValueQuery($sql);
}
$params = array(
'total' => $this->_rowsFound,
'rowCount' => $rowCount,
'status' => ts('Records') . ' %%StatusMessage%%',
'buttonBottom' => 'PagerBottomButton',
'buttonTop' => 'PagerTopButton',
);
if (!empty($this->controller)) {
// This happens when being called from the api Really we want the api to be able to
// pass paging parameters, but at this stage just preventing test crashes.
$params['pageID'] = $this->get(CRM_Utils_Pager::PAGE_ID);
}
$pager = new CRM_Utils_Pager($params);
$this->assign_by_ref('pager', $pager);
$this->ajaxResponse['totalRows'] = $this->_rowsFound;
}
}
/**
* Build a group filter with contempt for large data sets.
*
* This function has been retained as it takes time to migrate the reports over
* to the new method which will not crash on large datasets.
*
* @deprecated
*
* @param string $field
* @param mixed $value
* @param string $op
*
* @return string
*/
public function legacySlowGroupFilterClause($field, $value, $op) {
$smartGroupQuery = "";
$group = new CRM_Contact_DAO_Group();
$group->is_active = 1;
$group->find();
$smartGroups = array();
while ($group->fetch()) {
if (in_array($group->id, $this->_params['gid_value']) &&
$group->saved_search_id
) {
$smartGroups[] = $group->id;
}
}
CRM_Contact_BAO_GroupContactCache::check($smartGroups);
$smartGroupQuery = '';
if (!empty($smartGroups)) {
$smartGroups = implode(',', $smartGroups);
$smartGroupQuery = " UNION DISTINCT
SELECT DISTINCT smartgroup_contact.contact_id
FROM civicrm_group_contact_cache smartgroup_contact
WHERE smartgroup_contact.group_id IN ({$smartGroups}) ";
}
$sqlOp = $this->getSQLOperator($op);
if (!is_array($value)) {
$value = array($value);
}
//include child groups if any
$value = array_merge($value, CRM_Contact_BAO_Group::getChildGroupIds($value));
$clause = "{$field['dbAlias']} IN (" . implode(', ', $value) . ")";
$contactAlias = $this->_aliases['civicrm_contact'];
if (!empty($this->relationType) && $this->relationType == 'b_a') {
$contactAlias = $this->_aliases['civicrm_contact_b'];
}
return " {$contactAlias}.id {$sqlOp} (
SELECT DISTINCT {$this->_aliases['civicrm_group']}.contact_id
FROM civicrm_group_contact {$this->_aliases['civicrm_group']}
WHERE {$clause} AND {$this->_aliases['civicrm_group']}.status = 'Added'
{$smartGroupQuery} ) ";
}
/**
* Build where clause for groups.
*
* @param string $field
* @param mixed $value
* @param string $op
*
* @return string
*/
public function whereGroupClause($field, $value, $op) {
if ($this->groupFilterNotOptimised) {
return $this->legacySlowGroupFilterClause($field, $value, $op);
}
if ($op === 'notin') {
return " group_temp_table.id IS NULL ";
}
// We will have used an inner join instead.
return "1";
}
/**
* Create a table of the contact ids included by the group filter.
*
* This function is called by both the api (tests) and the UI.
*/
public function buildGroupTempTable() {
if (!empty($this->groupTempTable) || empty($this->_params['gid_value']) || $this->groupFilterNotOptimised) {
return;
}
$filteredGroups = (array) $this->_params['gid_value'];
$groups = civicrm_api3('Group', 'get', array(
'is_active' => 1,
'id' => array('IN' => $filteredGroups),
'saved_search_id' => array('>' => 0),
'return' => 'id',
));
$smartGroups = array_keys($groups['values']);
$query = "
SELECT DISTINCT group_contact.contact_id as id
FROM civicrm_group_contact group_contact
WHERE group_contact.group_id IN (" . implode(', ', $filteredGroups) . ")
AND group_contact.status = 'Added' ";
if (!empty($smartGroups)) {
CRM_Contact_BAO_GroupContactCache::check($smartGroups);
$smartGroups = implode(',', $smartGroups);
$query .= "
UNION DISTINCT
SELECT smartgroup_contact.contact_id as id
FROM civicrm_group_contact_cache smartgroup_contact
WHERE smartgroup_contact.group_id IN ({$smartGroups}) ";
}
$this->groupTempTable = 'civicrm_report_temp_group_' . date('Ymd_') . uniqid();
$this->executeReportQuery("
CREATE TEMPORARY TABLE $this->groupTempTable $this->_databaseAttributes
$query
");
CRM_Core_DAO::executeQuery("ALTER TABLE $this->groupTempTable ADD INDEX i_id(id)");
}
/**
* Execute query and add it to the developer tab.
*
* @param string $query
* @param array $params
*
* @return \CRM_Core_DAO|object
*/
protected function executeReportQuery($query, $params = array()) {
$this->addToDeveloperTab($query);
return CRM_Core_DAO::executeQuery($query, $params);
}
/**
* Build where clause for tags.
*
* @param string $field
* @param mixed $value
* @param string $op
*
* @return string
*/
public function whereTagClause($field, $value, $op) {
// not using left join in query because if any contact
// belongs to more than one tag, results duplicate
// entries.
$sqlOp = $this->getSQLOperator($op);
if (!is_array($value)) {
$value = array($value);
}
$clause = "{$field['dbAlias']} IN (" . implode(', ', $value) . ")";
$entity_table = $this->_tagFilterTable;
return " {$this->_aliases[$entity_table]}.id {$sqlOp} (
SELECT DISTINCT {$this->_aliases['civicrm_tag']}.entity_id
FROM civicrm_entity_tag {$this->_aliases['civicrm_tag']}
WHERE entity_table = '$entity_table' AND {$clause} ) ";
}
/**
* Generate membership organization clause.
*
* @param mixed $value
* @param string $op SQL Operator
*
* @return string
*/
public function whereMembershipOrgClause($value, $op) {
$sqlOp = $this->getSQLOperator($op);
if (!is_array($value)) {
$value = array($value);
}
$tmp_membership_org_sql_list = implode(', ', $value);
return " {$this->_aliases['civicrm_contact']}.id {$sqlOp} (
SELECT DISTINCT mem.contact_id
FROM civicrm_membership mem
LEFT JOIN civicrm_membership_status mem_status ON mem.status_id = mem_status.id
LEFT JOIN civicrm_membership_type mt ON mem.membership_type_id = mt.id
WHERE mt.member_of_contact_id IN (" .
$tmp_membership_org_sql_list . ")
AND mt.is_active = '1'
AND mem_status.is_current_member = '1'
AND mem_status.is_active = '1' ) ";
}
/**
* Generate Membership Type SQL Clause.
*
* @param mixed $value
* @param string $op
*
* @return string
* SQL query string
*/
public function whereMembershipTypeClause($value, $op) {
$sqlOp = $this->getSQLOperator($op);
if (!is_array($value)) {
$value = array($value);
}
$tmp_membership_sql_list = implode(', ', $value);
return " {$this->_aliases['civicrm_contact']}.id {$sqlOp} (
SELECT DISTINCT mem.contact_id
FROM civicrm_membership mem
LEFT JOIN civicrm_membership_status mem_status ON mem.status_id = mem_status.id
LEFT JOIN civicrm_membership_type mt ON mem.membership_type_id = mt.id
WHERE mem.membership_type_id IN (" .
$tmp_membership_sql_list . ")
AND mt.is_active = '1'
AND mem_status.is_current_member = '1'
AND mem_status.is_active = '1' ) ";
}
/**
* Buld contact acl clause
* @deprecated in favor of buildPermissionClause
*
* @param string $tableAlias
*/
public function buildACLClause($tableAlias = 'contact_a') {
list($this->_aclFrom, $this->_aclWhere) = CRM_Contact_BAO_Contact_Permission::cacheClause($tableAlias);
}
/**
* Build the permision clause for all entities in this report
*/
public function buildPermissionClause() {
$ret = array();
foreach ($this->selectedTables() as $tableName) {
$baoName = str_replace('_DAO_', '_BAO_', CRM_Core_DAO_AllCoreTables::getClassForTable($tableName));
if ($baoName && class_exists($baoName) && !empty($this->_columns[$tableName]['alias'])) {
$tableAlias = $this->_columns[$tableName]['alias'];
$clauses = array_filter($baoName::getSelectWhereClause($tableAlias));
foreach ($clauses as $field => $clause) {
// Skip contact_id field if redundant
if ($field != 'contact_id' || !in_array('civicrm_contact', $this->selectedTables())) {
$ret["$tableName.$field"] = $clause;
}
}
}
}
// Override output from buildACLClause
$this->_aclFrom = NULL;
$this->_aclWhere = implode(' AND ', $ret);
}
/**
* Add custom data to the columns.
*
* @param bool $addFields
* @param array $permCustomGroupIds
*/
public function addCustomDataToColumns($addFields = TRUE, $permCustomGroupIds = array()) {
if (empty($this->_customGroupExtends)) {
return;
}
if (!is_array($this->_customGroupExtends)) {
$this->_customGroupExtends = array($this->_customGroupExtends);
}
$customGroupWhere = '';
if (!empty($permCustomGroupIds)) {
$customGroupWhere = "cg.id IN (" . implode(',', $permCustomGroupIds) .
") AND";
}
$sql = "
SELECT cg.table_name, cg.title, cg.extends, cf.id as cf_id, cf.label,
cf.column_name, cf.data_type, cf.html_type, cf.option_group_id, cf.time_format
FROM civicrm_custom_group cg
INNER JOIN civicrm_custom_field cf ON cg.id = cf.custom_group_id
WHERE cg.extends IN ('" . implode("','", $this->_customGroupExtends) . "') AND
{$customGroupWhere}
cg.is_active = 1 AND
cf.is_active = 1 AND
cf.is_searchable = 1
ORDER BY cg.weight, cf.weight";
$customDAO = CRM_Core_DAO::executeQuery($sql);
$curTable = NULL;
while ($customDAO->fetch()) {
if ($customDAO->table_name != $curTable) {
$curTable = $customDAO->table_name;
$curFields = $curFilters = array();
// dummy dao object
$this->_columns[$curTable]['dao'] = 'CRM_Contact_DAO_Contact';
$this->_columns[$curTable]['extends'] = $customDAO->extends;
$this->_columns[$curTable]['grouping'] = $customDAO->table_name;
$this->_columns[$curTable]['group_title'] = $customDAO->title;
foreach (array('fields', 'filters', 'group_bys') as $colKey) {
if (!array_key_exists($colKey, $this->_columns[$curTable])) {
$this->_columns[$curTable][$colKey] = array();
}
}
}
$fieldName = 'custom_' . $customDAO->cf_id;
if ($addFields) {
// this makes aliasing work in favor
$curFields[$fieldName] = array(
'name' => $customDAO->column_name,
'title' => $customDAO->label,
'dataType' => $customDAO->data_type,
'htmlType' => $customDAO->html_type,
);
}
if ($this->_customGroupFilters) {
// this makes aliasing work in favor
$curFilters[$fieldName] = array(
'name' => $customDAO->column_name,
'title' => $customDAO->label,
'dataType' => $customDAO->data_type,
'htmlType' => $customDAO->html_type,
);
}
switch ($customDAO->data_type) {
case 'Date':
// filters
$curFilters[$fieldName]['operatorType'] = CRM_Report_Form::OP_DATE;
$curFilters[$fieldName]['type'] = CRM_Utils_Type::T_DATE;
// CRM-6946, show time part for datetime date fields
if ($customDAO->time_format) {
$curFields[$fieldName]['type'] = CRM_Utils_Type::T_TIMESTAMP;
}
break;
case 'Boolean':
$curFilters[$fieldName]['operatorType'] = CRM_Report_Form::OP_SELECT;
$curFilters[$fieldName]['options'] = array('' => ts('- select -')) + CRM_Core_PseudoConstant::get('CRM_Core_BAO_CustomField', 'custom_' . $customDAO->cf_id, array(), 'search');
$curFilters[$fieldName]['type'] = CRM_Utils_Type::T_INT;
break;
case 'Int':
$curFilters[$fieldName]['operatorType'] = CRM_Report_Form::OP_INT;
$curFilters[$fieldName]['type'] = CRM_Utils_Type::T_INT;
break;
case 'Money':
$curFilters[$fieldName]['operatorType'] = CRM_Report_Form::OP_FLOAT;
$curFilters[$fieldName]['type'] = CRM_Utils_Type::T_MONEY;
$curFields[$fieldName]['type'] = CRM_Utils_Type::T_MONEY;
break;
case 'Float':
$curFilters[$fieldName]['operatorType'] = CRM_Report_Form::OP_FLOAT;
$curFilters[$fieldName]['type'] = CRM_Utils_Type::T_FLOAT;
break;
case 'String':
case 'StateProvince':
case 'Country':
$curFilters[$fieldName]['type'] = CRM_Utils_Type::T_STRING;
$options = CRM_Core_PseudoConstant::get('CRM_Core_BAO_CustomField', 'custom_' . $customDAO->cf_id, array(), 'search');
if ($options !== FALSE) {
$curFilters[$fieldName]['operatorType'] = CRM_Core_BAO_CustomField::isSerialized($customDAO) ? CRM_Report_Form::OP_MULTISELECT_SEPARATOR : CRM_Report_Form::OP_MULTISELECT;
$curFilters[$fieldName]['options'] = $options;
}
break;
case 'ContactReference':
$curFilters[$fieldName]['type'] = CRM_Utils_Type::T_STRING;
$curFilters[$fieldName]['name'] = 'display_name';
$curFilters[$fieldName]['alias'] = "contact_{$fieldName}_civireport";
$curFields[$fieldName]['type'] = CRM_Utils_Type::T_STRING;
$curFields[$fieldName]['name'] = 'display_name';
$curFields[$fieldName]['alias'] = "contact_{$fieldName}_civireport";
break;
default:
$curFields[$fieldName]['type'] = CRM_Utils_Type::T_STRING;
$curFilters[$fieldName]['type'] = CRM_Utils_Type::T_STRING;
}
// CRM-19401 fix
if ($customDAO->html_type == 'Select' && !array_key_exists('options', $curFilters[$fieldName])) {
$options = CRM_Core_PseudoConstant::get('CRM_Core_BAO_CustomField', 'custom_' . $customDAO->cf_id, array(), 'search');
if ($options !== FALSE) {
$curFilters[$fieldName]['operatorType'] = CRM_Core_BAO_CustomField::isSerialized($customDAO) ? CRM_Report_Form::OP_MULTISELECT_SEPARATOR : CRM_Report_Form::OP_MULTISELECT;
$curFilters[$fieldName]['options'] = $options;
}
}
if (!array_key_exists('type', $curFields[$fieldName])) {
$curFields[$fieldName]['type'] = CRM_Utils_Array::value('type', $curFilters[$fieldName], array());
}
if ($addFields) {
$this->_columns[$curTable]['fields'] = array_merge($this->_columns[$curTable]['fields'], $curFields);
}
if ($this->_customGroupFilters) {
$this->_columns[$curTable]['filters'] = array_merge($this->_columns[$curTable]['filters'], $curFilters);
}
if ($this->_customGroupGroupBy) {
$this->_columns[$curTable]['group_bys'] = array_merge($this->_columns[$curTable]['group_bys'], $curFields);
}
}
}
/**
* Build custom data from clause.
*
* @param bool $joinsForFiltersOnly
* Only include joins to support filters. This would be used if creating a table of contacts to include first.
*/
public function customDataFrom($joinsForFiltersOnly = FALSE) {
if (empty($this->_customGroupExtends)) {
return;
}
$mapper = CRM_Core_BAO_CustomQuery::$extendsMap;
//CRM-18276 GROUP_CONCAT could be used with singleValueQuery and then exploded,
//but by default that truncates to 1024 characters, which causes errors with installs with lots of custom field sets
$customTables = array();
$customTablesDAO = CRM_Core_DAO::executeQuery("SELECT table_name FROM civicrm_custom_group");
while ($customTablesDAO->fetch()) {
$customTables[] = $customTablesDAO->table_name;
}
foreach ($this->_columns as $table => $prop) {
if (in_array($table, $customTables)) {
$extendsTable = $mapper[$prop['extends']];
// Check field is required for rendering the report.
if ((!$this->isFieldSelected($prop)) || ($joinsForFiltersOnly && !$this->isFieldFiltered($prop))) {
continue;
}
$baseJoin = CRM_Utils_Array::value($prop['extends'], $this->_customGroupExtendsJoin, "{$this->_aliases[$extendsTable]}.id");
$customJoin = is_array($this->_customGroupJoin) ? $this->_customGroupJoin[$table] : $this->_customGroupJoin;
$this->_from .= "
{$customJoin} {$table} {$this->_aliases[$table]} ON {$this->_aliases[$table]}.entity_id = {$baseJoin}";
// handle for ContactReference
if (array_key_exists('fields', $prop)) {
foreach ($prop['fields'] as $fieldName => $field) {
if (CRM_Utils_Array::value('dataType', $field) ==
'ContactReference'
) {
$columnName = CRM_Core_DAO::getFieldValue('CRM_Core_DAO_CustomField', CRM_Core_BAO_CustomField::getKeyID($fieldName), 'column_name');
$this->_from .= "
LEFT JOIN civicrm_contact {$field['alias']} ON {$field['alias']}.id = {$this->_aliases[$table]}.{$columnName} ";
}
}
}
}
}
}
/**
* Check if the field is selected.
*
* @param string $prop
*
* @return bool
*/
public function isFieldSelected($prop) {
if (empty($prop)) {
return FALSE;
}
if (!empty($this->_params['fields'])) {
foreach (array_keys($prop['fields']) as $fieldAlias) {
$customFieldId = CRM_Core_BAO_CustomField::getKeyID($fieldAlias);
if ($customFieldId) {
if (array_key_exists($fieldAlias, $this->_params['fields'])) {
return TRUE;
}
//might be survey response field.
if (!empty($this->_params['fields']['survey_response']) &&
!empty($prop['fields'][$fieldAlias]['isSurveyResponseField'])
) {
return TRUE;
}
}
}
}
if (!empty($this->_params['group_bys']) && $this->_customGroupGroupBy) {
foreach (array_keys($prop['group_bys']) as $fieldAlias) {
if (array_key_exists($fieldAlias, $this->_params['group_bys']) &&
CRM_Core_BAO_CustomField::getKeyID($fieldAlias)
) {
return TRUE;
}
}
}
if (!empty($this->_params['order_bys'])) {
foreach (array_keys($prop['fields']) as $fieldAlias) {
foreach ($this->_params['order_bys'] as $orderBy) {
if ($fieldAlias == $orderBy['column'] &&
CRM_Core_BAO_CustomField::getKeyID($fieldAlias)
) {
return TRUE;
}
}
}
}
return $this->isFieldFiltered($prop);
}
/**
* Check if the field is used as a filter.
*
* @param string $prop
*
* @return bool
*/
protected function isFieldFiltered($prop) {
if (!empty($prop['filters']) && $this->_customGroupFilters) {
foreach ($prop['filters'] as $fieldAlias => $val) {
foreach (array(
'value',
'min',
'max',
'relative',
'from',
'to',
) as $attach) {
if (isset($this->_params[$fieldAlias . '_' . $attach]) &&
(!empty($this->_params[$fieldAlias . '_' . $attach])
|| ($attach != 'relative' &&
$this->_params[$fieldAlias . '_' . $attach] == '0')
)
) {
return TRUE;
}
}
if (!empty($this->_params[$fieldAlias . '_op']) &&
in_array($this->_params[$fieldAlias . '_op'], array('nll', 'nnll'))
) {
return TRUE;
}
}
}
return FALSE;
}
/**
* Check for empty order_by configurations and remove them.
*
* Also set template to hide them.
*
* @param array $formValues
*/
public function preProcessOrderBy(&$formValues) {
// Object to show/hide form elements
$_showHide = new CRM_Core_ShowHideBlocks('', '');
$_showHide->addShow('optionField_1');
// Cycle through order_by options; skip any empty ones, and hide them as well
$n = 1;
if (!empty($formValues['order_bys'])) {
foreach ($formValues['order_bys'] as $order_by) {
if ($order_by['column'] && $order_by['column'] != '-') {
$_showHide->addShow('optionField_' . $n);
$orderBys[$n] = $order_by;
$n++;
}
}
}
for ($i = $n; $i <= 5; $i++) {
if ($i > 1) {
$_showHide->addHide('optionField_' . $i);
}
}
// overwrite order_by options with modified values
if (!empty($orderBys)) {
$formValues['order_bys'] = $orderBys;
}
else {
$formValues['order_bys'] = array(1 => array('column' => '-'));
}
// assign show/hide data to template
$_showHide->addToTemplate();
}
/**
* Check if table name has columns in SELECT clause.
*
* @param string $tableName
* Name of table (index of $this->_columns array).
*
* @return bool
*/
public function isTableSelected($tableName) {
return in_array($tableName, $this->selectedTables());
}
/**
* Check if table name has columns in WHERE or HAVING clause.
*
* @param string $tableName
* Name of table (index of $this->_columns array).
*
* @return bool
*/
public function isTableFiltered($tableName) {
// Cause the array to be generated if not previously done.
if (!$this->_selectedTables && !$this->filteredTables) {
$this->selectedTables();
}
return in_array($tableName, $this->filteredTables);
}
/**
* Fetch array of DAO tables having columns included in SELECT or ORDER BY clause.
*
* If the array is unset it will be built.
*
* @return array
* selectedTables
*/
public function selectedTables() {
if (!$this->_selectedTables) {
$orderByColumns = array();
if (array_key_exists('order_bys', $this->_params) &&
is_array($this->_params['order_bys'])
) {
foreach ($this->_params['order_bys'] as $orderBy) {
$orderByColumns[] = $orderBy['column'];
}
}
foreach ($this->_columns as $tableName => $table) {
if (array_key_exists('fields', $table)) {
foreach ($table['fields'] as $fieldName => $field) {
if (!empty($field['required']) ||
!empty($this->_params['fields'][$fieldName])
) {
$this->_selectedTables[] = $tableName;
break;
}
}
}
if (array_key_exists('order_bys', $table)) {
foreach ($table['order_bys'] as $orderByName => $orderBy) {
if (in_array($orderByName, $orderByColumns)) {
$this->_selectedTables[] = $tableName;
break;
}
}
}
if (array_key_exists('filters', $table)) {
foreach ($table['filters'] as $filterName => $filter) {
if (!empty($this->_params["{$filterName}_value"]) ||
CRM_Utils_Array::value("{$filterName}_op", $this->_params) ==
'nll' ||
CRM_Utils_Array::value("{$filterName}_op", $this->_params) ==
'nnll'
) {
$this->_selectedTables[] = $tableName;
$this->filteredTables[] = $tableName;
break;
}
}
}
}
}
return $this->_selectedTables;
}
/**
* Add address fields.
*
* @deprecated - use getAddressColumns which is a more accurate description
* and also accepts an array of options rather than a long list
*
* adding address fields to construct function in reports
*
* @param bool $groupBy
* Add GroupBy? Not appropriate for detail report.
* @param bool $orderBy
* Add GroupBy? Not appropriate for detail report.
* @param bool $filters
* @param array $defaults
*
* @return array
* address fields for construct clause
*/
public function addAddressFields($groupBy = TRUE, $orderBy = FALSE, $filters = TRUE, $defaults = array('country_id' => TRUE)) {
$defaultAddressFields = array(
'street_address' => ts('Street Address'),
'supplemental_address_1' => ts('Supplementary Address Field 1'),
'supplemental_address_2' => ts('Supplementary Address Field 2'),
'supplemental_address_3' => ts('Supplementary Address Field 3'),
'street_number' => ts('Street Number'),
'street_name' => ts('Street Name'),
'street_unit' => ts('Street Unit'),
'city' => ts('City'),
'postal_code' => ts('Postal Code'),
'postal_code_suffix' => ts('Postal Code Suffix'),
'country_id' => ts('Country'),
'state_province_id' => ts('State/Province'),
'county_id' => ts('County'),
);
$addressFields = array(
'civicrm_address' => array(
'dao' => 'CRM_Core_DAO_Address',
'fields' => array(
'address_name' => array(
'title' => ts('Address Name'),
'default' => CRM_Utils_Array::value('name', $defaults, FALSE),
'name' => 'name',
),
),
'grouping' => 'location-fields',
),
);
foreach ($defaultAddressFields as $fieldName => $fieldLabel) {
$addressFields['civicrm_address']['fields'][$fieldName] = array(
'title' => $fieldLabel,
'default' => CRM_Utils_Array::value($fieldName, $defaults, FALSE),
);
}
$street_address_filters = $general_address_filters = array();
if ($filters) {
// Address filter depends on whether street address parsing is enabled.
// (CRM-18696)
$addressOptions = CRM_Core_BAO_Setting::valueOptions(CRM_Core_BAO_Setting::SYSTEM_PREFERENCES_NAME,
'address_options'
);
if ($addressOptions['street_address_parsing']) {
$street_address_filters = array(
'street_number' => array(
'title' => ts('Street Number'),
'type' => CRM_Utils_Type::T_INT,
'name' => 'street_number',
),
'street_name' => array(
'title' => ts('Street Name'),
'name' => 'street_name',
'type' => CRM_Utils_Type::T_STRING,
),
);
}
else {
$street_address_filters = array(
'street_address' => array(
'title' => ts('Street Address'),
'type' => CRM_Utils_Type::T_STRING,
'name' => 'street_address',
),
);
}
$general_address_filters = array(
'postal_code' => array(
'title' => ts('Postal Code'),
'type' => CRM_Utils_Type::T_STRING,
'name' => 'postal_code',
),
'city' => array(
'title' => ts('City'),
'type' => CRM_Utils_Type::T_STRING,
'name' => 'city',
),
'country_id' => array(
'name' => 'country_id',
'title' => ts('Country'),
'type' => CRM_Utils_Type::T_INT,
'operatorType' => CRM_Report_Form::OP_MULTISELECT,
'options' => CRM_Core_PseudoConstant::country(),
),
'state_province_id' => array(
'name' => 'state_province_id',
'title' => ts('State/Province'),
'type' => CRM_Utils_Type::T_INT,
'operatorType' => CRM_Report_Form::OP_MULTISELECT,
'options' => array(),
),
'county_id' => array(
'name' => 'county_id',
'title' => ts('County'),
'type' => CRM_Utils_Type::T_INT,
'operatorType' => CRM_Report_Form::OP_MULTISELECT,
'options' => array(),
),
);
}
$addressFields['civicrm_address']['filters'] = array_merge(
$street_address_filters,
$general_address_filters);
if ($orderBy) {
$addressFields['civicrm_address']['order_bys'] = array(
'street_name' => array('title' => ts('Street Name')),
'street_number' => array('title' => ts('Odd / Even Street Number')),
'street_address' => NULL,
'city' => NULL,
'postal_code' => NULL,
);
}
if ($groupBy) {
$addressFields['civicrm_address']['group_bys'] = array(
'street_address' => NULL,
'city' => NULL,
'postal_code' => NULL,
'state_province_id' => array(
'title' => ts('State/Province'),
),
'country_id' => array(
'title' => ts('Country'),
),
'county_id' => array(
'title' => ts('County'),
),
);
}
return $addressFields;
}
/**
* Do AlterDisplay processing on Address Fields.
*
* @param array $row
* @param array $rows
* @param int $rowNum
* @param string $baseUrl
* @param string $linkText
*
* @return bool
*/
public function alterDisplayAddressFields(&$row, &$rows, &$rowNum, $baseUrl, $linkText) {
$criteriaQueryParams = CRM_Report_Utils_Report::getPreviewCriteriaQueryParams($this->_defaults, $this->_params);
$entryFound = FALSE;
// handle country
if (array_key_exists('civicrm_address_country_id', $row)) {
if ($value = $row['civicrm_address_country_id']) {
$rows[$rowNum]['civicrm_address_country_id'] = CRM_Core_PseudoConstant::country($value, FALSE);
if ($baseUrl) {
$url = CRM_Report_Utils_Report::getNextUrl($baseUrl,
"reset=1&force=1&{$criteriaQueryParams}&" .
"country_id_op=in&country_id_value={$value}",
$this->_absoluteUrl, $this->_id
);
$rows[$rowNum]['civicrm_address_country_id_link'] = $url;
$rows[$rowNum]['civicrm_address_country_id_hover'] = ts("%1 for this country.",
array(1 => $linkText)
);
}
}
$entryFound = TRUE;
}
if (array_key_exists('civicrm_address_county_id', $row)) {
if ($value = $row['civicrm_address_county_id']) {
$rows[$rowNum]['civicrm_address_county_id'] = CRM_Core_PseudoConstant::county($value, FALSE);
if ($baseUrl) {
$url = CRM_Report_Utils_Report::getNextUrl($baseUrl,
"reset=1&force=1&{$criteriaQueryParams}&" .
"county_id_op=in&county_id_value={$value}",
$this->_absoluteUrl, $this->_id
);
$rows[$rowNum]['civicrm_address_county_id_link'] = $url;
$rows[$rowNum]['civicrm_address_county_id_hover'] = ts("%1 for this county.",
array(1 => $linkText)
);
}
}
$entryFound = TRUE;
}
// handle state province
if (array_key_exists('civicrm_address_state_province_id', $row)) {
if ($value = $row['civicrm_address_state_province_id']) {
$rows[$rowNum]['civicrm_address_state_province_id'] = CRM_Core_PseudoConstant::stateProvince($value, FALSE);
if ($baseUrl) {
$url = CRM_Report_Utils_Report::getNextUrl($baseUrl,
"reset=1&force=1&{$criteriaQueryParams}&state_province_id_op=in&state_province_id_value={$value}",
$this->_absoluteUrl, $this->_id
);
$rows[$rowNum]['civicrm_address_state_province_id_link'] = $url;
$rows[$rowNum]['civicrm_address_state_province_id_hover'] = ts("%1 for this state.",
array(1 => $linkText)
);
}
}
$entryFound = TRUE;
}
return $entryFound;
}
/**
* Do AlterDisplay processing on Address Fields.
*
* @param array $row
* @param array $rows
* @param int $rowNum
* @param string $baseUrl
* @param string $linkText
*
* @return bool
*/
public function alterDisplayContactFields(&$row, &$rows, &$rowNum, $baseUrl, $linkText) {
$entryFound = FALSE;
// There is no reason not to add links for all fields but it seems a bit odd to be able to click on
// 'Mrs'. Also, we don't have metadata about the title. So, add selectively to addLinks.
$addLinks = array('gender_id' => 'Gender');
foreach (array('prefix_id', 'suffix_id', 'gender_id', 'contact_sub_type', 'preferred_language') as $fieldName) {
if (array_key_exists('civicrm_contact_' . $fieldName, $row)) {
if (($value = $row['civicrm_contact_' . $fieldName]) != FALSE) {
$rowValues = explode(CRM_Core_DAO::VALUE_SEPARATOR, $value);
$rowLabels = array();
foreach ($rowValues as $rowValue) {
if ($rowValue) {
$rowLabels[] = CRM_Core_PseudoConstant::getLabel('CRM_Contact_BAO_Contact', $fieldName, $rowValue);
}
}
$rows[$rowNum]['civicrm_contact_' . $fieldName] = implode(', ', $rowLabels);
if ($baseUrl && ($title = CRM_Utils_Array::value($fieldName, $addLinks)) != FALSE) {
$this->addLinkToRow($rows[$rowNum], $baseUrl, $linkText, $value, $fieldName, 'civicrm_contact', $title);
}
}
$entryFound = TRUE;
}
}
$yesNoFields = array(
'do_not_email', 'is_deceased', 'do_not_phone', 'do_not_sms', 'do_not_mail', 'is_opt_out',
);
foreach ($yesNoFields as $fieldName) {
if (array_key_exists('civicrm_contact_' . $fieldName, $row)) {
// Since these are essentially 'negative fields' it feels like it
// makes sense to only highlight the exceptions hence no 'No'.
$rows[$rowNum]['civicrm_contact_' . $fieldName] = !empty($rows[$rowNum]['civicrm_contact_' . $fieldName]) ? ts('Yes') : '';
$entryFound = TRUE;
}
}
return $entryFound;
}
/**
* Adjusts dates passed in to YEAR() for fiscal year.
*
* @param string $fieldName
*
* @return string
*/
public function fiscalYearOffset($fieldName) {
$config = CRM_Core_Config::singleton();
$fy = $config->fiscalYearStart;
if (CRM_Utils_Array::value('yid_op', $this->_params) == 'calendar' ||
($fy['d'] == 1 && $fy['M'] == 1)
) {
return "YEAR( $fieldName )";
}
return "YEAR( $fieldName - INTERVAL " . ($fy['M'] - 1) . " MONTH" .
($fy['d'] > 1 ? (" - INTERVAL " . ($fy['d'] - 1) . " DAY") : '') . " )";
}
/**
* Add Address into From Table if required.
*/
public function addAddressFromClause() {
// include address field if address column is to be included
if ((isset($this->_addressField) &&
$this->_addressField
) ||
$this->isTableSelected('civicrm_address')
) {
$this->_from .= "
LEFT JOIN civicrm_address {$this->_aliases['civicrm_address']}
ON ({$this->_aliases['civicrm_contact']}.id =
{$this->_aliases['civicrm_address']}.contact_id) AND
{$this->_aliases['civicrm_address']}.is_primary = 1\n";
}
}
/**
* Add Phone into From Table if required.
*/
public function addPhoneFromClause() {
// include address field if address column is to be included
if ($this->isTableSelected('civicrm_phone')) {
$this->_from .= "
LEFT JOIN civicrm_phone {$this->_aliases['civicrm_phone']}
ON ({$this->_aliases['civicrm_contact']}.id =
{$this->_aliases['civicrm_phone']}.contact_id) AND
{$this->_aliases['civicrm_phone']}.is_primary = 1\n";
}
}
/**
* Add Financial Transaction into From Table if required.
*/
public function addFinancialTrxnFromClause() {
if ($this->isTableSelected('civicrm_financial_trxn')) {
$this->_from .= "
LEFT JOIN civicrm_entity_financial_trxn eftcc
ON ({$this->_aliases['civicrm_contribution']}.id = eftcc.entity_id AND
eftcc.entity_table = 'civicrm_contribution')
LEFT JOIN civicrm_financial_trxn {$this->_aliases['civicrm_financial_trxn']}
ON {$this->_aliases['civicrm_financial_trxn']}.id = eftcc.financial_trxn_id \n";
}
}
/**
* Get phone columns to add to array.
*
* @param array $options
* - prefix Prefix to add to table (in case of more than one instance of the table)
* - prefix_label Label to give columns from this phone table instance
*
* @return array
* phone columns definition
*/
public function getPhoneColumns($options = array()) {
$defaultOptions = array(
'prefix' => '',
'prefix_label' => '',
);
$options = array_merge($defaultOptions, $options);
$fields = array(
$options['prefix'] . 'civicrm_phone' => array(
'dao' => 'CRM_Core_DAO_Phone',
'fields' => array(
$options['prefix'] . 'phone' => array(
'title' => ts($options['prefix_label'] . 'Phone'),
'name' => 'phone',
),
),
),
);
return $fields;
}
/**
* Get address columns to add to array.
*
* @param array $options
* - prefix Prefix to add to table (in case of more than one instance of the table)
* - prefix_label Label to give columns from this address table instance
*
* @return array
* address columns definition
*/
public function getAddressColumns($options = array()) {
$options += array(
'prefix' => '',
'prefix_label' => '',
'group_by' => TRUE,
'order_by' => TRUE,
'filters' => TRUE,
'defaults' => array(),
);
return $this->addAddressFields(
$options['group_by'],
$options['order_by'],
$options['filters'],
$options['defaults']
);
}
/**
* Get a standard set of contact fields.
*
* @return array
*/
public function getBasicContactFields() {
return array(
'sort_name' => array(
'title' => ts('Contact Name'),
'required' => TRUE,
'default' => TRUE,
),
'id' => array(
'no_display' => TRUE,
'required' => TRUE,
),
'prefix_id' => array(
'title' => ts('Contact Prefix'),
),
'first_name' => array(
'title' => ts('First Name'),
),
'nick_name' => array(
'title' => ts('Nick Name'),
),
'middle_name' => array(
'title' => ts('Middle Name'),
),
'last_name' => array(
'title' => ts('Last Name'),
),
'suffix_id' => array(
'title' => ts('Contact Suffix'),
),
'postal_greeting_display' => array('title' => ts('Postal Greeting')),
'email_greeting_display' => array('title' => ts('Email Greeting')),
'addressee_display' => array('title' => ts('Addressee')),
'contact_type' => array(
'title' => ts('Contact Type'),
),
'contact_sub_type' => array(
'title' => ts('Contact Subtype'),
),
'gender_id' => array(
'title' => ts('Gender'),
),
'birth_date' => array(
'title' => ts('Birth Date'),
),
'age' => array(
'title' => ts('Age'),
'dbAlias' => 'TIMESTAMPDIFF(YEAR, contact_civireport.birth_date, CURDATE())',
),
'job_title' => array(
'title' => ts('Contact Job title'),
),
'organization_name' => array(
'title' => ts('Organization Name'),
),
'external_identifier' => array(
'title' => ts('Contact identifier from external system'),
),
'do_not_email' => array(),
'do_not_phone' => array(),
'do_not_mail' => array(),
'do_not_sms' => array(),
'is_opt_out' => array(),
'is_deceased' => array(),
'preferred_language' => array(),
);
}
/**
* Get a standard set of contact filters.
*
* @return array
*/
public function getBasicContactFilters() {
return array(
'sort_name' => array(
'title' => ts('Contact Name'),
),
'source' => array(
'title' => ts('Contact Source'),
'type' => CRM_Utils_Type::T_STRING,
),
'id' => array(
'title' => ts('Contact ID'),
'no_display' => TRUE,
),
'gender_id' => array(
'title' => ts('Gender'),
'operatorType' => CRM_Report_Form::OP_MULTISELECT,
'options' => CRM_Core_PseudoConstant::get('CRM_Contact_DAO_Contact', 'gender_id'),
),
'birth_date' => array(
'title' => ts('Birth Date'),
'operatorType' => CRM_Report_Form::OP_DATE,
),
'contact_type' => array(
'title' => ts('Contact Type'),
),
'contact_sub_type' => array(
'title' => ts('Contact Subtype'),
),
'modified_date' => array(
'title' => ts('Contact Modified'),
'operatorType' => CRM_Report_Form::OP_DATE,
'type' => CRM_Utils_Type::T_DATE,
),
'is_deceased' => array(
'title' => ts('Deceased'),
'type' => CRM_Utils_Type::T_BOOLEAN,
'default' => 0,
),
'do_not_email' => array(
'title' => ts('Do not email'),
'type' => CRM_Utils_Type::T_BOOLEAN,
),
'do_not_phone' => array(
'title' => ts('Do not phone'),
'type' => CRM_Utils_Type::T_BOOLEAN,
),
'do_not_mail' => array(
'title' => ts('Do not mail'),
'type' => CRM_Utils_Type::T_BOOLEAN,
),
'do_not_sms' => array(
'title' => ts('Do not SMS'),
'type' => CRM_Utils_Type::T_BOOLEAN,
),
'is_opt_out' => array(
'title' => ts('Do not bulk email'),
'type' => CRM_Utils_Type::T_BOOLEAN,
),
'preferred_language' => array(
'title' => ts('Preferred Language'),
),
'is_deleted' => array(
'no_display' => TRUE,
'default' => 0,
'type' => CRM_Utils_Type::T_BOOLEAN,
),
);
}
/**
* Add contact to group.
*
* @param int $groupID
*/
public function add2group($groupID) {
if (is_numeric($groupID) && isset($this->_aliases['civicrm_contact'])) {
$select = "SELECT DISTINCT {$this->_aliases['civicrm_contact']}.id AS addtogroup_contact_id, ";
$select = preg_replace('/SELECT(\s+SQL_CALC_FOUND_ROWS)?\s+/i', $select, $this->_select);
$sql = "{$select} {$this->_from} {$this->_where} {$this->_groupBy} {$this->_having} {$this->_orderBy}";
$sql = str_replace('WITH ROLLUP', '', $sql);
$dao = CRM_Core_DAO::executeQuery($sql);
$contact_ids = array();
// Add resulting contacts to group
while ($dao->fetch()) {
if ($dao->addtogroup_contact_id) {
$contact_ids[$dao->addtogroup_contact_id] = $dao->addtogroup_contact_id;
}
}
if (!empty($contact_ids)) {
CRM_Contact_BAO_GroupContact::addContactsToGroup($contact_ids, $groupID);
CRM_Core_Session::setStatus(ts("Listed contact(s) have been added to the selected group."), ts('Contacts Added'), 'success');
}
else {
CRM_Core_Session::setStatus(ts("The listed records(s) cannot be added to the group."));
}
}
}
/**
* Show charts on print screen.
*/
public static function uploadChartImage() {
// upload strictly for '.png' images
$name = trim(basename(CRM_Utils_Request::retrieve('name', 'String', CRM_Core_DAO::$_nullObject, FALSE, NULL, 'GET')));
if (preg_match('/\.png$/', $name)) {
// Get the RAW .png from the input.
$httpRawPostData = file_get_contents("php://input");
// prepare the directory
$config = CRM_Core_Config::singleton();
$defaultPath
= str_replace('/persist/contribute/', '/persist/', $config->imageUploadDir) .
'/openFlashChart/';
if (!file_exists($defaultPath)) {
mkdir($defaultPath, 0777, TRUE);
}
// full path to the saved image including filename
$destination = $defaultPath . $name;
//write and save
$jfh = fopen($destination, 'w') or die("can't open file");
fwrite($jfh, $httpRawPostData);
fclose($jfh);
CRM_Utils_System::civiExit();
}
}
/**
* Apply common settings to entityRef fields.
*
* @param array $field
* @param string $table
*/
private function setEntityRefDefaults(&$field, $table) {
$field['attributes'] = $field['attributes'] ? $field['attributes'] : array();
$field['attributes'] += array(
'entity' => CRM_Core_DAO_AllCoreTables::getBriefName(CRM_Core_DAO_AllCoreTables::getClassForTable($table)),
'multiple' => TRUE,
'placeholder' => ts('- select -'),
);
}
/**
* Add link fields to the row.
*
* Function adds the _link & _hover fields to the row.
*
* @param array $row
* @param string $baseUrl
* @param string $linkText
* @param string $value
* @param string $fieldName
* @param string $tablePrefix
* @param string $fieldLabel
*
* @return mixed
*/
protected function addLinkToRow(&$row, $baseUrl, $linkText, $value, $fieldName, $tablePrefix, $fieldLabel) {
$criteriaQueryParams = CRM_Report_Utils_Report::getPreviewCriteriaQueryParams($this->_defaults, $this->_params);
$url = CRM_Report_Utils_Report::getNextUrl($baseUrl,
"reset=1&force=1&{$criteriaQueryParams}&" .
$fieldName . "_op=in&{$fieldName}_value={$value}",
$this->_absoluteUrl, $this->_id
);
$row["{$tablePrefix}_{$fieldName}_link"] = $url;
$row["{$tablePrefix}_{$fieldName}_hover"] = ts("%1 for this %2.",
array(1 => $linkText, 2 => $fieldLabel)
);
}
/**
* Generate temporary table to hold all contributions with permissioned FTs.
*
* @param object $query
* @param string $alias
* @param bool $return
*
* @return string
*/
public function getPermissionedFTQuery(&$query, $alias = NULL, $return = FALSE) {
if (!CRM_Financial_BAO_FinancialType::isACLFinancialTypeStatus()) {
return FALSE;
}
$financialTypes = NULL;
CRM_Financial_BAO_FinancialType::getAvailableFinancialTypes($financialTypes);
if (empty($financialTypes)) {
$contFTs = "0";
$liFTs = implode(',', array_keys(CRM_Contribute_PseudoConstant::financialType()));
}
else {
$contFTs = $liFTs = implode(',', array_keys($financialTypes));
}
$temp = CRM_Utils_Array::value('civicrm_line_item', $query->_aliases);
if ($alias) {
$query->_aliases['civicrm_line_item'] = $alias;
}
elseif (!$temp) {
$query->_aliases['civicrm_line_item'] = 'civicrm_line_item_civireport';
}
if (empty($query->_where)) {
$query->_where = "WHERE {$query->_aliases['civicrm_contribution']}.id IS NOT NULL ";
}
CRM_Core_DAO::executeQuery("DROP TEMPORARY TABLE IF EXISTS civicrm_contribution_temp");
$sql = "CREATE TEMPORARY TABLE civicrm_contribution_temp {$this->_databaseAttributes} AS SELECT {$query->_aliases['civicrm_contribution']}.id {$query->_from}
LEFT JOIN civicrm_line_item {$query->_aliases['civicrm_line_item']}
ON {$query->_aliases['civicrm_contribution']}.id = {$query->_aliases['civicrm_line_item']}.contribution_id AND
{$query->_aliases['civicrm_line_item']}.entity_table = 'civicrm_contribution'
AND {$query->_aliases['civicrm_line_item']}.financial_type_id NOT IN (" . $liFTs . ")
{$query->_where}
AND {$query->_aliases['civicrm_contribution']}.financial_type_id IN (" . $contFTs . ")
AND {$query->_aliases['civicrm_line_item']}.id IS NULL
GROUP BY {$query->_aliases['civicrm_contribution']}.id";
CRM_Core_DAO::executeQuery($sql);
if (isset($temp)) {
$query->_aliases['civicrm_line_item'] = $temp;
}
$from = " INNER JOIN civicrm_contribution_temp temp ON {$query->_aliases['civicrm_contribution']}.id = temp.id ";
if ($return) {
return $from;
}
$query->_from .= $from;
}
/**
* Get label for show results buttons.
*
* @return string
*/
public function getResultsLabel() {
$showResultsLabel = $this->resultsDisplayed() ? ts('Refresh results') : ts('View results');
return $showResultsLabel;
}
/**
* Determine the output mode from the url or input.
*
* Output could be
* - pdf : Render as pdf
* - csv : Render as csv
* - print : Render in print format
* - save : save the report and display the new report
* - copy : save the report as a new instance and display that.
* - group : go to the add to group screen.
*
* Potentially chart variations could also be included but the complexity
* is that we might print a bar chart as a pdf.
*/
protected function setOutputMode() {
$this->_outputMode = str_replace('report_instance.', '', CRM_Utils_Request::retrieve(
'output',
'String',
CRM_Core_DAO::$_nullObject,
FALSE,
CRM_Utils_Array::value('task', $this->_params)
));
// if contacts are added to group
if (!empty($this->_params['groups']) && empty($this->_outputMode)) {
$this->_outputMode = 'group';
}
if (isset($this->_params['task'])) {
unset($this->_params['task']);
}
}
/**
* CRM-17793 - Alter DateTime section header to group by date from the datetime field.
*
* @param $tempTable
* @param $columnName
*/
public function alterSectionHeaderForDateTime($tempTable, $columnName) {
// add new column with date value for the datetime field
$tempQuery = "ALTER TABLE {$tempTable} ADD COLUMN {$columnName}_date VARCHAR(128)";
CRM_Core_DAO::executeQuery($tempQuery);
$updateQuery = "UPDATE {$tempTable} SET {$columnName}_date = date({$columnName})";
CRM_Core_DAO::executeQuery($updateQuery);
$this->_selectClauses[] = "{$columnName}_date";
$this->_select .= ", {$columnName}_date";
$this->_sections["{$columnName}_date"] = $this->_sections["{$columnName}"];
unset($this->_sections["{$columnName}"]);
$this->assign('sections', $this->_sections);
}
/**
* Get an array of the columns that have been selected for display.
*
* @return array
*/
public function getSelectColumns() {
$selectColumns = array();
foreach ($this->_columns as $tableName => $table) {
if (array_key_exists('fields', $table)) {
foreach ($table['fields'] as $fieldName => $field) {
if (!empty($field['required']) ||
!empty($this->_params['fields'][$fieldName])
) {
$selectColumns["{$tableName}_{$fieldName}"] = 1;
}
}
}
}
return $selectColumns;
}
/**
* Add location tables to the query if they are used for filtering.
*
* This is for when we are running the query separately for filtering and retrieving display fields.
*/
public function selectivelyAddLocationTablesJoinsToFilterQuery() {
if ($this->isTableFiltered('civicrm_email')) {
$this->_from .= "
LEFT JOIN civicrm_email {$this->_aliases['civicrm_email']}
ON {$this->_aliases['civicrm_contact']}.id = {$this->_aliases['civicrm_email']}.contact_id
AND {$this->_aliases['civicrm_email']}.is_primary = 1";
}
if ($this->isTableFiltered('civicrm_phone')) {
$this->_from .= "
LEFT JOIN civicrm_phone {$this->_aliases['civicrm_phone']}
ON {$this->_aliases['civicrm_contact']}.id = {$this->_aliases['civicrm_phone']}.contact_id
AND {$this->_aliases['civicrm_phone']}.is_primary = 1";
}
if ($this->isTableFiltered('civicrm_address')) {
$this->_from .= "
LEFT JOIN civicrm_address {$this->_aliases['civicrm_address']}
ON ({$this->_aliases['civicrm_contact']}.id = {$this->_aliases['civicrm_address']}.contact_id)
AND {$this->_aliases['civicrm_address']}.is_primary = 1\n";
}
}
/**
* Set the base table for the FROM clause.
*
* Sets up the from clause, allowing for the possibility it might be a
* temp table pre-filtered by groups if a group filter is in use.
*
* @param string $baseTable
* @param string $field
* @param null $tableAlias
*/
public function setFromBase($baseTable, $field = 'id', $tableAlias = NULL) {
if (!$tableAlias) {
$tableAlias = $this->_aliases[$baseTable];
}
$this->_from = $this->_from = " FROM $baseTable $tableAlias ";
$this->joinGroupTempTable($baseTable, $field, $tableAlias);
$this->_from .= " {$this->_aclFrom} ";
}
/**
* Join the temp table contacting contacts who are members of the filtered groups.
*
* If we are using an IN filter we use an inner join, otherwise a left join.
*
* @param string $baseTable
* @param string $field
* @param string $tableAlias
*/
public function joinGroupTempTable($baseTable, $field, $tableAlias) {
if ($this->groupTempTable) {
if ($this->_params['gid_op'] == 'in') {
$this->_from = " FROM $this->groupTempTable group_temp_table INNER JOIN $baseTable $tableAlias
ON group_temp_table.id = $tableAlias.{$field} ";
}
else {
$this->_from .= "
LEFT JOIN $this->groupTempTable group_temp_table
ON $tableAlias.{$field} = group_temp_table.id ";
}
}
}
/**
* Get all labels for fields that are used in a group concat.
*
* @param string $options
* comma separated option values.
* @param string $baoName
* The BAO name for the field.
* @param string $fieldName
* The name of the field for which labels should be retrieved.
*
* return string
*/
public function getLabels($options, $baoName, $fieldName) {
$types = explode(',', $options);
$labels = array();
foreach ($types as $value) {
$labels[$value] = CRM_Core_PseudoConstant::getLabel($baoName, $fieldName, $value);
}
return implode(', ', array_filter($labels));
}
/**
* Add statistics columns.
*
* If a group by is in play then add columns for the statistics fields.
*
* This would lead to a new field in the $row such as $fieldName_sum and a new, matching
* column header field.
*
* @param array $field
* @param string $tableName
* @param string $fieldName
* @param array $select
*
* @return array
*/
protected function addStatisticsToSelect($field, $tableName, $fieldName, $select) {
foreach ($field['statistics'] as $stat => $label) {
$alias = "{$tableName}_{$fieldName}_{$stat}";
switch (strtolower($stat)) {
case 'max':
case 'sum':
$select[] = "$stat({$field['dbAlias']}) as $alias";
$this->_columnHeaders["{$tableName}_{$fieldName}_{$stat}"]['title'] = $label;
$this->_columnHeaders["{$tableName}_{$fieldName}_{$stat}"]['type'] = $field['type'];
$this->_statFields[$label] = $alias;
$this->_selectAliases[] = $alias;
break;
case 'count':
$select[] = "COUNT({$field['dbAlias']}) as $alias";
$this->_columnHeaders["{$tableName}_{$fieldName}_{$stat}"]['title'] = $label;
$this->_columnHeaders["{$tableName}_{$fieldName}_{$stat}"]['type'] = CRM_Utils_Type::T_INT;
$this->_statFields[$label] = $alias;
$this->_selectAliases[] = $alias;
break;
case 'count_distinct':
$select[] = "COUNT(DISTINCT {$field['dbAlias']}) as $alias";
$this->_columnHeaders["{$tableName}_{$fieldName}_{$stat}"]['title'] = $label;
$this->_columnHeaders["{$tableName}_{$fieldName}_{$stat}"]['type'] = CRM_Utils_Type::T_INT;
$this->_statFields[$label] = $alias;
$this->_selectAliases[] = $alias;
break;
case 'avg':
$select[] = "ROUND(AVG({$field['dbAlias']}),2) as $alias";
$this->_columnHeaders["{$tableName}_{$fieldName}_{$stat}"]['title'] = $label;
$this->_columnHeaders["{$tableName}_{$fieldName}_{$stat}"]['type'] = $field['type'];
$this->_statFields[$label] = $alias;
$this->_selectAliases[] = $alias;
break;
}
}
return $select;
}
/**
* Add a basic field to the select clause.
*
* @param string $tableName
* @param string $fieldName
* @param array $field
* @param string $select
* @return array
*/
protected function addBasicFieldToSelect($tableName, $fieldName, $field, $select) {
$alias = "{$tableName}_{$fieldName}";
$select[] = "{$field['dbAlias']} as $alias";
$this->_columnHeaders["{$tableName}_{$fieldName}"]['title'] = CRM_Utils_Array::value('title', $field);
$this->_columnHeaders["{$tableName}_{$fieldName}"]['type'] = CRM_Utils_Array::value('type', $field);
$this->_selectAliases[] = $alias;
return $select;
}
/**
* Set table alias.
*
* @param array $table
* @param string $tableName
*
* @return string
* Alias for table.
*/
protected function setTableAlias($table, $tableName) {
if (!isset($table['alias'])) {
$this->_columns[$tableName]['alias'] = substr($tableName, 8) .
'_civireport';
}
else {
$this->_columns[$tableName]['alias'] = $table['alias'] . '_civireport';
}
$this->_aliases[$tableName] = $this->_columns[$tableName]['alias'];
return $this->_aliases[$tableName];
}
}