/**
* Collects and renders visitor/week report data
*/
public function visitor_week()
{
$myConfig = $this->getConfig();
$oDb = oxDb::getDb();
$aDataX = array();
$aDataX2 = array();
$aDataX3 = array();
$aDataY = array();
$sTimeTo = $oDb->quote(date("Y-m-d H:i:s", strtotime(oxRegistry::getConfig()->getRequestParameter("time_to"))));
$sTimeFrom = $oDb->quote(date("Y-m-d H:i:s", strtotime(oxRegistry::getConfig()->getRequestParameter("time_from"))));
$sSQL = "select oxtime, count(*) as nrof from oxlogs where oxtime >= {$sTimeFrom} and oxtime <= {$sTimeTo} group by oxsessid order by oxtime";
$aTemp = array();
$rs = $oDb->execute($sSQL);
if ($rs != false && $rs->recordCount() > 0) {
while (!$rs->EOF) {
//$aTemp[date( "W", strtotime( $rs->fields[0]))]++;
$aTemp[oxRegistry::get("oxUtilsDate")->getWeekNumber($myConfig->getConfigParam('iFirstWeekDay'), strtotime($rs->fields[0]))]++;
$rs->moveNext();
}
}
// initializing
list($iFrom, $iTo) = $this->getWeekRange();
for ($i = $iFrom; $i < $iTo; $i++) {
$aDataX[$i] = 0;
$aDataX2[$i] = 0;
$aDataX3[$i] = 0;
$aDataY[] = "KW " . $i;
}
foreach ($aTemp as $key => $value) {
$aDataX[$key] = $value;
$aDataX2[$key] = 0;
$aDataX3[$key] = 0;
$aDataY[] = "KW " . $key;
}
// buyer
$sSQL = "select oxorderdate from oxorder where oxorderdate >= {$sTimeFrom} and oxorderdate <= {$sTimeTo} order by oxorderdate";
$rs = $oDb->execute($sSQL);
if ($rs != false && $rs->recordCount() > 0) {
while (!$rs->EOF) {
$sKey = oxRegistry::get("oxUtilsDate")->getWeekNumber($myConfig->getConfigParam('iFirstWeekDay'), strtotime($rs->fields[0]));
if (isset($aDataX2[$sKey])) {
$aDataX2[$sKey]++;
}
$rs->moveNext();
}
}
// newcustomer
$sSQL = "select oxtime, oxsessid from oxlogs where oxtime >= {$sTimeFrom} and oxtime <= {$sTimeTo} group by oxsessid order by oxtime";
$rs = $oDb->execute($sSQL);
if ($rs != false && $rs->recordCount() > 0) {
while (!$rs->EOF) {
$sKey = oxRegistry::get("oxUtilsDate")->getWeekNumber($myConfig->getConfigParam('iFirstWeekDay'), strtotime($rs->fields[0]));
if (isset($aDataX3[$sKey])) {
$aDataX3[$sKey]++;
}
$rs->moveNext();
}
}
header("Content-type: image/png");
// New graph with a drop shadow
$graph = new Graph(max(800, count($aDataX) * 80), 600);
$graph->setBackgroundImage($myConfig->getImageDir(true) . "/reportbgrnd.jpg", BGIMG_FILLFRAME);
// Use a "text" X-scale
$graph->setScale("textlin");
$graph->setY2Scale("lin");
$graph->y2axis->setColor("red");
// Label align for X-axis
$graph->xaxis->setLabelAlign('center', 'top', 'right');
// Label align for Y-axis
$graph->yaxis->setLabelAlign('right', 'bottom');
$graph->setShadow();
// Description
$graph->xaxis->setTickLabels($aDataY);
// Set title and subtitle
$graph->title->set("Woche");
// Use built in font
$graph->title->setFont(FF_FONT1, FS_BOLD);
$aDataFinalX = array();
foreach ($aDataX as $dData) {
$aDataFinalX[] = $dData;
}
// Create the bar plot
$l2plot = new LinePlot($aDataFinalX);
$l2plot->setColor("navy");
$l2plot->setWeight(2);
$l2plot->setLegend("Besucher");
$l2plot->value->setColor("navy");
$l2plot->value->setFormat('% d');
$l2plot->value->hideZero();
$l2plot->value->show();
$aDataFinalX2 = array();
foreach ($aDataX2 as $dData) {
$aDataFinalX2[] = $dData;
}
// Create the bar plot
$l3plot = new LinePlot($aDataFinalX2);
$l3plot->setColor("orange");
$l3plot->setWeight(2);
$l3plot->setLegend("Bestellungen");
//$l1plot->SetBarCenter();
$l3plot->value->setColor("orange");
$l3plot->value->setFormat('% d');
$l3plot->value->hideZero();
$l3plot->value->show();
//conversion rate graph
$l1datay = array();
for ($iCtr = 0; $iCtr < count($aDataFinalX); $iCtr++) {
if ($aDataFinalX[$iCtr] != 0 && $aDataFinalX2[$iCtr] != 0) {
$l1datay[] = 100 / ($aDataFinalX[$iCtr] / $aDataFinalX2[$iCtr]);
} else {
$l1datay[] = 0;
}
}
$l1plot = new LinePlot($l1datay);
$l1plot->setColor("red");
$l1plot->setWeight(2);
$l1plot->setLegend("Conversion rate (%)");
$l1plot->value->setColor('red');
$l1plot->value->setFormat('% 0.4f%%');
$l1plot->value->hideZero();
$l1plot->value->show();
// Create the grouped bar plot
$graph->addY2($l1plot);
$graph->add($l2plot);
$graph->add($l3plot);
// Finally output the image
$graph->stroke();
}
