function viewEventSummary($domainID, $eventDate, $CSVFlag)
{
global $CSOs, $oUser;
global $calledPrograms, $epsReportProgram, $epsReportProgramDetails;
global $calledZones, $epsReportZone, $epsReportZoneDetails;
global $PointChannels;
global $viewEventSummary;
$oUser = clone $_SESSION['UserObject'];
$dateParts = explode('-', $eventDate);
$month = $dateParts[0];
$day = $dateParts[1];
$year = $dateParts[2];
$eventDate = $year . '-' . $month . '-' . $day;
$eventPerformanceSummary = new EventPerformanceSummary($domainID, $eventDate);
$eventPerformanceSummary->Get();
$involvedAssetsList = $eventPerformanceSummary->allInvolvedAssets();
$calledPrograms = $involvedAssetsList['calledPrograms'];
//$calledPrograms = $eventPerformanceSummary->calledPrograms(); MCB: leaving a traceable trail behind as today's mods are a shim
$epsReportProgram = $eventPerformanceSummary->reportProgram();
$epsReportProgramDetails = $eventPerformanceSummary->reportProgramDetails();
//preDebugger($epsReportProgram,'blue');
//preDebugger($epsReportProgramDetails,'green');
$calledZones = $involvedAssetsList['calledZones'];
//$calledZones = $eventPerformanceSummary->calledZones(); MCB: leaving a traceable trail behind as today's mods are a shim
$epsReportZone = $eventPerformanceSummary->reportZone();
$epsReportZoneDetails = $eventPerformanceSummary->reportZoneDetails();
$viewEventSummary = BuildEventSummaryHeader("Event Summary", $oUser->localDomain()->description(), $eventDate, $domainID, $CSVFlag);
// TODO: This can be reworked so that the PointChannels object isn't needed -- see
// mdr/EvtPerfSummary.php for clues :)
// For now, we're filling display data from there so we'll leave it alone (2012-05-31)
$PointChannels = new PointChannels();
$PointChannels->Load($oUser->id(), $oUser->Domains(0)->id(), null, null, true, $month, $year);
//preDebugger($involvedAssetsList,'blue');
foreach ($calledPrograms as $inx => $calledProgram) {
$CSOs[$calledProgram]['value'] = 0;
foreach ($PointChannels->Resources() as $resourceObjectId => $attribs) {
if (array_key_exists($resourceObjectId, $involvedAssetsList['reportProgramSummary'][$calledProgram])) {
$programDetailToUse = isset($epsReportProgramDetails[$calledProgram][$resourceObjectId]) ? $epsReportProgramDetails[$calledProgram][$resourceObjectId] : $involvedAssetsList['epsReportProgramDetails'][$calledProgram][$resourceObjectId];
//preDebugger("<strong>$epsReportProgramDetails[$calledProgram][$resourceObjectId]</strong>",'red');
//preDebugger($epsReportProgramDetails[$calledProgram][$resourceObjectId],'red');
//preDebugger($programDetailToUse);
$programStack[$calledProgram][$attribs['identifier']] = restackAsset($resourceObjectId, $attribs['assets'], $programDetailToUse, $attribs, $calledProgram, null, $involvedAssetsList['epsReportProgramDetails'][$calledProgram][$resourceObjectId]);
}
foreach ($calledZones[$calledProgram] as $inx => $calledZone) {
if (!isset($CSOs[$calledProgram][$calledZone]['value'])) {
$CSOs[$calledProgram][$calledZone]['value'] = 0;
}
if (array_key_exists($resourceObjectId, $involvedAssetsList['epsReportZoneDetails'][$calledProgram][$calledZone])) {
$zoneDetailToUse = isset($epsReportZoneDetails[$calledProgram][$calledZone][$resourceObjectId]) ? $epsReportZoneDetails[$calledProgram][$calledZone][$resourceObjectId] : $involvedAssetsList['epsReportZoneDetails'][$calledProgram][$calledZone][$resourceObjectId];
$zoneStack[$calledProgram][$calledZone][$attribs['identifier']] = restackAsset($resourceObjectId, $attribs['assets'], $zoneDetailToUse, $attribs, $calledProgram, $calledZone, $involvedAssetsList['epsReportZoneDetails']);
}
}
}
}
//preDebugger($programStack,'green');
return $CSVFlag ? renderCSV($programStack, $zoneStack) : renderHMTL($programStack, $zoneStack);
}
function viewEventSummary($domainID, $eventDate, $CSVFlag)
{
$userObject = clone $_SESSION['UserObject'];
/* this is a fix for the date not coming in the way we want -- dont' want to tip the apple cart 2010.06.13 */
$dateParts = explode('-', $eventDate);
$month = $dateParts[0];
$day = $dateParts[1];
$year = $dateParts[2];
$eventDate = $year . '-' . $month . '-' . $day;
$eventPerformanceSummary = new EventPerformanceSummary($domainID, $eventDate);
$eventPerformanceSummary->Get();
$calledPrograms = $eventPerformanceSummary->calledPrograms();
$calledZones = $eventPerformanceSummary->calledZones();
$epsReportProgram = $eventPerformanceSummary->reportProgram();
$epsReportProgramDetails = $eventPerformanceSummary->reportProgramDetails();
$epsReportZone = $eventPerformanceSummary->reportZone();
$epsReportZoneDetails = $eventPerformanceSummary->reportZoneDetails();
$viewEventSummary = BuildEventSummaryHeader("Event Summary", $userObject->localDomain()->description(), $eventDate, $domainID, $CSVFlag);
if ($CSVFlag === true) {
/* ===========================================================================
Program Summary : CSV Heading
=========================================================================== */
$viewProgramSummary = 'Program Summary' . "\n" . 'Called Program,' . 'Zonal,' . 'Total CR KW,' . 'Hr. Avg.,' . '%CR' . "\n";
} else {
/* ===========================================================================
Program Summary : HTML Heading
=========================================================================== */
$viewProgramSummary = '<!-- START EVENT PERFORMANCE SUMMARY DRAW --><div align="right">' . '<table width="750" class="sortable" width="100%" border="1" cellspacing="0" cellpadding="3">' . '<thead>' . '<tr>' . '<th colspan="9">Program Summary</th>' . '</tr>' . '<tr>' . '<th id="psCalledProgram" class="psCalledProgramTip">Called Program</th>' . '<th id="psZonal" class="psZonalTip">Zonal</th>' . '<th id="psTotalCr" class="psTotalCrTip">Total CR KW</th>' . '<th id="psFcmDelta" class="psFcmDeltaTip">Hr. Avg.</th>' . '<th id="psFcmCr" class="psFcmCrTip">%CR</th>' . '</tr>' . '</thead>' . '<tbody>' . "\n\n";
}
$viewProgramDetail = "";
$viewZoneSummary = "";
$viewZoneDetail = "";
if ($CSVFlag === true) {
foreach ($calledPrograms as $inx => $calledProgram) {
/* ===========================================================================
Program Summary : CSV Data
=========================================================================== */
// Give program summary...
$viewProgramSummary .= $calledProgram . ',' . 'Summary,' . '"' . $epsReportProgram[$calledProgram]->committedReduction() . '"' . ',' . '"' . $epsReportProgram[$calledProgram]->fcmDelta() . '"' . ',' . '"' . $epsReportProgram[$calledProgram]->fcmPCR() . '"' . "\n";
/* ===========================================================================
Program Details CSV
=========================================================================== */
$viewProgramDetail .= $calledProgram . ' Detail' . "\n" . 'Resource,' . 'Asset,' . 'Asset ID,' . 'Adj KW,' . 'CR KW,' . 'Hr. Avg.,' . '%CR' . "\n";
foreach ($epsReportProgramDetails[$calledProgram] as $inx => $epsLineItem) {
$viewProgramDetail .= '"' . $epsLineItem->resource() . '"' . ',' . '"' . $epsLineItem->asset() . '"' . ',' . '"' . $epsLineItem->assetID() . '"' . ',' . '"' . $epsLineItem->adjustment() . '"' . ',' . '"' . $epsLineItem->committedReduction() . '"' . ',' . '"' . $epsLineItem->fcmDelta() . '"' . ',' . '"' . $epsLineItem->fcmPCR() . '"' . "\n";
}
/* ===========================================================================
Program Zone Summary CSV
=========================================================================== */
$viewZoneSummary .= $calledProgram . ' Zone Summary' . "\n" . 'Called Zone,' . 'Total CR KW,' . 'Hr. Avg.,' . '%CR' . "\n";
foreach ($calledZones[$calledProgram] as $inx => $calledZone) {
// Give zone summary...
$viewZoneSummary .= '"' . $calledZone . '"' . ',' . '"' . $epsReportZone[$calledProgram][$calledZone]->committedReduction() . '"' . ',' . '"' . $epsReportZone[$calledProgram][$calledZone]->fcmDelta() . '"' . ',' . '"' . $epsReportZone[$calledProgram][$calledZone]->fcmPCR() . '"' . "\n";
/* ===========================================================================
Program Zone Details CSV
=========================================================================== */
// Give zone details...
$viewZoneDetail .= $calledProgram . " -- " . $calledZone . ' Detail' . "\n" . 'Resource,' . 'Asset,' . 'Asset ID,' . 'Adj KW,' . 'CR KW,' . 'Hr. Avg.,' . '%CR' . "\n";
foreach ($epsReportZoneDetails[$calledProgram][$calledZone] as $inx => $epsLineItem) {
$viewZoneDetail .= '"' . $epsLineItem->resource() . '"' . ',' . '"' . $epsLineItem->asset() . '"' . ',' . '"' . $epsLineItem->assetID() . '"' . ',' . '"' . $epsLineItem->adjustment() . '"' . ',' . '"' . $epsLineItem->committedReduction() . '"' . ',' . '"' . $epsLineItem->fcmDelta() . '"' . ',' . '"' . $epsLineItem->fcmPCR() . '"' . "\n";
}
}
}
} else {
foreach ($calledPrograms as $inx => $calledProgram) {
/* ===========================================================================
Program Summary Table
-----------------------------------Notes-----------------------------------
Items in Called Program and Zonal columns are linked to Real Time demand
Real Time Demand Response Detail table
=========================================================================== */
// Give program summary...
$peakColor = is_numeric($epsReportProgram[$calledProgram]->peakPCR()) ? $epsReportProgram[$calledProgram]->peakPCR() < 75 ? "red" : ($epsReportProgram[$calledProgram]->peakPCR() < 100 ? "orange" : "green") : "transparent";
$fcmColor = is_numeric($epsReportProgram[$calledProgram]->fcmPCR()) ? $epsReportProgram[$calledProgram]->fcmPCR() < 75 ? "red" : ($epsReportProgram[$calledProgram]->fcmPCR() < 100 ? "orange" : "green") : "transparent";
$cpDetailName = str_replace(" ", "_", $calledProgram) . '_detail';
$viewProgramSummary .= '<tr>' . '<td align="left"><a href="#" onClick="ToggleDivVisibility(\'' . $cpDetailName . '\')">' . $calledProgram . '</a></td>' . '<td align="center"><a href="#" onClick="ToggleDivVisibility(\'' . str_replace(" ", "_", $calledProgram) . '_zone_summary\')">Summary</a></td>' . '<td align="right">' . $epsReportProgram[$calledProgram]->committedReduction() . '</td>' . '<td align="right">' . $epsReportProgram[$calledProgram]->fcmDelta() . '</td>' . '<td align="right" style="font-weight: bold; background-color: ' . $fcmColor . ';">' . $epsReportProgram[$calledProgram]->fcmPCR() . '</td>' . '</tr>';
// ======================= Give program details...
$viewProgramDetail .= '<div align="right" id="' . str_replace(" ", "_", $calledProgram) . '_detail" style="display: none;">' . '<table width="750" class="sortable" width="100%" border="1" cellspacing="0" cellpadding="3">' . '<thead>' . '<tr>' . '<th colspan="6" id="vpdCalledProgram" >' . $calledProgram . ' Detail</th>' . '</tr>' . '<tr>' . '<th id="vpdAsset">Asset</th>' . '<th id="vpdAssetID">Asset ID</th>' . '<th id="vpdAdjKW">Adj KW</th>' . '<th id="vpdCRKW">CR KW</th>' . '<th id="vpdHrAvg">Hr. Avg.</th>' . '<th id="vpdPCR">%CR</th>' . '</tr>' . '</thead>' . '<tbody>';
$lastResource = '';
foreach ($epsReportProgramDetails[$calledProgram] as $inx => $epsLineItem) {
if ($lastResource != $epsLineItem->resource()) {
$viewProgramDetail .= '<tr><td colspan="6" align="left"><strong>' . $epsLineItem->resource() . '</strong></td></tr>';
}
$peakColor = is_numeric($epsLineItem->peakPCR()) ? $epsLineItem->peakPCR() < 75 ? "red" : ($epsLineItem->peakPCR() < 100 ? "orange" : "green") : "transparent";
$fcmColor = is_numeric($epsLineItem->fcmPCR()) ? $epsLineItem->fcmPCR() < 75 ? "red" : ($epsLineItem->fcmPCR() < 100 ? "orange" : "green") : "transparent";
$viewProgramDetail .= '<tr>' . '<td align="left">' . $epsLineItem->asset() . '</td>' . '<td align="left">' . $epsLineItem->assetID() . '</td>' . '<td align="right">' . $epsLineItem->adjustment() . '</td>' . '<td align="right">' . $epsLineItem->committedReduction() . '</td>' . '<td align="right">' . $epsLineItem->fcmDelta() . '</td>' . '<td align="right" style="font-weight: bold; background-color: ' . $fcmColor . ';">' . $epsLineItem->fcmPCR() . '</td>' . '</tr>';
$lastResource = $epsLineItem->resource();
}
$viewProgramDetail .= '</tbody></table></div>' . "\n";
$viewZoneSummary .= '<div align="right" id="' . str_replace(" ", "_", $calledProgram) . '_zone_summary" style="display: none;">' . '<table width="750" class="sortable" width="100%" border="1" cellspacing="0" cellpadding="3">' . '<thead>' . '<tr>' . '<th colspan="8" id="vzsCalledProgram">' . $calledProgram . ' Zone Summary</th>' . '</tr>' . '<tr>' . '<th colspan="4" id="vzsSpacer" > </th>' . '</tr>' . '<tr>' . '<th id="vzsCalledZone">Called Zone</th>' . '<th id="vzsTotalCRKW">Total CR KW</th>' . '<th id="vzsHrAvg">Hr. Avg.</th>' . '<th id="vzsPCR">%CR</th>' . '</tr>' . '</thead>' . '<tbody>';
foreach ($calledZones[$calledProgram] as $inx => $calledZone) {
// Give zone summary...
$peakColor = is_numeric($epsReportZone[$calledProgram][$calledZone]->peakPCR()) ? $epsReportZone[$calledProgram][$calledZone]->peakPCR() < 75 ? "red" : ($epsReportZone[$calledProgram][$calledZone]->peakPCR() < 100 ? "orange" : "green") : "transparent";
$fcmColor = is_numeric($epsReportZone[$calledProgram][$calledZone]->fcmPCR()) ? $epsReportZone[$calledProgram][$calledZone]->fcmPCR() < 75 ? "red" : ($epsReportZone[$calledProgram][$calledZone]->fcmPCR() < 100 ? "orange" : "green") : "transparent";
$viewZoneSummary .= '<tr>' . '<td align="left"><a href="#" onClick="ToggleDivVisibility(\'' . str_replace(" ", "_", $calledProgram . "_" . $calledZone) . '_detail\')">' . $calledZone . '</a></td>' . '<td align="right">' . $epsReportZone[$calledProgram][$calledZone]->committedReduction() . '</td>' . '<td align="right">' . $epsReportZone[$calledProgram][$calledZone]->fcmDelta() . '</td>' . '<td align="right" style="font-weight: bold; background-color: ' . $fcmColor . ';">' . $epsReportZone[$calledProgram][$calledZone]->fcmPCR() . '</td>' . '</tr>';
// ======================= Give zone details...
$viewZoneDetail .= '<div align="right" id="' . str_replace(" ", "_", $calledProgram . "_" . $calledZone) . '_detail" style="display: none;">' . '<table width="750" class="sortable" width="100%" border="1" cellspacing="0" cellpadding="3">' . '<thead>' . '<tr>' . '<th colspan="7" id="vzdCalledProgram">' . $calledProgram . " -- " . $calledZone . ' Detail</th>' . '</tr>' . '<tr>' . '<th id="vzdAsset">Asset</th>' . '<th id="vzdAssetID">Asset ID</th>' . '<th id="vzdAdjKW">Adj KW</th>' . '<th id="vzdCRKW">CR KW</th>' . '<th id="vzdHRAvg">Hr. Avg.</th>' . '<th id="vzdPCR">%CR</th>' . '</tr>' . '</thead>' . '<tbody>';
$lastZoneResource = '';
foreach ($epsReportZoneDetails[$calledProgram][$calledZone] as $inx => $epsLineItem) {
if ($lastZoneResource != $epsLineItem->resource()) {
$viewZoneDetail .= '<tr><td colspan="6" align="left"><strong>' . $epsLineItem->resource() . '</strong></td></tr>';
}
$peakColor = is_numeric($epsLineItem->peakPCR()) ? $epsLineItem->peakPCR() < 75 ? "red" : ($epsLineItem->peakPCR() < 100 ? "orange" : "green") : "transparent";
$fcmColor = is_numeric($epsLineItem->fcmPCR()) ? $epsLineItem->fcmPCR() < 75 ? "red" : ($epsLineItem->fcmPCR() < 100 ? "orange" : "green") : "transparent";
$viewZoneDetail .= '<tr>' . '<td align="left">' . $epsLineItem->asset() . '</td>' . '<td align="left">' . $epsLineItem->assetID() . '</td>' . '<td align="right">' . $epsLineItem->adjustment() . '</td>' . '<td align="right">' . $epsLineItem->committedReduction() . '</td>' . '<td align="right">' . $epsLineItem->fcmDelta() . '</td>' . '<td align="right" style="font-weight: bold; background-color: ' . $fcmColor . ';">' . $epsLineItem->fcmPCR() . '</td>' . '</tr>';
$lastZoneResource = $epsLineItem->resource();
}
$viewZoneDetail .= '</tbody></table></div>' . "\n";
}
$viewZoneSummary .= '</tbody></table></div>' . "\n";
}
$viewProgramSummary .= '</tbody></table></div><!-- END EVENT PERFORMANCE SUMMARY DRAW -->' . "\n";
}
return $viewEventSummary . $viewProgramSummary . $viewProgramDetail . $viewZoneSummary . $viewZoneDetail;
//return date("H:i:s");
}
function viewEventSummary($domainID, $eventDate, $CSVFlag)
{
$userObject = clone $_SESSION['UserObject'];
$eventPerformanceSummary = new EventPerformanceSummary($domainID, $eventDate);
$eventPerformanceSummary->Get();
$calledPrograms = $eventPerformanceSummary->calledPrograms();
$calledZones = $eventPerformanceSummary->calledZones();
$epsReportProgram = $eventPerformanceSummary->reportProgram();
$epsReportProgramDetails = $eventPerformanceSummary->reportProgramDetails();
$epsReportZone = $eventPerformanceSummary->reportZone();
$epsReportZoneDetails = $eventPerformanceSummary->reportZoneDetails();
$viewEventSummary = BuildEventSummaryHeader("Event Summary", $userObject->localDomain()->description(), $eventDate, $domainID, $CSVFlag);
if ($CSVFlag === true) {
$viewProgramSummary = 'Program Summary' . "\n" . ',,,' . '5 Min Peak Est,,' . 'FCM Estimate,,,,' . "\n" . 'Called Program,' . 'Zonal,' . 'Total CR KW,' . 'Delta KW,' . '%CR,' . 'Baseline KW,' . 'Load KW,' . 'Delta KW,' . '%CR' . "\n";
} else {
$viewProgramSummary = '<div align="right">' . '<table class="sortable" width="100%" border="1" cellspacing="0" cellpadding="3">' . '<thead>' . '<tr>' . '<th colspan="9">Program Summary</th>' . '</tr>' . '<tr>' . '<th colspan="3"> </th>' . '<th colspan="2">5 Min Peak Est</th>' . '<th colspan="4">FCM Estimate</th>' . '</tr>' . '<tr>' . '<th id="psCalledProgram" class="psCalledProgramTip">Called Program</th>' . '<th id="psZonal" class="psZonalTip">Zonal</th>' . '<th id="psTotalCr" class="psTotalCrTip">Total CR KW</th>' . '<th id="psPeakDelta" class="psPeakDeltaTip">Delta KW</th>' . '<th id="psPeakCr" class="psPeakCTip">%CR</th>' . '<th>Baseline KW</th>' . '<th>Load KW</th>' . '<th id="psFcmDelta" class="psFcmDeltaTip">Delta KW</th>' . '<th id="psFcmCr" class="psFcmCrTip">%CR</th>' . '</tr>' . '</thead>' . '<tbody>' . "\n\n";
}
$viewProgramDetail = "";
$viewZoneSummary = "";
$viewZoneDetail = "";
if ($CSVFlag === true) {
foreach ($calledPrograms as $inx => $calledProgram) {
// Give program summary...
$viewProgramSummary .= $calledProgram . ',' . 'Summary,' . '"' . $epsReportProgram[$calledProgram]->committedReduction() . '"' . ',' . '"' . $epsReportProgram[$calledProgram]->peakDelta() . '"' . ',' . '"' . $epsReportProgram[$calledProgram]->peakPCR() . '"' . ',' . '"' . $epsReportProgram[$calledProgram]->fcmBaseline() . '"' . ',' . '"' . $epsReportProgram[$calledProgram]->fcmLoad() . '"' . ',' . '"' . $epsReportProgram[$calledProgram]->fcmDelta() . '"' . ',' . '"' . $epsReportProgram[$calledProgram]->fcmPCR() . '"' . "\n";
// Give program details...
$viewProgramDetail .= $calledProgram . ' Detail,,,,' . '5 Min Peak Est,,' . 'FCM Estimate,,,,' . "\n" . 'Asset,' . 'Asset ID,' . 'Adj KW,' . 'CR KW,' . 'Delta KW,' . '%CR,' . 'Baseline KW,' . 'Load KW,' . 'Delta KW,' . '%CR' . "\n";
foreach ($epsReportProgramDetails[$calledProgram] as $inx => $epsLineItem) {
$viewProgramDetail .= '"' . $epsLineItem->asset() . '"' . ',' . '"' . $epsLineItem->assetID() . '"' . ',' . '"' . $epsLineItem->adjustment() . '"' . ',' . '"' . $epsLineItem->committedReduction() . '"' . ',' . '"' . $epsLineItem->peakDelta() . '"' . ',' . '"' . $epsLineItem->peakPCR() . '"' . ',' . '"' . $epsLineItem->fcmBaseline() . '"' . ',' . '"' . $epsLineItem->fcmLoad() . '"' . ',' . '"' . $epsLineItem->fcmDelta() . '"' . ',' . '"' . $epsLineItem->fcmPCR() . '"' . "\n";
}
$viewZoneSummary .= $calledProgram . ' Zone Summary' . "\n" . ',,' . '5 Min Peak Est,,' . 'FCM Estimate,,,,' . "\n" . 'Called Zone,' . 'Total CR KW,' . 'Delta KW,' . '%CR,' . 'Baseline KW,' . 'Load KW,' . 'Delta KW,' . '%CR' . "\n";
foreach ($calledZones[$calledProgram] as $inx => $calledZone) {
// Give zone summary...
$viewZoneSummary .= '"' . $calledZone . '"' . ',' . '"' . $epsReportZone[$calledProgram][$calledZone]->committedReduction() . '"' . ',' . '"' . $epsReportZone[$calledProgram][$calledZone]->peakDelta() . '"' . ',' . '"' . $epsReportZone[$calledProgram][$calledZone]->peakPCR() . '"' . ',' . '"' . $epsReportZone[$calledProgram][$calledZone]->fcmBaseline() . '"' . ',' . '"' . $epsReportZone[$calledProgram][$calledZone]->fcmLoad() . '"' . ',' . '"' . $epsReportZone[$calledProgram][$calledZone]->fcmDelta() . '"' . ',' . '"' . $epsReportZone[$calledProgram][$calledZone]->fcmPCR() . '"' . "\n";
// Give zone details...
$viewZoneDetail .= $calledProgram . " -- " . $calledZone . ' Detail,,,,' . '5 Min Peak Est,,' . 'FCM Estimate,,,,' . "\n" . 'Asset,' . 'Asset ID,' . 'Adj KW,' . 'CR KW,' . 'Delta KW,' . '%CR,' . 'Baseline KW,' . 'Load KW,' . 'Delta KW,' . '%CR' . "\n";
foreach ($epsReportZoneDetails[$calledProgram][$calledZone] as $inx => $epsLineItem) {
$viewZoneDetail .= '"' . $epsLineItem->asset() . '"' . ',' . '"' . $epsLineItem->assetID() . '"' . ',' . '"' . $epsLineItem->adjustment() . '"' . ',' . '"' . $epsLineItem->committedReduction() . '"' . ',' . '"' . $epsLineItem->peakDelta() . '"' . ',' . '"' . $epsLineItem->peakPCR() . '"' . ',' . '"' . $epsLineItem->fcmBaseline() . '"' . ',' . '"' . $epsLineItem->fcmLoad() . '"' . ',' . '"' . $epsLineItem->fcmDelta() . '"' . ',' . '"' . $epsLineItem->fcmPCR() . '"' . "\n";
}
}
}
} else {
foreach ($calledPrograms as $inx => $calledProgram) {
// Give program summary...
$peakColor = is_numeric($epsReportProgram[$calledProgram]->peakPCR()) ? $epsReportProgram[$calledProgram]->peakPCR() < 75 ? "red" : ($epsReportProgram[$calledProgram]->peakPCR() < 100 ? "orange" : "green") : "transparent";
$fcmColor = is_numeric($epsReportProgram[$calledProgram]->fcmPCR()) ? $epsReportProgram[$calledProgram]->fcmPCR() < 75 ? "red" : ($epsReportProgram[$calledProgram]->fcmPCR() < 100 ? "orange" : "green") : "transparent";
$cpDetailName = str_replace(" ", "_", $calledProgram) . '_detail';
$viewProgramSummary .= '<tr>' . '<td align="left"><a href="#" onClick="ToggleDivVisibility(\'' . $cpDetailName . '\')">' . $calledProgram . '</a></td>' . '<td align="center"><a href="#" onClick="ToggleDivVisibility(\'' . str_replace(" ", "_", $calledProgram) . '_zone_summary\')">Summary</a></td>' . '<td align="right">' . $epsReportProgram[$calledProgram]->committedReduction() . '</td>' . '<td align="right">' . $epsReportProgram[$calledProgram]->peakDelta() . '</td>' . '<td align="right" style="font-weight: bold; background-color: ' . $peakColor . ';">' . $epsReportProgram[$calledProgram]->peakPCR() . '</td>' . '<td align="right">' . $epsReportProgram[$calledProgram]->fcmBaseline() . '</td>' . '<td align="right">' . $epsReportProgram[$calledProgram]->fcmLoad() . '</td>' . '<td align="right">' . $epsReportProgram[$calledProgram]->fcmDelta() . '</td>' . '<td align="right" style="font-weight: bold; background-color: ' . $fcmColor . ';">' . $epsReportProgram[$calledProgram]->fcmPCR() . '</td>' . '</tr>';
// Give program details...
$viewProgramDetail .= '<div align="right" id="' . str_replace(" ", "_", $calledProgram) . '_detail" style="display: none;">' . '<table class="sortable" width="100%" border="1" cellspacing="0" cellpadding="3">' . '<thead>' . '<tr>' . '<th colspan="4">' . $calledProgram . ' Detail</th>' . '<th colspan="2">5 Min Peak Est</th>' . '<th colspan="4">FCM Estimate</th>' . '</tr>' . '<tr>' . '<th>Asset</th>' . '<th>Asset ID</th>' . '<th>Adj KW</th>' . '<th>CR KW</th>' . '<th>Delta KW</th>' . '<th>%CR</th>' . '<th>Baseline KW</th>' . '<th>Load KW</th>' . '<th>Delta KW</th>' . '<th>%CR</th>' . '</tr>' . '</thead>' . '<tbody>';
foreach ($epsReportProgramDetails[$calledProgram] as $inx => $epsLineItem) {
$peakColor = is_numeric($epsLineItem->peakPCR()) ? $epsLineItem->peakPCR() < 75 ? "red" : ($epsLineItem->peakPCR() < 100 ? "orange" : "green") : "transparent";
$fcmColor = is_numeric($epsLineItem->fcmPCR()) ? $epsLineItem->fcmPCR() < 75 ? "red" : ($epsLineItem->fcmPCR() < 100 ? "orange" : "green") : "transparent";
$viewProgramDetail .= '<tr>' . '<td align="left">' . $epsLineItem->asset() . '</td>' . '<td align="left">' . $epsLineItem->assetID() . '</td>' . '<td align="right">' . $epsLineItem->adjustment() . '</td>' . '<td align="right">' . $epsLineItem->committedReduction() . '</td>' . '<td align="right">' . $epsLineItem->peakDelta() . '</td>' . '<td align="right" style="font-weight: bold; background-color: ' . $peakColor . ';">' . $epsLineItem->peakPCR() . '</td>' . '<td align="right">' . $epsLineItem->fcmBaseline() . '</td>' . '<td align="right">' . $epsLineItem->fcmLoad() . '</td>' . '<td align="right">' . $epsLineItem->fcmDelta() . '</td>' . '<td align="right" style="font-weight: bold; background-color: ' . $fcmColor . ';">' . $epsLineItem->fcmPCR() . '</td>' . '</tr>';
}
$viewProgramDetail .= '</tbody></table></div>' . "\n";
$viewZoneSummary .= '<div align="right" id="' . str_replace(" ", "_", $calledProgram) . '_zone_summary" style="display: none;">' . '<table class="sortable" width="100%" border="1" cellspacing="0" cellpadding="3">' . '<thead>' . '<tr>' . '<th colspan="8">' . $calledProgram . ' Zone Summary</th>' . '</tr>' . '<tr>' . '<th colspan="2"> </th>' . '<th colspan="2">5 Min Peak Est</th>' . '<th colspan="4">FCM Estimate</th>' . '</tr>' . '<tr>' . '<th>Called Zone</th>' . '<th>Total CR KW</th>' . '<th>Delta KW</th>' . '<th>%CR</th>' . '<th>Baseline KW</th>' . '<th>Load KW</th>' . '<th>Delta KW</th>' . '<th>%CR</th>' . '</tr>' . '</thead>' . '<tbody>';
foreach ($calledZones[$calledProgram] as $inx => $calledZone) {
// Give zone summary...
$peakColor = is_numeric($epsReportZone[$calledProgram][$calledZone]->peakPCR()) ? $epsReportZone[$calledProgram][$calledZone]->peakPCR() < 75 ? "red" : ($epsReportZone[$calledProgram][$calledZone]->peakPCR() < 100 ? "orange" : "green") : "transparent";
$fcmColor = is_numeric($epsReportZone[$calledProgram][$calledZone]->fcmPCR()) ? $epsReportZone[$calledProgram][$calledZone]->fcmPCR() < 75 ? "red" : ($epsReportZone[$calledProgram][$calledZone]->fcmPCR() < 100 ? "orange" : "green") : "transparent";
$viewZoneSummary .= '<tr>' . '<td align="left"><a href="#" onClick="ToggleDivVisibility(\'' . str_replace(" ", "_", $calledProgram . "_" . $calledZone) . '_detail\')">' . $calledZone . '</a></td>' . '<td align="right">' . $epsReportZone[$calledProgram][$calledZone]->committedReduction() . '</td>' . '<td align="right">' . $epsReportZone[$calledProgram][$calledZone]->peakDelta() . '</td>' . '<td align="right" style="font-weight: bold; background-color: ' . $peakColor . ';">' . $epsReportZone[$calledProgram][$calledZone]->peakPCR() . '</td>' . '<td align="right">' . $epsReportZone[$calledProgram][$calledZone]->fcmBaseline() . '</td>' . '<td align="right">' . $epsReportZone[$calledProgram][$calledZone]->fcmLoad() . '</td>' . '<td align="right">' . $epsReportZone[$calledProgram][$calledZone]->fcmDelta() . '</td>' . '<td align="right" style="font-weight: bold; background-color: ' . $fcmColor . ';">' . $epsReportZone[$calledProgram][$calledZone]->fcmPCR() . '</td>' . '</tr>';
// Give zone details...
$viewZoneDetail .= '<div align="right" id="' . str_replace(" ", "_", $calledProgram . "_" . $calledZone) . '_detail" style="display: none;">' . '<table class="sortable" width="100%" border="1" cellspacing="0" cellpadding="3">' . '<thead>' . '<tr>' . '<th colspan="4">' . $calledProgram . " -- " . $calledZone . ' Detail</th>' . '<th colspan="2">5 Min Peak Est</th>' . '<th colspan="4">FCM Estimate</th>' . '</tr>' . '<tr>' . '<th>Asset</th>' . '<th>Asset ID</th>' . '<th>Adj KW</th>' . '<th>CR KW</th>' . '<th>Delta KW</th>' . '<th>%CR</th>' . '<th>Baseline KW</th>' . '<th>Load KW</th>' . '<th>Delta KW</th>' . '<th>%CR</th>' . '</tr>' . '</thead>' . '<tbody>';
foreach ($epsReportZoneDetails[$calledProgram][$calledZone] as $inx => $epsLineItem) {
$peakColor = is_numeric($epsLineItem->peakPCR()) ? $epsLineItem->peakPCR() < 75 ? "red" : ($epsLineItem->peakPCR() < 100 ? "orange" : "green") : "transparent";
$fcmColor = is_numeric($epsLineItem->fcmPCR()) ? $epsLineItem->fcmPCR() < 75 ? "red" : ($epsLineItem->fcmPCR() < 100 ? "orange" : "green") : "transparent";
$viewZoneDetail .= '<tr>' . '<td align="left">' . $epsLineItem->asset() . '</td>' . '<td align="left">' . $epsLineItem->assetID() . '</td>' . '<td align="right">' . $epsLineItem->adjustment() . '</td>' . '<td align="right">' . $epsLineItem->committedReduction() . '</td>' . '<td align="right">' . $epsLineItem->peakDelta() . '</td>' . '<td align="right" style="font-weight: bold; background-color: ' . $peakColor . ';">' . $epsLineItem->peakPCR() . '</td>' . '<td align="right">' . $epsLineItem->fcmBaseline() . '</td>' . '<td align="right">' . $epsLineItem->fcmLoad() . '</td>' . '<td align="right">' . $epsLineItem->fcmDelta() . '</td>' . '<td align="right" style="font-weight: bold; background-color: ' . $fcmColor . ';">' . $epsLineItem->fcmPCR() . '</td>' . '</tr>';
}
$viewZoneDetail .= '</tbody></table></div>' . "\n";
}
$viewZoneSummary .= '</tbody></table></div>' . "\n";
}
$viewProgramSummary .= '</tbody></table></div>' . "\n";
}
return $viewEventSummary . $viewProgramSummary . $viewProgramDetail . $viewZoneSummary . $viewZoneDetail;
//return date("H:i:s");
}
function viewEventSummary($domainID, $eventDate, $CSVFlag)
{
$userObject = clone $_SESSION['UserObject'];
/* this is a fix for the date not coming in the way we want -- dont' want to tip the apple cart 2010.06.13 */
$dateParts = explode('-', $eventDate);
$month = $dateParts[0];
$day = $dateParts[1];
$year = $dateParts[2];
$lineCount = 0;
$modified = array();
$modifiedIndex = 0;
$modifiedOutput = null;
$modifiedFinal = null;
$eventDate = $year . '-' . $month . '-' . $day;
$eventPerformanceSummary = new EventPerformanceSummary($domainID, $eventDate);
$eventPerformanceSummary->Get();
//$userObject->preDebugger($eventPerformanceSummary);
$calledPrograms = $eventPerformanceSummary->calledPrograms();
$calledZones = $eventPerformanceSummary->calledZones();
$epsReportProgram = $eventPerformanceSummary->reportProgram();
//$userObject->preDebugger($epsReportProgram);
$epsReportProgramDetails = $eventPerformanceSummary->reportProgramDetails();
$epsReportZone = $eventPerformanceSummary->reportZone();
$epsReportZoneDetails = $eventPerformanceSummary->reportZoneDetails();
//$userObject->preDebugger($epsReportProgramDetails,'#989800');
$viewEventSummary = BuildEventSummaryHeader("Event Summary", $userObject->localDomain()->description(), $eventDate, $domainID, $CSVFlag);
$PointChannels = new PointChannels();
$PointChannels->Load($userObject->id(), $userObject->Domains(0)->id(), null, null, true, $month, $year);
//$userObject->preDebugger($PointChannels);
//$userObject->preDebugger($calledZones);
//$userObject->preDebugger($PointChannels->Resources());
foreach ($calledPrograms as $inx => $calledProgram) {
//$userObject->preDebugger($PointChannels->Resources(),'#980000');
$CSOs[$calledProgram]['value'] = 0;
foreach ($PointChannels->Resources() as $resourceObjectId => $attribs) {
// $userObject->preDebugger($epsReportProgramDetails[$calledProgram],'orange');
if (array_key_exists($resourceObjectId, $epsReportProgramDetails[$calledProgram])) {
foreach ($attribs['assets'] as $asset) {
$CSOs[$calledProgram][$attribs['identifier']] = 0;
$resourceCR = 0;
if (!array_key_exists($asset['assetIdentifier'], $epsReportProgramDetails[$calledProgram][$resourceObjectId])) {
$epsReportProgramDetailsRestack[$calledProgram][$attribs['identifier']][$asset['assetIdentifier']]['resourceObjectId'] = $resourceObjectId;
$epsReportProgramDetailsRestack[$calledProgram][$attribs['identifier']][$asset['assetIdentifier']]['resourceDescription'] = $attribs['description'];
$epsReportProgramDetailsRestack[$calledProgram][$attribs['identifier']][$asset['assetIdentifier']]['objectId'] = $asset['id'];
$epsReportProgramDetailsRestack[$calledProgram][$attribs['identifier']][$asset['assetIdentifier']]['channelId'] = $asset['channelId'];
$epsReportProgramDetailsRestack[$calledProgram][$attribs['identifier']][$asset['assetIdentifier']]['description'] = $asset['description'];
$epsReportProgramDetailsRestack[$calledProgram][$attribs['identifier']][$asset['assetIdentifier']]['programId'] = $asset['programId'];
$epsReportProgramDetailsRestack[$calledProgram][$attribs['identifier']][$asset['assetIdentifier']]['programDescription'] = $asset['programDescription'];
} else {
$epsReportProgramDetailsRestack[$calledProgram][$attribs['identifier']][$asset['assetIdentifier']] = clone $epsReportProgramDetails[$calledProgram][$resourceObjectId][$asset['assetIdentifier']];
$resourceCR = $epsReportProgramDetailsRestack[$calledProgram][$attribs['identifier']][$asset['assetIdentifier']]->resourceCR();
}
if ($resourceCR > 0) {
$CSOs[$calledProgram][$attribs['identifier']] = $resourceCR;
}
}
$CSOs[$calledProgram]['value'] += $resourceCR;
}
foreach ($calledZones[$calledProgram] as $inx => $calledZone) {
if (array_key_exists($resourceObjectId, $epsReportZoneDetails[$calledProgram][$calledZone])) {
foreach ($attribs['assets'] as $asset) {
$CSOs[$calledProgram][$calledZone][$attribs['identifier']] = 0;
$resourceCR = 0;
if (!array_key_exists($asset['assetIdentifier'], $epsReportZoneDetails[$calledProgram][$calledZone][$resourceObjectId])) {
//$userObject->preDebugger($asset['description'],'#989800');
$epsReportZoneDetailsRestack[$calledProgram][$calledZone][$attribs['identifier']][$asset['assetIdentifier']]['resourceObjectId'] = $resourceObjectId;
$epsReportZoneDetailsRestack[$calledProgram][$calledZone][$attribs['identifier']][$asset['assetIdentifier']]['resourceDescription'] = $attribs['description'];
$epsReportZoneDetailsRestack[$calledProgram][$calledZone][$attribs['identifier']][$asset['assetIdentifier']]['objectId'] = $asset['id'];
$epsReportZoneDetailsRestack[$calledProgram][$calledZone][$attribs['identifier']][$asset['assetIdentifier']]['channelId'] = $asset['channelId'];
$epsReportZoneDetailsRestack[$calledProgram][$calledZone][$attribs['identifier']][$asset['assetIdentifier']]['description'] = $asset['description'];
$epsReportZoneDetailsRestack[$calledProgram][$calledZone][$attribs['identifier']][$asset['assetIdentifier']]['programId'] = $asset['programId'];
$epsReportZoneDetailsRestack[$calledProgram][$calledZone][$attribs['identifier']][$asset['assetIdentifier']]['programDescription'] = $asset['programDescription'];
} else {
$epsReportZoneDetailsRestack[$calledProgram][$calledZone][$attribs['identifier']][$asset['assetIdentifier']] = clone $epsReportZoneDetails[$calledProgram][$calledZone][$resourceObjectId][$asset['assetIdentifier']];
$resourceCR = $epsReportZoneDetailsRestack[$calledProgram][$calledZone][$attribs['identifier']][$asset['assetIdentifier']]->resourceCR();
}
if ($resourceCR > 0) {
$CSOs[$calledProgram][$calledZone][$attribs['identifier']] = $resourceCR;
}
}
if (isset($CSOs[$calledProgram][$calledZone]['value'])) {
$CSOs[$calledProgram][$calledZone]['value'] += $resourceCR;
} else {
$CSOs[$calledProgram][$calledZone]['value'] = $resourceCR;
}
}
}
}
}
//$userObject->preDebugger("$CSOs[$calledProgram][$calledZone]['value']");
//$userObject->preDebugger($CSOs,'#980098');
if ($CSVFlag === true) {
/* ===========================================================================
Program Summary : CSV Heading
=========================================================================== */
$viewProgramSummary = 'Program Summary' . "\n" . 'Called Program,' . 'Total CSO KW,' . 'Hr. Avg.,' . '%CSO,' . 'Updated Date' . "\n";
} else {
/* ===========================================================================
Program Summary : HTML Heading
=========================================================================== */
$viewProgramSummary = '<!-- START EVENT PERFORMANCE SUMMARY DRAW -->' . '<table class="sortable" width="850" border="1" cellspacing="0" cellpadding="3">' . "\n" . '<thead>' . "\n" . '<tr>' . "\n" . '<th colspan="6">Program Summary</th>' . "\n" . '</tr>' . "\n" . '<tr>' . "\n" . '<th id="psCalledProgram" class="psCalledProgramTip">Called Program</th>' . "\n" . '<th id="psZonal" class="psZonalTip">Zonal</th>' . "\n" . '<th id="psTotalCr" class="psTotalCrTip">Total CSO KW</th>' . "\n" . '<th id="psFcmDelta" class="psFcmDeltaTip">Hr. Avg.</th>' . "\n" . '<th id="psFcmCr" class="psFcmCrTip">%CSO</th>' . "\n" . '<th id="psUpdated" width="80">Updated Date</th>' . "\n" . '</tr>' . "\n" . '</thead>' . "\n" . '<tbody>' . "\n\n";
}
$viewProgramDetail = "";
$viewZoneSummary = "";
$viewZoneDetail = "";
/* ===========================================================================
BEGIN STACKING
---------------------------------------------------------------------------
CSV
=========================================================================== */
if ($CSVFlag === true) {
foreach ($calledPrograms as $inx => $calledProgram) {
$calledProgramAbbrev = "";
foreach (explode(' ', $calledProgram) as $inx => $item) {
$calledProgramAbbrev .= substr($item, 0, 1);
}
/* ===========================================================================
Program Details CSV (response summary)
=========================================================================== */
$thisProgramDetails = str_replace(" ", "_", $calledProgram) . '_detail';
if (array_search($thisProgramDetails, $_SESSION['evtSummarySections']) !== false) {
foreach ($epsReportProgramDetailsRestack[$calledProgram] as $resourceIdentifier => $epsAssetStack) {
$programSummaryAveragesByResource[$resourceIdentifier]['noDataCount'] = 0;
foreach ($epsAssetStack as $inx => $epsLineItem) {
if (is_object($epsLineItem)) {
$resourceSummaryStack[$epsLineItem->resource()][] = array('status' => 'responding', 'resourceCR' => str_replace(',', '', $epsLineItem->resourceCR()), 'adjustment' => str_replace(',', '', $epsLineItem->adjustment()), 'committedReduction' => str_replace(',', '', $epsLineItem->committedReduction()), 'fcmDelta' => str_replace(',', '', $epsLineItem->fcmDelta()), 'fcmPCR' => str_replace(',', '', $epsLineItem->fcmPCR()));
$resourceDetailStack[$epsLineItem->resource()][] = array('status' => 'responding', 'asset' => $epsLineItem->asset(), 'assetId' => $epsLineItem->assetID(), 'updatedDate' => $epsLineItem->updatedDate(), 'adjustment' => str_replace(',', '', $epsLineItem->adjustment()), 'committedReduction' => str_replace(',', '', $epsLineItem->committedReduction()), 'fcmDelta' => str_replace(',', '', $epsLineItem->fcmDelta()), 'fcmPCR' => str_replace(',', '', $epsLineItem->fcmPCR()));
//$userObject->preDebugger($resourceSummaryStack);
} else {
$resourceSummaryStack[$epsLineItem['resourceDescription']][] = array('status' => 'out', 'resourceCR' => 0, 'adjustment' => 0, 'committedReduction' => 0, 'fcmDelta' => 0, 'fcmPCR' => 0);
$resourceDetailStack[$epsLineItem['resourceDescription']][] = array('status' => 'out', 'asset' => $epsLineItem['description'], 'assetId' => $inx, 'updatedDate' => 'No Data', 'adjustment' => 'No Data', 'committedReduction' => 'No Data', 'fcmDelta' => 'No Data', 'fcmPCR' => 'No Data');
}
}
//$userObject->preDebugger($resourceSummaryStack,'#989800');
foreach ($resourceSummaryStack as $resource => $lines) {
$numberOfAssets = count($lines);
$totalAdjustment = 0;
$totalCommittedReduction = 0;
$totalFCMDelta = 0;
$totalFCMPCR = 0;
$programSummaryAveragesByResource[$resourceIdentifier]['fcmDelta'] = 0;
$programSummaryAveragesByResource[$resourceIdentifier]['updatedDate'] = $epsReportProgram[$calledProgram]->updatedDate();
foreach ($lines as $inx => $assetInfo) {
$totalCommittedReduction += $assetInfo['committedReduction'];
//$userObject->preDebugger($assetInfo['fcmDelta'],'#989800');
$totalFCMDelta += $assetInfo['fcmDelta'];
$totalFCMPCR += $assetInfo['fcmPCR'];
if ($assetInfo['status'] == 'out') {
$programSummaryAveragesByResource[$resourceIdentifier]['noDataCount']++;
}
}
//$userObject->preDebugger( $programSummaryAveragesByResource[$resource]);
$programSummaryAveragesByResource[$resourceIdentifier]['fcmDelta'] = $totalFCMDelta;
$programSummaryAveragesByResource[$resourceIdentifier]['updatedDate'] = $epsReportProgram[$calledProgram]->updatedDate();
}
$assetCountString = $programSummaryAveragesByResource[$resource]['noDataCount'] > 0 ? '"' . $numberOfAssets . ' (' . $programSummaryAveragesByResource[$resource]['noDataCount'] . ' no data)"' : $numberOfAssets;
$viewProgramDetail .= '"Program",' . '"Resource",' . '"Resource ID",' . '"CSO KW",' . '"Total Delta KW",' . '"% Perf.",' . '"Total # Assets",' . '"Updated Date"' . "\n";
//$userObject->preDebugger($programSummaryAveragesByResource);
// CSV Program Summary
$performancePercent = round(str_replace(',', '', $programSummaryAveragesByResource[$resourceIdentifier]['fcmDelta']) / str_replace(',', '', $CSOs[$calledProgram][$resourceIdentifier]) * 100, 2);
//$userObject->preDebugger($epsLineItem);
$rName = is_object($epsLineItem) ? $epsLineItem->resource() : $epsLineItem['resourceDescription'];
$viewProgramDetail .= '"' . $calledProgramAbbrev . '"' . ',' . '"' . $rName . ' Summary "' . ',' . '"' . $resourceIdentifier . '"' . ',' . '"' . round($CSOs[$calledProgram][$resourceIdentifier], 3) . '"' . ',' . '"' . round($programSummaryAveragesByResource[$resourceIdentifier]['fcmDelta'], 3) . '"' . ',' . '"' . $performancePercent . '"' . ',' . $assetCountString . ',' . '"' . $programSummaryAveragesByResource[$resourceIdentifier]['updatedDate'] . '"' . "\n";
/* ===========================================================================
Program Response Details CSV
=========================================================================== */
$thisProgramResourceDetail = str_replace(" ", "_", $rName) . '_program_resource_detail';
if (array_search($thisProgramResourceDetail, $_SESSION['evtSummarySections']) !== false) {
//$userObject->preDebugger('got Program Resource Detail '.$thisProgramResourceDetail , 'purple');
//$userObject->preDebugger($epsLineItem->resource());
$viewProgramDetail .= "----------------------------------\n" . 'Program, ' . 'Resource,' . 'Asset,' . 'Asset ID,' . 'Adj KW,' . 'CR KW,' . 'Hr. Avg.,' . '%CR,' . 'Updated Date' . "\n";
foreach ($resourceDetailStack[$rName] as $resourceName => $detailLineItem) {
$viewProgramDetail .= '"' . $calledProgramAbbrev . '"' . ',' . '"' . $rName . '"' . ',' . '"' . $detailLineItem['asset'] . '"' . ',' . '"' . $detailLineItem['assetId'] . '"' . ',' . '"' . $detailLineItem['adjustment'] . '"' . ',' . '"' . $detailLineItem['committedReduction'] . '"' . ',' . '"' . $detailLineItem['fcmDelta'] . '"' . ',' . '"' . $detailLineItem['fcmPCR'] . '"' . ',' . '"' . $detailLineItem['updatedDate'] . '"' . "\n";
}
$viewProgramDetail .= "----------------------------------\n";
}
}
}
// called_program_resource_detail |
// array_search($thisProgramDetails,$_SESSION['evtSummarySections'])
/* ===========================================================================
Program Summary : CSV Data
=========================================================================== */
// Give program summary...
$performancePercent = round(str_replace(',', '', $epsReportProgram[$calledProgram]->fcmDelta()) / str_replace(',', '', $CSOs[$calledProgram]['value']) * 100, 2);
$viewProgramSummary .= $calledProgram . ',' . '"' . $CSOs[$calledProgram]['value'] . '"' . ',' . '"' . $epsReportProgram[$calledProgram]->fcmDelta() . '"' . ',' . '"' . $performancePercent . '"' . ',' . '"' . $epsReportProgram[$calledProgram]->updatedDate() . '"' . "\n";
/* ===========================================================================
Program Zone Summary CSV
=========================================================================== */
if (array_search(str_replace(" ", "_", $calledProgram) . '_zone_summary', $_SESSION['evtSummarySections']) !== false) {
$viewZoneSummary .= $calledProgram . ' Zone Summary' . "\n" . 'Called Zone,' . 'Total CSO KW,' . 'Hr. Avg.,' . '%CSO' . 'Updated Date' . "\n";
foreach ($calledZones[$calledProgram] as $inx => $calledZone) {
foreach ($epsReportZoneDetailsRestack[$calledProgram][$calledZone] as $resourceIdentifier => $assetStack) {
foreach ($assetStack as $inx => $epsLineItem) {
if (is_object($epsLineItem)) {
$resourceZoneSummaryStack[$epsLineItem->resource()][] = array('status' => 'responding', 'resourceCR' => str_replace(',', '', $epsLineItem->resourceCR()), 'adjustment' => str_replace(',', '', $epsLineItem->adjustment()), 'committedReduction' => str_replace(',', '', $epsLineItem->committedReduction()), 'fcmDelta' => str_replace(',', '', $epsLineItem->fcmDelta()), 'fcmPCR' => str_replace(',', '', $epsLineItem->fcmPCR()));
$resourceZoneDetailStack[$epsLineItem->resource()][] = array('status' => 'responding', 'asset' => $epsLineItem->asset(), 'assetId' => $epsLineItem->assetID(), 'updatedDate' => $epsLineItem->updatedDate(), 'adjustment' => str_replace(',', '', $epsLineItem->adjustment()), 'committedReduction' => str_replace(',', '', $epsLineItem->committedReduction()), 'fcmDelta' => str_replace(',', '', $epsLineItem->fcmDelta()), 'fcmPCR' => str_replace(',', '', $epsLineItem->fcmPCR()));
} else {
$resourceZoneSummaryStack[$epsLineItem['resourceDescription']][] = array('status' => 'out', 'resourceCR' => 0, 'adjustment' => 0, 'committedReduction' => 0, 'fcmDelta' => 0, 'fcmPCR' => 0);
$resourceZoneDetailStack[$epsLineItem['resourceDescription']][] = array('status' => 'out', 'asset' => $epsLineItem['description'], 'assetId' => $inx, 'updatedDate' => 'No Data', 'adjustment' => 'No Data', 'committedReduction' => 'No Data', 'fcmDelta' => 'No Data', 'fcmPCR' => 'No Data');
}
}
foreach ($resourceZoneSummaryStack as $resource => $assetDetail) {
$numberOfAssets = count($assetDetail);
$totalAdjustment = 0;
$totalCommittedReduction = 0;
$totalFCMDelta = 0;
$totalFCMPCR = 0;
$zoneSummaryAveragesByResource[$resource]['fcmDelta'] = 0;
$zoneSummaryAveragesByResource[$resource]['updatedDate'] = $epsReportZone[$calledProgram][$calledZone]->updatedDate();
foreach ($assetDetail as $inx => $assetInfo) {
if (!isset($zoneSummaryAveragesByResource[$resource]['resourceID'])) {
$zoneSummaryAveragesByResource[$resource]['resourceID'] = $resourceIdentifier;
}
$totalCommittedReduction += $assetInfo['committedReduction'];
$totalFCMDelta += $assetInfo['fcmDelta'];
$totalFCMPCR += $assetInfo['fcmPCR'];
if ($assetInfo['status'] == 'out') {
$zoneSummaryAveragesByResource[$resource]['noDataCount']++;
}
}
$zoneSummaryAveragesByResource[$resource]['fcmDelta'] = $totalFCMDelta;
$zoneSummaryAveragesByResource[$resource]['updatedDate'] = $epsReportZone[$calledProgram][$calledZone]->updatedDate();
}
/* ===========================================================================
Program Zone Details CSV
=========================================================================== */
//$eventPerformanceSummary->preDebugger(str_replace(" ", "_", $calledProgram . "_" . $calledZone) . '_detail');
//print array_search(str_replace(" ", "_", $calledProgram . "_" . $calledZone) . '_detail',$_SESSION['evtSummarySections']);
if ($_SESSION['evtSummarySections'][0] == 'all' || array_search(str_replace(" ", "_", $calledProgram . "_" . $calledZone) . '_detail', $_SESSION['evtSummarySections']) !== false) {
// Give zone details...
$viewZoneDetail .= $calledProgram . " -- " . $calledZone . ' Detail' . "\n" . 'Zone -- Resource,' . 'Resource Id,' . 'Adj KW,' . 'CR KW,' . 'Hr. Avg.,' . '%CR,' . '# of Assets' . "\n";
$assetCountString = $zoneSummaryAveragesByResource[$resource]['noDataCount'] > 0 ? '"' . $numberOfAssets . ' (' . $zoneSummaryAveragesByResource[$resource]['noDataCount'] . ' no data)"' : $numberOfAssets;
$viewZoneDetail .= ',' . '"Resource ID",' . '"CSO KW",' . '"Total Delta KW",' . '"% Perf.",' . '"Total # Assets",' . '"Updated Date"' . "\n";
$performancePercent = round(str_replace(',', '', $zoneSummaryAveragesByResource[$resource]['fcmDelta']) / str_replace(',', '', $CSOs[$calledProgram][$calledZone][$zoneSummaryAveragesByResource[$resource]['resourceID']]) * 100, 2);
$viewZoneDetail .= '"' . $calledZone . ' -- ' . $epsLineItem->resource() . ' Summary "' . ',' . '"' . $zoneSummaryAveragesByResource[$resource]['resourceID'] . '"' . ',' . '"' . round($CSOs[$calledProgram][$calledZone][$zoneSummaryAveragesByResource[$resource]['resourceID']], 3) . '"' . ',' . '"' . round($zoneSummaryAveragesByResource[$resource]['fcmDelta'], 3) . '"' . ',' . '"' . $performancePercent . '"' . ',' . $assetCountString . ',' . '"' . $zoneSummaryAveragesByResource[$resource]['updatedDate'] . '"' . "\n";
if ($_SESSION['evtSummarySections'][0] == 'all' || array_search(str_replace(" ", "_", $epsLineItem->resource()) . '_zone_resource_detail', $_SESSION['evtSummarySections']) !== false) {
$viewZoneDetail .= $calledProgram . " -- " . $calledZone . ' Detail' . "\n" . 'Resource,' . 'Asset,' . 'Asset ID,' . 'Adj KW,' . 'CR KW,' . 'Hr. Avg.,' . '%CR,' . 'Updated Date' . "\n";
foreach ($resourceZoneDetailStack as $resourceName => $assetDetail) {
foreach ($assetDetail as $detailLineItem) {
$viewZoneDetail .= '"' . $epsLineItem->resource() . '"' . ',' . '"' . $detailLineItem['asset'] . '"' . ',' . '"' . $detailLineItem['assetId'] . '"' . ',' . '"' . $detailLineItem['adjustment'] . '"' . ',' . '"' . $detailLineItem['committedReduction'] . '"' . ',' . '"' . $detailLineItem['fcmDelta'] . '"' . ',' . '"' . $detailLineItem['fcmPCR'] . '"' . ',' . '"' . $detailLineItem['updatedDate'] . '"' . "\n";
}
//$viewZoneDetail .= "----------------------------------\n";
}
}
// if zone resource detail
}
}
$performancePercent = round(str_replace(',', '', $epsReportZone[$calledProgram][$calledZone]->fcmDelta()) / str_replace(',', '', $CSOs[$calledProgram][$calledZone]['value']) * 100, 2);
$viewZoneSummary .= '"' . $calledZone . '"' . ',' . '"' . $CSOs[$calledProgram][$calledZone]['value'] . '"' . ',' . '"' . $epsReportZone[$calledProgram][$calledZone]->fcmDelta() . '"' . ',' . '"' . $performancePercent . '"' . ',' . '"' . $epsReportZone[$calledProgram][$calledZone]->updatedDate() . '"' . "\n";
}
}
// if zone summary
}
} else {
foreach ($calledPrograms as $inx => $calledProgram) {
$viewProgramDetailLines = array();
$viewProgramSummaryLines = array();
/* ===========================================================================
Program Summary Table
-----------------------------------Notes-----------------------------------
Items in Called Program and Zonal columns are linked to Real Time demand
Real Time Demand Response Detail table
=========================================================================== */
//$userObject->preDebugger($epsReportProgramDetailsRestack);
foreach ($epsReportProgramDetailsRestack[$calledProgram] as $resourceIdentifier => $epsAssetStack) {
$modifiedIndex++;
foreach ($epsAssetStack as $inx => $epsLineItem) {
$lineCount++;
if (is_object($epsLineItem) && $inx != 'identifier') {
//if($userObject->isLSEUser() && $epsLineItem->wasUpdated())
if ($epsLineItem->wasUpdated()) {
$modified[$epsLineItem->updatedDate()][$calledProgram][$modifiedIndex]['name'] = $epsLineItem->resource();
$modified[$epsLineItem->updatedDate()][$calledProgram][$modifiedIndex]['assets'][$epsLineItem->assetID()] = htmlspecialchars($epsLineItem->asset());
}
$fcmColor = is_numeric($epsLineItem->fcmPCR()) ? $epsLineItem->fcmPCR() < 75 ? "red" : ($epsLineItem->fcmPCR() < 100 ? "orange" : "green") : "transparent";
$viewProgramDetailLines[$epsLineItem->resource()]['responding'][] = '<tr>' . "\n" . '<td align="left" class="htmlspecial">' . htmlspecialchars($epsLineItem->asset()) . '</td>' . "\n" . '<td align="right">' . $epsLineItem->assetID() . '</td>' . "\n" . '<td align="right">' . $epsLineItem->adjustment() . '</td>' . "\n" . '<td align="right">' . $epsLineItem->committedReduction() . '</td>' . "\n" . '<td align="right">' . $epsLineItem->fcmDelta() . '</td>' . "\n" . '<td align="right" style="font-weight: bold; background-color: ' . $fcmColor . ';">' . $epsLineItem->fcmPCR() . '</td>' . "\n" . '<td align="right">' . $epsLineItem->updatedDate() . '</td>' . "\n" . '</tr>' . "\n";
$viewProgramSummaryLines[$epsLineItem->resource()][] = array('status' => 'responding', 'resourceID' => $resourceIdentifier, 'resourceCR' => str_replace(',', '', $epsLineItem->resourceCR()), 'adjustment' => str_replace(',', '', $epsLineItem->adjustment()), 'committedReduction' => str_replace(',', '', $epsLineItem->committedReduction()), 'fcmDelta' => str_replace(',', '', $epsLineItem->fcmDelta()), 'fcmPCR' => str_replace(',', '', $epsLineItem->fcmPCR()));
} else {
$viewProgramDetailLines[$epsLineItem['resourceDescription']]['out'][] = '<tr>' . "\n" . '<td align="left" style="font-weight: bold; color: #FC6701;" class="htmlspecial">' . htmlspecialchars($epsLineItem['description']) . '</td>' . "\n" . '<td align="right" style="font-weight: bold; color: #FC6701;">' . $inx . '</td>' . "\n" . '<td align="center" style="font-weight: bold; color: #FC6701;">No Data</td>' . "\n" . '<td align="center" style="font-weight: bold; color: #FC6701;">No Data</td>' . "\n" . '<td align="center" style="font-weight: bold; color: #FC6701;">No Data</td>' . "\n" . '<td align="center" style="font-weight: bold; color: #FC6701;">No Data</td>' . "\n" . '<td align="center" style="font-weight: bold; color: #FC6701;">No Data</td>' . "\n" . '</tr>' . "\n";
$viewProgramSummaryLines[$epsLineItem['resourceDescription']][] = array('status' => 'out', 'resourceID' => $resourceIdentifier, 'resourceCR' => 0, 'adjustment' => 0, 'committedReduction' => 0, 'fcmDelta' => 0, 'fcmPCR' => 0);
}
}
}
//$eventPerformanceSummary->preDebugger($viewProgramSummaryLines);
foreach ($viewProgramSummaryLines as $resource => $lines) {
$programSummaryAveragesByResource[$resource]['noDataCount'] = 0;
$numberOfAssets = count($viewProgramSummaryLines[$resource]);
$totalAdjustment = 0;
$totalCommittedReduction = 0;
$totalFCMDelta = 0;
$totalFCMPCR = 0;
$programSummaryAveragesByResource[$resource]['numberOfAssets'] = $numberOfAssets;
$programSummaryAveragesByResource[$resource]['fcmDelta'] = 0;
$programSummaryAveragesByResource[$resource]['updatedDate'] = $epsReportProgram[$calledProgram]->updatedDate();
foreach ($lines as $resourceToSummarize => $assetInfo) {
if (!isset($programSummaryAveragesByResource[$resource]['resourceID'])) {
$programSummaryAveragesByResource[$resource]['resourceID'] = $assetInfo['resourceID'];
}
$totalCommittedReduction += $assetInfo['committedReduction'];
$totalFCMDelta += $assetInfo['fcmDelta'];
$totalFCMPCR += $assetInfo['fcmPCR'];
if ($assetInfo['status'] == 'out') {
$programSummaryAveragesByResource[$resource]['noDataCount']++;
}
}
$programSummaryAveragesByResource[$resource]['fcmDelta'] = $totalFCMDelta;
//$userObject->preDebugger($programSummaryAveragesByResource[$resource]['resourceID'].' : '.$programSummaryAveragesByResource[$resource]['fcmDelta']);
$programSummaryAveragesByResource[$resource]['updatedDate'] = $epsReportProgram[$calledProgram]->updatedDate();
}
// ======================= begin drawing the tables
// ======================= Give program summary...
//$performancePercent = '['.str_replace(',','',$epsReportProgram[$calledProgram]->fcmDelta()).'] ['.str_replace(',','',$CSOs[$calledProgram]['value']).'] '.((str_replace(',','',$epsReportProgram[$calledProgram]->fcmDelta())/str_replace(',','',$CSOs[$calledProgram]['value']))*100).': '.round(((str_replace(',','',$epsReportProgram[$calledProgram]->fcmDelta())/str_replace(',','',$CSOs[$calledProgram]['value']))*100),2);
$performancePercent = round(str_replace(',', '', $epsReportProgram[$calledProgram]->fcmDelta()) / str_replace(',', '', $CSOs[$calledProgram]['value']) * 100, 2);
$fcmColor = is_numeric($performancePercent) ? $performancePercent < 75 ? "red" : ($performancePercent < 100 ? "orange" : "green") : "transparent";
$cpDetailName = str_replace(" ", "_", str_replace("&", "and", $calledProgram)) . '_detail';
$viewProgramSummary .= '<tr>' . "\n" . '<td align="left" class="htmlspecial"><div style="cursor: pointer;" onClick="ToggleDivVisibility(\'' . $cpDetailName . '\')">' . htmlspecialchars($calledProgram) . '</div></td>' . "\n" . '<td align="center" class="htmlspecial"><div style="cursor: pointer;" onClick="ToggleDivVisibility(\'' . str_replace(" ", "_", str_replace("&", "and", $calledProgram)) . '_zone_summary\');">Summary</div></td>' . "\n" . '<td align="right">' . number_format($CSOs[$calledProgram]['value']) . '</td>' . "\n" . '<td align="right">' . $epsReportProgram[$calledProgram]->fcmDelta() . '</td>' . "\n" . '<td align="right" style="font-weight: bold; background-color: ' . $fcmColor . ';">' . $performancePercent . '</td>' . "\n" . '<td align="right">' . $epsReportProgram[$calledProgram]->updatedDate() . '</td>' . "\n" . '</tr>' . "\n";
// ======================= Give program details...
$viewProgramDetail .= '<div id="' . str_replace(" ", "_", str_replace("&", "and", $calledProgram)) . '_detail" style="display: none; text-align: left;" class="toggleable">' . "\n" . '<div style="font-weight: bold; color: #CD6701; margin-top: 10px; margin-bottom: 10px;" class="htmlspecial">' . htmlspecialchars($calledProgram) . '</div>' . "\n" . '<div style="font-size: 11px; text-align: center;">[Hint: Click on the resource name to toggle details.]</div>' . "\n";
$sortIndex = 0;
foreach ($viewProgramDetailLines as $resource => $lines) {
$sortIndex++;
$noDataString = $programSummaryAveragesByResource[$resource]['noDataCount'] > 0 ? '<div style="color: #CD6701;">(' . $programSummaryAveragesByResource[$resource]['noDataCount'] . ' no data)</div>' : '';
if ($CSOs[$calledProgram][$programSummaryAveragesByResource[$resource]['resourceID']] > 0) {
$performancePercent = round(str_replace(',', '', $programSummaryAveragesByResource[$resource]['fcmDelta']) / str_replace(',', '', $CSOs[$calledProgram][$programSummaryAveragesByResource[$resource]['resourceID']]) * 100, 2);
}
$avgFCMColor = is_numeric($performancePercent) ? $performancePercent < 75 ? "red" : ($performancePercent < 100 ? "orange" : "green") : "transparent";
$viewProgramDetail .= '<table width="850" border="1" cellspacing="0" cellpadding="3">' . "\n" . '<thead>' . "\n" . '<tr>' . "\n" . '<th style="border: none;"> </th>' . "\n" . '<th>Resource ID</th>' . "\n" . '<th>CSO KW</th>' . "\n" . '<th>Total Delta KW</th>' . "\n" . '<th>% Perf.</th>' . "\n" . '<th>Total # Assets</th>' . "\n" . '<th>Updated Date</th>' . "\n" . '</tr>' . "\n" . '</thead>' . "\n" . '<tbody>' . "\n" . '</tr>' . "\n" . '<td style="border: none; cursor: pointer;"><div onClick="ToggleDivVisibility(\'' . str_replace(" ", "_", str_replace("&", "and", $resource)) . '_program_resource_detail\');">' . htmlspecialchars($resource) . '</div></td>' . "\n" . '<td align="right" width="80">' . $programSummaryAveragesByResource[$resource]['resourceID'] . '</td>' . "\n" . '<td align="right" width="80">' . number_format(round($CSOs[$calledProgram][$programSummaryAveragesByResource[$resource]['resourceID']], 3)) . '</td>' . "\n" . '<td align="right" width="80">' . round($programSummaryAveragesByResource[$resource]['fcmDelta'], 3) . '</td>' . "\n" . '<td align="right" width="80"style="font-weight: bold; background-color: ' . $avgFCMColor . ';">' . $performancePercent . '</td>' . "\n" . '<td align="right" width="80">' . $programSummaryAveragesByResource[$resource]['numberOfAssets'] . $noDataString . '</td>' . '<td align="right" width="80">' . $programSummaryAveragesByResource[$resource]['updatedDate'] . '</td>' . "\n" . '</tr>' . "\n" . '</tbody>' . "\n" . '</table>' . "\n" . '<div id="' . str_replace(" ", "_", str_replace("&", "and", $resource)) . '_program_resource_detail" style="display: none;" class="toggleable">' . "\n" . '<table width="850" class="sortable" border="1" cellspacing="0" cellpadding="3">' . "\n" . '<thead>' . "\n" . '<tr>' . "\n" . '<th id="vpdAsset_' . $sortIndex . '">Asset</th>' . "\n" . '<th id="vpdAssetID_' . $sortIndex . '" width="80">Asset ID</th>' . "\n" . '<th id="vpdAdjKW_' . $sortIndex . '" width="80">Adj KW</th>' . "\n" . '<th id="vpdCRKW_' . $sortIndex . '" width="80">CR KW</th>' . "\n" . '<th id="vpdHrAvg_' . $sortIndex . '" width="80">Hr. Avg.</th>' . "\n" . '<th id="vpdPercentCR_' . $sortIndex . '" width="80">%CR</th>' . "\n" . '<th id="vpdUpdated_' . $sortIndex . '" width="80">Updated Date</th>' . "\n" . '</tr>' . "\n" . '</thead>' . "\n" . '<tbody>' . "\n";
if (isset($lines['out'])) {
foreach ($lines['out'] as $lineNumber => $value) {
$viewProgramDetail .= $value;
}
}
if (isset($lines['responding'])) {
foreach ($lines['responding'] as $lineNumber => $value) {
$viewProgramDetail .= $value;
}
}
$viewProgramDetail .= '</tbody></table></br></div>' . "\n";
}
$viewProgramDetail .= '</div>' . "\n";
$viewZoneSummary .= '<div id="' . str_replace(" ", "_", str_replace("&", "and", $calledProgram)) . '_zone_summary" style="display: none;">' . "\n" . '<table width="850" class="sortable" border="1" cellspacing="0" cellpadding="3">' . "\n" . '<thead>' . "\n" . '<tr>' . "\n" . '<th colspan="5">' . $calledProgram . ' Zone Summary</th>' . "\n" . '</tr>' . "\n" . '<tr>' . "\n" . '<th id="vzsCalledZone_' . $sortIndex . '">Called Zone</th>' . "\n" . '<th id="vzsTotalCRKW_' . $sortIndex . '">Total CSO KW</th>' . "\n" . '<th id="vzsHrAvg_' . $sortIndex . '">Hr. Avg.</th>' . "\n" . '<th id="vzsPCR_' . $sortIndex . '">%CSO</th>' . "\n" . '<th id="vzsUpdated_' . $sortIndex . '" width="80">Updated Date</th>' . "\n" . '</tr>' . "\n" . '</thead>' . "\n" . '<tbody>';
//$userObject->preDebugger($calledZones);
foreach ($calledZones[$calledProgram] as $inx => $calledZone) {
// ======================= Give zone details...
$viewZoneDetail .= '<div id="' . str_replace(" ", "_", str_replace("&", "and", $calledProgram) . "_" . str_replace("&", "and", $calledZone)) . '_detail" style="display: none; text-align: left;">' . "\n" . '<div style="font-weight: bold; color: #CD6701; margin-top: 10px; margin-bottom: 10px;" class="htmlspecial">' . htmlspecialchars($calledProgram) . '<br />' . htmlspecialchars($calledZone) . ' Detail</div>' . "\n" . '<div style="font-size: 11px; text-align: center;">[Hint: Click on the resource name to toggle details.]</div>' . "\n";
$viewZoneDetailLines = '';
// $userObject->preDebugger($epsReportZoneDetailsRestack);
foreach ($epsReportZoneDetailsRestack[$calledProgram][$calledZone] as $resourceIdentifier => $assetStack) {
foreach ($assetStack as $inx => $epsLineItem) {
if (is_object($epsLineItem)) {
$fcmColor = is_numeric($epsLineItem->fcmPCR()) ? $epsLineItem->fcmPCR() < 75 ? "red" : ($epsLineItem->fcmPCR() < 100 ? "orange" : "green") : "transparent";
$viewZoneDetailLines[$epsLineItem->resource()]['responding'][] = '<tr>' . "\n" . '<td align="left" class="htmlspecial">' . htmlspecialchars($epsLineItem->asset()) . '</td>' . "\n" . '<td align="left">' . $epsLineItem->assetID() . '</td>' . "\n" . '<td align="right">' . $epsLineItem->adjustment() . '</td>' . "\n" . '<td align="right">' . $epsLineItem->committedReduction() . '</td>' . "\n" . '<td align="right">' . $epsLineItem->fcmDelta() . '</td>' . "\n" . '<td align="right" style="font-weight: bold; background-color: ' . $fcmColor . ';">' . $epsLineItem->fcmPCR() . '</td>' . "\n" . '<td align="right">' . $epsLineItem->updatedDate() . '</td>' . "\n" . '</tr>' . "\n";
$viewZoneSummaryLines[$epsLineItem->resource()][] = array('status' => 'responding', 'resourceID' => $resourceIdentifier, 'resourceCR' => str_replace(',', '', $epsLineItem->resourceCR()), 'adjustment' => str_replace(',', '', $epsLineItem->adjustment()), 'committedReduction' => str_replace(',', '', $epsLineItem->committedReduction()), 'fcmDelta' => str_replace(',', '', $epsLineItem->fcmDelta()), 'fcmPCR' => str_replace(',', '', $epsLineItem->fcmPCR()));
} else {
$viewZoneDetailLines[$epsLineItem['resourceDescription']]['out'][] = '<tr>' . "\n" . '<td align="left" style="font-weight: bold; color: #FC6701;" class="htmlspecial">' . htmlspecialchars($epsLineItem['description']) . '</td>' . "\n" . '<td align="left" style="font-weight: bold; color: #FC6701;">' . $inx . '</td>' . "\n" . '<td align="center" style="font-weight: bold; color: #FC6701;">No Data</td>' . "\n" . '<td align="center" style="font-weight: bold; color: #FC6701;">No Data</td>' . "\n" . '<td align="center" style="font-weight: bold; color: #FC6701;">No Data</td>' . "\n" . '<td align="center" style="font-weight: bold; color: #FC6701;">No Data</td>' . "\n" . '<td align="center" style="font-weight: bold; color: #FC6701;">No Data</td>' . "\n" . '</tr>' . "\n";
$viewZoneSummaryLines[$epsLineItem['resourceDescription']][] = array('status' => 'out', 'resourceID' => $resourceIdentifier, 'resourceCR' => 0, 'adjustment' => 0, 'committedReduction' => 0, 'fcmDelta' => 0, 'fcmPCR' => 0);
}
}
}
//$epsReportZoneDetailsRestack[$calledProgram] as $resourceIdentifier=>$assetStack
//$userObject->preDebugger($resourceIdentifier);
//$userObject->preDebugger($viewZoneSummaryLines);
foreach ($viewZoneSummaryLines as $resource => $lines) {
//$userObject->preDebugger($epsReportZone[$calledProgram][$calledZone]);
$numberOfAssets = count($viewProgramSummaryLines[$resource]);
$totalAdjustment = 0;
$totalCommittedReduction = 0;
$totalFCMDelta = 0;
$totalFCMPCR = 0;
$zoneSummaryAveragesByResource[$resource]['numberOfAssets'] = $numberOfAssets;
$zoneSummaryAveragesByResource[$resource]['noDataCount'] = 0;
$zoneSummaryAveragesByResource[$resource]['resourceID'] = $resourceIdentifier;
$zoneSummaryAveragesByResource[$resource]['fcmDelta'] = 0;
$zoneSummaryAveragesByResource[$resource]['updatedDate'] = $epsReportProgram[$calledProgram]->updatedDate();
foreach ($lines as $resourceToSummarize => $assetInfo) {
if (!isset($zoneSummaryAveragesByResource[$resource]['resourceID'])) {
$zoneSummaryAveragesByResource[$resource]['resourceID'] = $assetInfo['resourceID'];
}
$totalCommittedReduction += $assetInfo['committedReduction'];
$totalFCMDelta += $assetInfo['fcmDelta'];
$totalFCMPCR += $assetInfo['fcmPCR'];
if ($assetInfo['status'] == 'out') {
$zoneSummaryAveragesByResource[$resource]['noDataCount']++;
}
}
$zoneSummaryAveragesByResource[$resource]['fcmDelta'] = $totalFCMDelta;
$zoneSummaryAveragesByResource[$resource]['updatedDate'] = $epsReportZone[$calledProgram][$calledZone]->updatedDate();
}
// Give zone summary...
if ($CSOs[$calledProgram][$calledZone]['value'] > 0) {
$performancePercent = round(str_replace(',', '', $epsReportZone[$calledProgram][$calledZone]->fcmDelta()) / str_replace(',', '', $CSOs[$calledProgram][$calledZone]['value']) * 100, 2);
}
$fcmColor = is_numeric($performancePercent) ? $performancePercent < 75 ? "red" : ($performancePercent < 100 ? "orange" : "green") : "transparent";
$viewZoneSummary .= '<tr>' . "\n" . '<td align="left" class="htmlspecial">
<div style="cursor: pointer;" onClick="ToggleDivVisibility(\'' . str_replace(" ", "_", str_replace("&", "and", $calledProgram) . "_" . str_replace("&", "and", $calledZone)) . '_detail\');">' . htmlspecialchars($calledZone) . '</div></td>' . "\n" . '<td align="right">' . number_format($CSOs[$calledProgram][$calledZone]['value']) . '</td>' . "\n" . '<td align="right">' . $epsReportZone[$calledProgram][$calledZone]->fcmDelta() . '</td>' . "\n" . '<td align="right" style="font-weight: bold; background-color: ' . $fcmColor . ';">' . $performancePercent . '</td>' . "\n" . '<td align="right">' . $epsReportZone[$calledProgram][$calledZone]->updatedDate() . '</td>' . "\n" . '</tr>' . "\n";
$zoneSortIndex = 0;
foreach ($viewZoneDetailLines as $resource => $lines) {
$zoneSortIndex++;
$noDataString = $zoneSummaryAveragesByResource[$resource]['noDataCount'] > 0 ? '<div style="color: #CD6701;">(' . $zoneSummaryAveragesByResource[$resource]['noDataCount'] . ' no data)</div>' : '';
if ($CSOs[$calledProgram][$calledZone][$zoneSummaryAveragesByResource[$resource]['resourceID']] > 0) {
$performancePercent = round(str_replace(',', '', $zoneSummaryAveragesByResource[$resource]['fcmDelta']) / str_replace(',', '', $CSOs[$calledProgram][$calledZone][$zoneSummaryAveragesByResource[$resource]['resourceID']]) * 100, 2);
}
$avgFCMColor = is_numeric($performancePercent) ? $performancePercent < 75 ? "red" : ($performancePercent < 100 ? "orange" : "green") : "transparent";
$viewZoneDetail .= '<table width="850" border="1" cellspacing="0" cellpadding="3">' . "\n" . '<thead>' . "\n" . '<tr>' . "\n" . '<th style="border: none;"> </th>' . "\n" . '<th>Resource ID</th>' . "\n" . '<th>CSO KW</th>' . "\n" . '<th>Total Delta KW</th>' . "\n" . '<th>% Perf.</th>' . "\n" . '<th>Total # Assets</th>' . "\n" . '<th>Updated Date</th>' . "\n" . '</tr>' . "\n" . '</thead>' . "\n" . '<tbody>' . "\n" . '</tr>' . "\n" . '<td style="border: none; cursor: pointer;"><div onClick="ToggleDivVisibility(\'' . str_replace(" ", "_", str_replace("&", "and", $resource)) . '_zone_resource_detail\');">' . htmlspecialchars($resource) . '</div></td>' . "\n" . '<td align="right" width="80">' . $zoneSummaryAveragesByResource[$resource]['resourceID'] . '</td>' . "\n" . '<td align="right" width="80">' . number_format(round($CSOs[$calledProgram][$calledZone][$zoneSummaryAveragesByResource[$resource]['resourceID']], 3)) . '</td>' . "\n" . '<td align="right" width="80">' . round($zoneSummaryAveragesByResource[$resource]['fcmDelta'], 3) . '</td>' . "\n" . '<td align="right" width="80"style="font-weight: bold; background-color: ' . $avgFCMColor . ';">' . $performancePercent . '</td>' . "\n" . '<td align="right" width="80">' . $zoneSummaryAveragesByResource[$resource]['numberOfAssets'] . $noDataString . '</td>' . '<td align="right" width="80">' . $zoneSummaryAveragesByResource[$resource]['updatedDate'] . '</td>' . "\n" . '</tr>' . "\n" . '</tbody>' . "\n" . '</table>' . "\n" . '<div id="' . str_replace(" ", "_", str_replace("&", "and", $resource)) . '_zone_resource_detail" style="display: none;">' . "\n" . '<table class="sortable" width="850" border="1" cellspacing="0" cellpadding="3">' . "\n" . '<thead>' . "\n" . '<tr>' . "\n" . '<th colspan="7" class="htmlspecial">' . htmlspecialchars($resource) . '</th>' . "\n" . '</tr>' . "\n" . '<tr>' . "\n" . '<th id="vzdAsset">Asset</th>' . "\n" . '<th id="vzdAssetID" width="80">Asset ID</th>' . "\n" . '<th id="vzdAdjKW" width="80">Adj KW</th>' . "\n" . '<th id="vzdCRKW" width="80">CR KW</th>' . "\n" . '<th id="vzdHrAvg" width="80">Hr. Avg.</th>' . "\n" . '<th id="vzdPCR" width="80">%CR</th>' . "\n" . '<th id="vzdUpdated" width="80">Updated Date</th>' . "\n" . '</tr>' . "\n" . '</thead>' . "\n" . '<tbody>';
if (isset($lines['out'])) {
foreach ($lines['out'] as $lineNumber => $value) {
$viewZoneDetail .= $value;
}
}
if (isset($lines['responding'])) {
foreach ($lines['responding'] as $lineNumber => $value) {
$viewZoneDetail .= $value;
}
}
$viewZoneDetail .= '</tbody></table><br /></div>' . "\n";
}
$viewZoneDetail .= '</div>' . "\n";
}
// $calledZones[$calledProgram] as $inx=>$calledZone
//}
$viewZoneSummary .= '</tbody></table></div><!-- closing summary div -->' . "\n";
}
$viewProgramSummary .= '</tbody></table><!-- END EVENT PERFORMANCE SUMMARY DRAW -->' . "\n";
//$userObject->preDebugger($modified);
//if($userObject->isLSEUser() && count($modified) > 0)
if (count($modified) > 0) {
$modifiedFinal = null;
foreach ($modified as $date => $program) {
$dateTally = 0;
$modifiedOutput = null;
foreach ($program as $programName => $resources) {
$modifiedOutput .= '<strong>' . $programName . '</strong><br />';
foreach ($resources as $inx => $resource) {
$modifiedOutput .= ' ' . $resource['name'] . '<br />';
foreach ($resource['assets'] as $id => $name) {
$modifiedOutput .= ' ' . $id . ': ' . $name . '<br />';
$dateTally++;
}
}
}
$plural = $dateTally == 1 ? 'asset' : 'assets';
$modifiedFinal .= '<div style="padding-bottom: 20px;"><strong>On ' . $date . ' the performance data for ' . $dateTally . ' ' . $plural . ' was updated.
<span onClick="ToggleDivVisibility(\'modifiedToggle' . $date . '\')" style="color: #CD6701; cursor: pointer;">Click here for full list.</span>
</strong>
<div id="modifiedToggle' . $date . '" style="display: none; margin-top: 10px; ">' . $modifiedOutput . '
<span onClick="ToggleDivVisibility(\'modifiedToggle' . $date . '\')" style="color: #CD6701; cursor: pointer;">[ Hide ]</span>
</div>
</div>';
}
}
}
if ($CSVFlag === true) {
return $viewEventSummary . $viewProgramSummary . "\n----------------------------------\n" . $viewProgramDetail . $viewZoneSummary . $viewZoneDetail;
} else {
//$viewProgramSummary = null;
//$viewProgramDetail = null;
//$viewZoneSummary = null;
//$viewZoneDetail = null;
return $viewEventSummary . '<div id="eventSummaryContainerDiv">' . $modifiedFinal . $viewProgramSummary . $viewProgramDetail . $viewZoneSummary . $viewZoneDetail . '</div><!-- eventSummaryContainerDiv -->';
}
}