326 lines
13 KiB
PHP
Executable File
326 lines
13 KiB
PHP
Executable File
<?php
|
|
if(!defined('sugarEntry') || !sugarEntry) die('Not A Valid Entry Point');
|
|
/*********************************************************************************
|
|
* SugarCRM is a customer relationship management program developed by
|
|
* SugarCRM, Inc. Copyright (C) 2004-2010 SugarCRM Inc.
|
|
*
|
|
* This program is free software; you can redistribute it and/or modify it under
|
|
* the terms of the GNU Affero General Public License version 3 as published by the
|
|
* Free Software Foundation with the addition of the following permission added
|
|
* to Section 15 as permitted in Section 7(a): FOR ANY PART OF THE COVERED WORK
|
|
* IN WHICH THE COPYRIGHT IS OWNED BY SUGARCRM, SUGARCRM DISCLAIMS THE WARRANTY
|
|
* OF NON INFRINGEMENT OF THIRD PARTY RIGHTS.
|
|
*
|
|
* This program 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 along with
|
|
* this program; if not, see http://www.gnu.org/licenses or write to the Free
|
|
* Software Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
|
|
* 02110-1301 USA.
|
|
*
|
|
* You can contact SugarCRM, Inc. headquarters at 10050 North Wolfe Road,
|
|
* SW2-130, Cupertino, CA 95014, USA. or at email address contact@sugarcrm.com.
|
|
*
|
|
* The interactive user interfaces in modified source and object code versions
|
|
* of this program must display Appropriate Legal Notices, as required under
|
|
* Section 5 of the GNU Affero General Public License version 3.
|
|
*
|
|
* In accordance with Section 7(b) of the GNU Affero General Public License version 3,
|
|
* these Appropriate Legal Notices must retain the display of the "Powered by
|
|
* SugarCRM" logo. If the display of the logo is not reasonably feasible for
|
|
* technical reasons, the Appropriate Legal Notices must display the words
|
|
* "Powered by SugarCRM".
|
|
********************************************************************************/
|
|
/*********************************************************************************
|
|
|
|
* Description: Includes the functions for Customer module specific charts.
|
|
********************************************************************************/
|
|
|
|
|
|
|
|
|
|
require_once('include/charts/Charts.php');
|
|
|
|
|
|
|
|
class campaign_charts {
|
|
/**
|
|
* Creates opportunity pipeline image as a VERTICAL accumlated bar graph for multiple users.
|
|
* param $datax- the month data to display in the x-axis
|
|
* Portions created by SugarCRM are Copyright (C) SugarCRM, Inc..
|
|
* All Rights Reserved..
|
|
* Contributor(s): ______________________________________..
|
|
*/
|
|
|
|
function campaign_response_by_activity_type($datay= array(),$targets=array(),$campaign_id, $cache_file_name='a_file', $refresh=false, $marketing_id='') {
|
|
global $app_strings, $mod_strings, $charset, $lang, $barChartColors,$app_list_strings;
|
|
if (!file_exists($cache_file_name) || $refresh == true) {
|
|
$GLOBALS['log']->debug("datay is:");
|
|
$GLOBALS['log']->debug($datay);
|
|
$GLOBALS['log']->debug("user_id is: ");
|
|
$GLOBALS['log']->debug("cache_file_name is: $cache_file_name");
|
|
|
|
$focus = new Campaign();
|
|
|
|
$query = "SELECT activity_type,target_type, count(*) hits ";
|
|
$query.= " FROM campaign_log ";
|
|
$query.= " WHERE campaign_id = '$campaign_id' AND archived=0 AND deleted=0";
|
|
|
|
//if $marketing id is specified, then lets filter the chart by the value
|
|
if (!empty($marketing_id)){
|
|
$query.= " AND marketing_id ='$marketing_id'";
|
|
}
|
|
|
|
$query.= " GROUP BY activity_type, target_type";
|
|
$query.= " ORDER BY activity_type, target_type";
|
|
$result = $focus->db->query($query);
|
|
|
|
$leadSourceArr = array();
|
|
$total=0;
|
|
$total_targeted=0;
|
|
$rowTotalArr = array();
|
|
$rowTotalArr[] = 0;
|
|
while($row = $focus->db->fetchByAssoc($result, -1, false))
|
|
{
|
|
if(!isset($leadSourceArr[$row['activity_type']]['row_total'])) {
|
|
$leadSourceArr[$row['activity_type']]['row_total']=0;
|
|
}
|
|
|
|
$leadSourceArr[$row['activity_type']][$row['target_type']]['hits'][] = $row['hits'];
|
|
$leadSourceArr[$row['activity_type']][$row['target_type']]['total'][] = $row['hits'];
|
|
$leadSourceArr[$row['activity_type']]['outcome'][$row['target_type']]=$row['target_type'];
|
|
$leadSourceArr[$row['activity_type']]['row_total'] += $row['hits'];
|
|
|
|
if (!isset($leadSourceArr['all_activities'][$row['target_type']])) {
|
|
$leadSourceArr['all_activities'][$row['target_type']]=array('total'=>0);
|
|
}
|
|
|
|
$leadSourceArr['all_activities'][$row['target_type']]['total'] += $row['hits'];
|
|
|
|
$total += $row['hits'];
|
|
if ($row['activity_type'] =='targeted') {
|
|
$targeted[$row['target_type']]=$row['hits'];
|
|
$total_targeted+=$row['hits'];
|
|
}
|
|
}
|
|
|
|
$fileContents = ' <yData defaultAltText="'.$mod_strings['LBL_ROLLOVER_VIEW'].'">'."\n";
|
|
|
|
foreach ($datay as $key=>$translation) {
|
|
if ($key == '') {
|
|
//$key = $mod_strings['NTC_NO_LEGENDS'];
|
|
$key = 'None';
|
|
$translation = $mod_strings['NTC_NO_LEGENDS'];
|
|
}
|
|
if(!isset($leadSourceArr[$key])){
|
|
$leadSourceArr[$key] = $key;
|
|
}
|
|
|
|
|
|
if(is_array($leadSourceArr[$key]) && isset($leadSourceArr[$key]['row_total'])){$rowTotalArr[]=$leadSourceArr[$key]['row_total'];}
|
|
if(is_array($leadSourceArr[$key]) && isset($leadSourceArr[$key]['row_total']) && $leadSourceArr[$key]['row_total']>100){
|
|
$leadSourceArr[$key]['row_total'] = round($leadSourceArr[$key]['row_total']);
|
|
}
|
|
$fileContents .= ' <dataRow title="'.$translation.'" endLabel="'.$leadSourceArr[$key]['row_total'].'">'."\n";
|
|
|
|
if(is_array($leadSourceArr[$key]['outcome'])){
|
|
|
|
|
|
|
|
foreach ($leadSourceArr[$key]['outcome'] as $outcome=>$outcome_translation){
|
|
//create alternate text.
|
|
$alttext = ' ';
|
|
if(isset($targeted) && isset($targeted[$outcome])&& !empty($targeted[$outcome])){
|
|
$alttext=$targets[$outcome].': '.$mod_strings['LBL_TARGETED'].' '.$targeted[$outcome]. ', '.$mod_strings['LBL_TOTAL_TARGETED'].' '. $total_targeted. ".";
|
|
}
|
|
if ($key != 'targeted'){
|
|
$alttext.=" $translation ". array_sum($leadSourceArr[$key][$outcome]['hits']);
|
|
}
|
|
$fileContents .= ' <bar id="'.$outcome.'" totalSize="'.array_sum($leadSourceArr[$key][$outcome]['total']).'" altText="'.$alttext.'" url="#'.$key.'"/>'."\n";
|
|
}
|
|
}
|
|
|
|
|
|
$fileContents .= ' </dataRow>'."\n";
|
|
}
|
|
$fileContents .= ' </yData>'."\n";
|
|
|
|
$max = get_max($rowTotalArr);
|
|
|
|
$fileContents .= ' <xData min="0" max="'.$max.'" length="10" prefix="'.''.'" suffix=""/>'."\n";
|
|
$fileContents .= ' <colorLegend status="on">'."\n";
|
|
$i=0;
|
|
|
|
foreach ($targets as $outcome=>$outcome_translation) {
|
|
$color = generate_graphcolor($outcome,$i);
|
|
$fileContents .= ' <mapping id="'.$outcome.'" name="'.$outcome_translation.'" color="'.$color.'"/>'."\n";
|
|
$i++;
|
|
}
|
|
$fileContents .= ' </colorLegend>'."\n";
|
|
$fileContents .= ' <graphInfo>'."\n";
|
|
$fileContents .= ' <![CDATA['.' '.']]>'."\n";
|
|
$fileContents .= ' </graphInfo>'."\n";
|
|
$fileContents .= ' <chartColors ';
|
|
foreach ($barChartColors as $key => $value) {
|
|
$fileContents .= ' '.$key.'='.'"'.$value.'" ';
|
|
}
|
|
$fileContents .= ' />'."\n";
|
|
$fileContents .= '</graphData>'."\n";
|
|
$total = round($total, 2);
|
|
$title = '<graphData title="'.$mod_strings['LBL_CAMPAIGN_RESPONSE_BY_RECIPIENT_ACTIVITY'].'">'."\n";
|
|
$fileContents = $title.$fileContents;
|
|
|
|
save_xml_file($cache_file_name, $fileContents);
|
|
}
|
|
|
|
|
|
|
|
|
|
$return = create_chart('hBarF',$cache_file_name);
|
|
return $return;
|
|
}
|
|
|
|
//campaign roi compputations
|
|
function campaign_response_roi($datay= array(),$targets=array(),$campaign_id, $cache_file_name='a_file', $refresh=false,$marketing_id='',$is_dashlet=false,$dashlet_id='') {
|
|
global $app_strings,$mod_strings, $current_module_strings, $charset, $lang, $app_list_strings, $current_language,$sugar_config;
|
|
|
|
$not_empty = false;
|
|
|
|
if ($is_dashlet){
|
|
$mod_strings = return_module_language($current_language, 'Campaigns');
|
|
}
|
|
|
|
if (!file_exists($cache_file_name) || $refresh == true) {
|
|
$GLOBALS['log']->debug("datay is:");
|
|
$GLOBALS['log']->debug($datay);
|
|
$GLOBALS['log']->debug("user_id is: ");
|
|
$GLOBALS['log']->debug("cache_file_name is: $cache_file_name");
|
|
|
|
$focus = new Campaign();
|
|
$focus->retrieve($campaign_id);
|
|
$opp_count=0;
|
|
$opp_query = "select count(*) opp_count,sum(" . db_convert("amount_usdollar","IFNULL",array(0)).") total_value";
|
|
$opp_query .= " from opportunities";
|
|
$opp_query .= " where campaign_id='$campaign_id'";
|
|
$opp_query .= " and sales_stage='Prospecting'";
|
|
$opp_query .= " and deleted=0";
|
|
|
|
$opp_result=$focus->db->query($opp_query);
|
|
$opp_data=$focus->db->fetchByAssoc($opp_result);
|
|
// if (empty($opp_data['opp_count'])) $opp_data['opp_count']=0;
|
|
if (empty($opp_data['total_value'])) $opp_data['total_value']=0;
|
|
|
|
//report query
|
|
$opp_query1 = "select SUM(opp.amount) as revenue";
|
|
$opp_query1 .= " from opportunities opp";
|
|
$opp_query1 .= " right join campaigns camp on camp.id = opp.campaign_id";
|
|
$opp_query1 .= " where opp.sales_stage = 'Closed Won'and camp.id='$campaign_id' and opp.deleted=0";
|
|
$opp_query1 .= " group by camp.name";
|
|
|
|
$opp_result1=$focus->db->query($opp_query1);
|
|
$opp_data1=$focus->db->fetchByAssoc($opp_result1);
|
|
|
|
//if (empty($opp_data1[]))
|
|
if (empty($opp_data1['revenue'])){
|
|
$opp_data1[$mod_strings['LBL_ROI_CHART_REVENUE']] = 0;
|
|
unset($opp_data1['revenue']);
|
|
}else{
|
|
$opp_data1[$mod_strings['LBL_ROI_CHART_REVENUE']] = $opp_data1['revenue'];
|
|
unset($opp_data1['revenue']);
|
|
$not_empty = true;
|
|
}
|
|
|
|
$camp_query1 = "select camp.name, SUM(camp.actual_cost) as investment,SUM(camp.budget) as budget,SUM(camp.expected_revenue) as expected_revenue";
|
|
$camp_query1 .= " from campaigns camp";
|
|
$camp_query1 .= " where camp.id='$campaign_id'";
|
|
$camp_query1 .= " group by camp.name";
|
|
|
|
$camp_result1=$focus->db->query($camp_query1);
|
|
$camp_data1=$focus->db->fetchByAssoc($camp_result1);
|
|
//query needs to be lowercase, but array keys need to be propercased, as these are used in
|
|
//chart to display legend
|
|
|
|
if (empty($camp_data1['investment']))
|
|
$camp_data1['investment'] = 0;
|
|
else
|
|
$not_empty = true;
|
|
if (empty($camp_data1['budget']))
|
|
$camp_data1['budget'] = 0;
|
|
else
|
|
$not_empty = true;
|
|
if (empty($camp_data1['expected_revenue']))
|
|
$camp_data1['expected_revenue'] = 0;
|
|
else
|
|
$not_empty = true;
|
|
|
|
$opp_data1[$mod_strings['LBL_ROI_CHART_INVESTMENT']]=$camp_data1['investment'];
|
|
$opp_data1[$mod_strings['LBL_ROI_CHART_BUDGET']]=$camp_data1['budget'];
|
|
$opp_data1[$mod_strings['LBL_ROI_CHART_EXPECTED_REVENUE']]=$camp_data1['expected_revenue'];
|
|
|
|
$query = "SELECT activity_type,target_type, count(*) hits ";
|
|
$query.= " FROM campaign_log ";
|
|
$query.= " WHERE campaign_id = '$campaign_id' AND archived=0 AND deleted=0";
|
|
//if $marketing id is specified, then lets filter the chart by the value
|
|
if (!empty($marketing_id)){
|
|
$query.= " AND marketing_id ='$marketing_id'";
|
|
}
|
|
$query.= " GROUP BY activity_type, target_type";
|
|
$query.= " ORDER BY activity_type, target_type";
|
|
$result = $focus->db->query($query);
|
|
|
|
$leadSourceArr = array();
|
|
$total=0;
|
|
$total_targeted=0;
|
|
|
|
}
|
|
|
|
global $current_user;
|
|
$user_id = $current_user->id;
|
|
|
|
require_once('include/SugarCharts/SugarChart.php');
|
|
|
|
$width = ($is_dashlet) ? '100%' : '720px';
|
|
|
|
$return = '<script type="text/javascript" src="' . getJSPath('include/javascript/swfobject.js' ) . '"></script>';
|
|
if (!$is_dashlet){
|
|
$return .= '<br />';
|
|
}
|
|
|
|
|
|
$currency_id = $focus->currency_id;
|
|
$currency_symbol = $sugar_config['default_currency_symbol'];
|
|
if(!empty($currency_id)){
|
|
|
|
$cur = new Currency();
|
|
$cur->retrieve($currency_id);
|
|
$currency_symbol = $cur->symbol;
|
|
}
|
|
|
|
|
|
$sugarChart = new SugarChart();
|
|
$sugarChart->is_currency = true;
|
|
$sugarChart->currency_symbol = $currency_symbol;
|
|
if ($not_empty)
|
|
$sugarChart->setData($opp_data1);
|
|
else
|
|
$sugarChart->setData(array());
|
|
$sugarChart->setProperties($mod_strings['LBL_CAMPAIGN_RETURN_ON_INVESTMENT'], $mod_strings['LBL_AMOUNT_IN'].$currency_symbol, 'bar chart');
|
|
|
|
if (!$is_dashlet){
|
|
$xmlFile = $sugarChart->getXMLFileName('roi_details_chart');
|
|
$sugarChart->saveXMLFile($xmlFile, $sugarChart->generateXML());
|
|
$return .= $sugarChart->display('roi_details_chart', $xmlFile, $width, '480');
|
|
}
|
|
else{
|
|
$xmlFile = $sugarChart->getXMLFileName($dashlet_id);
|
|
$sugarChart->saveXMLFile($xmlFile, $sugarChart->generateXML());
|
|
$return .= $sugarChart->display($dashlet_id, $xmlFile, $width, '480');
|
|
}
|
|
|
|
return $return;
|
|
}
|
|
}// end charts class
|
|
?>
|