<?php

include_once "inc_files/inc_checkcookie.php";

include_once "inc_files/inc_actions_functions.php";

include_once "inc_files/inc_action_functions_pdf.php";

// Functions

function Colors ($ratio,$factor) {

}

function DrawGrid() {

}

function Weeks($input) {

}

function Datum($start,$duration,$color_array) {

}

function StaffCost($time) {

}

function CheckHols($date, $user_id, $start) {

}

function CostBar($array_1,$array_2,$array_3,$name,$colwidth,$bold,$border,$print) {

}

if ($user_usertype_current <= 3) { header ("Location: index2.php"); } else {

//function PDFResourcing() {

//global $conn;

//global $pdf;

$colwidth = 10;

$rowheight = 4;

if ($_GET['timestart'] == NULL) { $timestart = time(); } else { $timestart = $_GET['timestart']; }

$current_time = BeginMonth($timestart,1,2);

$capture_start = $current_time;

$format_bg_r = "0";

$format_bg_g = "0";

$format_bg_b = "0";

// Use FDPI to get the template

define('FPDF_FONTPATH','fpdf/font/');

require('fpdf/fpdi.php');

$pdf= new fpdi();

$format_font = PDFFonts($settings_pdffont);

$pdf->addPage(L);

$array_total = array();

$array_total_fee_secured = array();

$array_total_profit_secured = array();

$revenue_total = array();

// Header

$project_counter = 1;

$page_count = 1;

$pdf->SetY(10);

$pdf->SetFont($format_font,'b',14);

if (date ("n",$timestart) < 4) { $quarter = "Q1"; }

elseif (date ("n",$timestart) < 7) { $quarter = "Q2"; }

elseif (date ("n",$timestart) < 10) { $quarter = "Q3"; }

else { $quarter = "Q4"; }

$quarter = $quarter . " " . date ("Y",$timestart);

$sheet_title = "Project Resourcing, " . $quarter;

$pdf->SetTextColor($format_bg_r, $format_bg_g, $format_bg_b);

$pdf->Cell(169.5,10,$sheet_title,0,0);

$pdf->SetFont($format_font,'',8);

$prev_month = $timestart - 7889184;

$next_month = $timestart + 7889184;

$prev_month = $_SERVER['HTTP_HOST'] . "/pdf_resourcing.php?timestart=" . $prev_month . "&secured=" . intval($_GET['secured']);

$this_month = $_SERVER['HTTP_HOST'] . "/pdf_resourcing.php?timestart=" . time() . "&secured=" . intval($_GET['secured']);

$next_month = $_SERVER['HTTP_HOST'] . "/pdf_resourcing.php?timestart=" . $next_month . "&secured=" . intval($_GET['secured']);

$print_date = "Date: " . date ("r",time());

$pdf->Cell(25,4,$print_date,0,0,R,0);

$pdf->SetTextColor(200, 200, 200);

$pdf->SetDrawColor(200, 200, 200);

$pdf->Cell(2.5,4,'',0,0,C,0);

$pdf->Cell(25,4,'Previous quarter',1,0,C,0,$prev_month);

$pdf->Cell(2.5,4,'',0,0,C,0);

$pdf->Cell(25,4,'This quarter',1,0,C,0,$this_month);

$pdf->Cell(2.5,4,'',0,0,C,0);

$pdf->Cell(25,4,'Next quarter',1,1,C,0,$next_month);

$pdf->SetTextColor(0, 0, 0);

$pdf->SetY(18);

if ($_GET['secured'] == 3) {

$sheet_filter = "Showing only secured fee income";

} elseif ( $_GET['secured'] == 1 )

{ $sheet_filter = "Showing only possible (>= 50%) fee income.";

} elseif ( $_GET['secured'] == 2 )

{ $sheet_filter = "Showing only probable (>= 75%) fee income.";

} else {

$sheet_filter = "Showing all potential fee income.";

}

$pdf->Cell(169.5,4,$sheet_filter,0,0);

$pdf->SetXY(204.5,16);

$filter_all = $_SERVER['HTTP_HOST'] . "/pdf_resourcing.php?timestart=" . $_GET['timestart'] . "&secured=" . 0;

$filter_possible = $_SERVER['HTTP_HOST'] . "/pdf_resourcing.php?timestart=" . $_GET['timestart'] . "&secured=" . 1;

$filter_probable = $_SERVER['HTTP_HOST'] . "/pdf_resourcing.php?timestart=" . $_GET['timestart'] . "&secured=" . 2;

$filter_secured = $_SERVER['HTTP_HOST'] . "/pdf_resourcing.php?timestart=" . $_GET['timestart'] . "&secured=" . 3;

$pdf->SetTextColor(200, 200, 200);

$pdf->SetDrawColor(200, 200, 200);

$pdf->Cell(2.5,4,'',0,0,C,0);

$pdf->Cell(25,4,'All',1,0,C,0,$filter_all);

$pdf->Cell(2.5,4,'',0,0,C,0);

$pdf->SetFont($format_font,'',6);

$pdf->Cell(11.25,4,'>= 50%',1,0,C,0,$filter_possible);

$pdf->Cell(2.5,4,'',0,0,C,0);

$pdf->Cell(11.25,4,'>= 75%',1,0,C,0,$filter_probable);

$pdf->SetFont($format_font,'',8);

$pdf->Cell(2.5,4,'',0,0,C,0);

$pdf->Cell(25,4,'Secured only',1,1,C,0,$filter_secured);

$pdf->SetY(50);

$pdf->SetFont($format_font,'b',18);

DrawGrid();

// Begin listing the projects

if (intval($_GET['secured']) == 3) { $secured = "= 100"; } elseif ( intval($_GET['secured']) == 1 ) { $secured = ">= 50"; } elseif ( intval($_GET['secured']) == 2 ) { $secured = ">= 75"; } else { $secured = "> 0"; }

$sql_proj = "SELECT * FROM intranet_projects, intranet_timesheet_fees WHERE ts_fee_project = proj_id AND proj_fee_track = 1 AND ts_fee_prospect " . $secured . " AND (((UNIX_TIMESTAMP(ts_fee_commence) + ts_fee_time_end) > " . $capture_start . ") OR ((UNIX_TIMESTAMP(ts_datum_commence) + ts_datum_length) > " . $capture_start . ")) AND proj_active = 1 ORDER BY proj_num, ts_fee_commence";

$result_proj = mysql_query($sql_proj, $conn) or die(mysql_error());

//$pdf->Multicell(0,5,$sql_proj);

$pdf->SetFont($format_font,'',7);

$current_proj = 0;

$count = 0;

$arrayname = 0;

while ($array_proj = mysql_fetch_array($result_proj)) {

unset($stage_start);

unset($stage_width);

unset($ts_fee_conclude);

$x = 0;

$proj_id = $array_proj['proj_id'];

$proj_num = $array_proj['proj_num'] . " " . $array_proj['proj_name'];

$proj_riba = $array_proj['proj_riba'];

$ts_fee_id = $array_proj['ts_fee_id'];

$ts_fee_commence = BeginWeek( AssessDays ( $array_proj['ts_fee_commence'] ) );

$ts_fee_time_end = $array_proj['ts_fee_time_end'];

$ts_fee_conclude = BeginWeek( $ts_fee_commence + $ts_fee_time_end );

$ts_fee_text = $array_proj['ts_fee_text'];

$ts_fee_pre = $array_proj['ts_fee_pre'];

$ts_fee_prospect = $array_proj['ts_fee_prospect'];

if ($ts_fee_prospect == 0) { $ts_fee_prospect = 1; $pdf->SetTextColor(255,255,255); } else { $ts_fee_prospect = $ts_fee_prospect / 100; $pdf->SetTextColor(0,0,0); }

$ts_fee_value = ( $array_proj['ts_fee_value'] / $array_proj['ts_fee_target'] ) * $ts_fee_prospect;

$ts_fee_profit = $array_proj['ts_fee_value'] * $ts_fee_prospect;

$ts_datum_commence = $array_proj['ts_datum_commence'];

$ts_datum_length = $array_proj['ts_datum_length'];

$fee_weekly = round ( $ts_fee_value /( round (($ts_fee_time_end / 604800),0)) ,2 );

$profit_weekly = round ( $ts_fee_profit /( round (($ts_fee_time_end / 604800),0)) ,2 );

$fee_weekly_print = "£" . number_format ($fee_weekly);

$fee_weekly_print_profit = "(£" . number_format ($profit_weekly) . ")";

// Need to make sure the array continues from the very beginning of the line to count the number of columns in the right place

if ($current_proj != $proj_id) { $pdf->SetFont($format_font,'B',7); $pdf->Cell(50,6,$proj_num,0,1,L); }

if ($ts_fee_conclude >= BeginWeek($current_time)) {

$pdf->SetFont($format_font,'',7);

$pdf->Cell(40,$rowheight,$ts_fee_text,0,0,L);

if ($proj_riba == $ts_fee_id) { $color = array(0.07,0.82,0.72); } else { $color = array(0.47,0.75,0.94); }

//$color = array(0.47,0.75,0.94);

$color1 = Colors($color[0],$ts_fee_prospect);

$color2 = Colors($color[1],$ts_fee_prospect);

$color3 = Colors($color[2],$ts_fee_prospect);

$pdf->SetFillColor($color1, $color2, $color3);

$stage_start = $ts_fee_commence - BeginWeek($current_time);

if ($stage_start < 0) { $stage_start = 0; $ts_fee_time_end = $ts_fee_time_end - ($current_time - $ts_fee_commence); $noborder = 1; } else { $noborder = 0; }

$stage_start = Weeks($stage_start);

if ($stage_start > 0 & $stage_start < 230) { $pdf->Cell($stage_start,$rowheight,'',0,0,L); }

$stage_width = Weeks ($ts_fee_time_end);

$pdf->SetFont($format_font,'',4);

$count = 0;

$arraycount = ($stage_start / $colwidth);

if ($ts_fee_prospect == 1) { $pdf->SetTextColor(0,0,0); } else { $pdf->SetTextColor(255,255,255); }

if ($pdf->GetX() < 280 & $stage_start < 230) {

while ($count < $stage_width && $x < 280) {

$x = $pdf->GetX();

$y = $pdf->GetY();

$pdf->Cell($colwidth,$rowheight*0.1,NULL,$border,2,R,true);

$pdf->Cell($colwidth,$rowheight*0.4,$fee_weekly_print,$border,2,R,true);

$pdf->Cell($colwidth,$rowheight*0.5,$fee_weekly_print_profit,$border,0,R,true);

$pdf->SetXY($x + $colwidth,$y);

$count = $count + $colwidth;

$x = $pdf->GetX();

$array_total[$arraycount] = $array_total[$arraycount] + $fee_weekly;

$array_profit[$arraycount] = $array_profit[$arraycount] + $profit_weekly;

$revenue_total[$arraycount] = $array_profit[$arraycount]; //$revenue_total[$arraycount];

if ($array_proj['ts_fee_prospect'] == 100) {

$array_total_fee_secured[$arraycount] = $array_total_fee_secured[$arraycount] + $fee_weekly;

$array_total_profit_secured[$arraycount] = $array_total_profit_secured[$arraycount] + $profit_weekly;

}

$arraycount++;

}

$pdf->Cell(0,0,'',0,1,L);

}

$pdf->SetTextColor(0,0,0);

$pdf->Cell(0,$rowheight,'',0,1,L);

//if ((BeginWeek(AssessDays($ts_datum_commence)) + $ts_datum_length) < $ts_fee_conclude) { $color_array = array(255,0,0); } else { unset($color_array); }

if (($array_proj['ts_fee_commence'] != $array_proj['ts_datum_commence']) OR ($array_proj['ts_fee_time_end'] > $array_proj['ts_datum_length'])) { $color_array = array(225,0,0); } else { unset($color_array); }

Datum($ts_datum_commence,$ts_datum_length,$color_array);

$pdf->Cell(0,1,'',0,1,L);

}

$current_proj = $proj_id;

if ($pdf->GetY() > 170) { $pdf->addPage(L); DrawGrid(); }

}

$pdf->addPage(L);

DrawGrid();

// Now add the totals at the end

$array_weeklyincome = CostBar($revenue_total,0,0,"Weekly Revenue [1]",$colwidth,0);

$x = 0;

$bg = 220;

$beginweek = BeginWeek($current_time);

$month = date ("n" , $beginweek);

$currentmonth = date ("n" , $beginweek);

$pdf->SetFont($format_font,'B',8);

$pdf->Cell(0,5,'',0,1,L);

$pdf->Cell(40,5,"Monthly Revenue [2]",0,0,L);

$pdf->SetFont($format_font,'',7);

$pdf->SetDrawColor(100,100,100);

$arrayname = 0;

$monthtotal = 0;

while ($x <= 230) {

$pdf->SetFillColor($bg);

$monthtotalprint = "£" . number_format ( $monthtotal , 0);

if ($month != $currentmonth ) {

$pdf->Cell($colwidth,5,$monthtotalprint,0,0,R,true);

$month = $currentmonth;

$monthtotal = 0;

if ($bg == 220) { $bg = 240; } else { $bg = 220; }

} else {

if ($x > 0) { $pdf->Cell($colwidth,5,'',0,0,R, true); } //else { $x = $x - 10; }

}

$monthtotal = $monthtotal + $revenue_total[$arrayname];

$arrayname++;

$beginweek = $beginweek + 604800;

$currentmonth = date ("n" , $beginweek);

$x = $x + $colwidth;

}

if ($pdf->GetY() > 170) { $pdf->addPage(L); DrawGrid(); }

// Add cost of staff

//$test = StaffCost($current_time,"");

$x = 0;

$y = $pdf->GetY() + 5;

$pdf->SetXY($x,$y);

if ($pdf->GetY() > 170) { $pdf->addPage(L); DrawGrid(); }

$x = 0;

$beginweek = BeginWeek($current_time);

$staffcost_1 = array();

while ($x <= 220) {

$x = $x + $colwidth;

$staffcost = StaffCost($beginweek);

$staffcost_1[] = $staffcost;

$beginweek = $beginweek + 604800;

}

// Fees minus costs

$counter = 0;

$weekdiff_array = array();

while ($x <= 220) {

$x = $x + $colwidth;

$weekdiff = $array_total[$counter] - $staffcost_1[$counter];

$weekdiff_array[] = $weekdiff;

$counter++;

}

$staffcost_1 = CostBar($staffcost_1,0,0,"Operating Cost [3]",$colwidth,0);

// Syntax for CostBar : CostBar($array_1,$array_2,$array_3,$name,$colwidth,$bold,$border,$print)

//CostBar($array_total_fee_secured,0,0,"Secured Fee Income [4]",$colwidth,0,'T');

CostBar($array_total_profit_secured,0,$staffcost_1,"Total Profit [5]",$colwidth,'B',0,'noprint');

CostBar($array_total_profit_secured,$array_total_fee_secured,$staffcost_1,"Secured Revenue [6]",$colwidth,1,'B','noprint');

$weekdiff_array = CostBar($array_total,0,$staffcost_1,"Surplus Profit [7]",$colwidth,0,0,'noprint');

$array_grossprofit = CostBar($array_profit,0,$array_total,"Target Profit [4]",$colwidth,0);

$array_netprofit = CostBar($weekdiff_array,$array_profit,$array_total,"Actual Profit [5]",$colwidth,1,'T');

//CostBar($array_weeklyincome,$array_netprofit,0,"Weekly Revenue [10]",$colwidth,1,'T');

$pdf->SetFont($format_font,'',7);

$pdf->SetTextColor(0, 0, 0);

if (intval($_GET['secured']) < 2) { $included = "factored"; } else { $included = "secured"; }

$explainer = "

Notes:\n

[1] Total weekly " . $included . " revenue (fee income) including profit

[2] Total monthly " . $included . " revenue (fee income) including profit

[3] Total weekly operating cost, based on hourly rates

[4] Target weekly profit, based on individual fee stages

[5] Actual weekly profit, based on total revenue [1], less operating cost [3]

";

$pdf->SetFillColor(255,255,255);

$pdf->Cell(0,10,NULL,0,1);

$pdf->MultiCell(200,3,$explainer,0,'L',TRUE);

// List all of the upcoming holidays for each person

$pdf->addPage(L); DrawGrid();

$start = $time;

$x = 10;

$y = $pdf->GetY() + 15;

$pdf->SetXY($x,$y);

DrawGrid();

$pdf->SetDrawColor(100,100,100);

// First create an array which extracts all bank holidays from the database

$sql_bankholidays = "SELECT bankholidays_datestamp FROM intranet_user_holidays_bank WHERE bankholiday_timestamp > $current_time";

$result_bankholidays = mysql_query($sql_bankholidays, $conn) or die(mysql_error());

$array_bankholidays = mysql_fetch_array($result_bankholidays);

$sql_holidays = "SELECT user_name_first, user_name_second, user_id, user_user_added, user_user_ended FROM intranet_user_details WHERE ( user_user_ended > " . $current_time . " OR user_user_ended IS NULL OR user_user_ended = 0 ) OR (user_user_added < " . $current_time . " AND user_user_ended > $start) ORDER BY user_name_second, user_name_first";

$result_holidays = mysql_query($sql_holidays, $conn) or die(mysql_error());

$day_width = $colwidth / 5;

$pdf->SetFont($format_font,'B',8);

$pdf->SetTextColor(0);

$pdf->Cell(0,5,"Holidays",0,1,L);

while ($array_holidays = mysql_fetch_array($result_holidays)) {

$user_name_first = $array_holidays['user_name_first'];

$user_name_second = $array_holidays['user_name_second'];

$user_id = $array_holidays['user_id'];

$user_user_added = $array_holidays['user_user_added'];

$user_user_ended = $array_holidays['user_user_ended'];

$user_name = $user_name_first . " " . $user_name_second;

$user_start = $current_time + 43200;

$pdf->SetFont($format_font,'',3);

$pdf->SetTextColor(0);

$pdf->SetFont($format_font,'B',6);

$pdf->Cell(40,5,$user_name,0,0,L);

$sql_bankholidays = "SELECT bankholidays_datestamp FROM intranet_user_holidays_bank";

$result_bankholidays = mysql_query($sql_bankholidays, $conn) or die(mysql_error());

$array_bankholidays_find = array();

while ($array_bankholidays = mysql_fetch_array($result_bankholidays)) {

$array_bankholidays_find[] = $array_bankholidays['bankholidays_datestamp'];

}

$sql_days = "SELECT holiday_datestamp FROM intranet_user_holidays WHERE holiday_user = " . $user_id . " ORDER BY holiday_timestamp";

$result_days = mysql_query($sql_days, $conn) or die(mysql_error());

$array_days = mysql_fetch_array($result_days);

$print_array = print_r($array_days, true);

while ($pdf->GetX() < 280) {

$date = date ("Y-m-d",$user_start);

if (CheckHols($date,$user_id,$current_time) == "yes" && date("z",$time) == date("z",$user_start) ) { $pdf->SetFillColor(255,150,150);

} elseif (CheckHols($date,$user_id,$current_time) == "yes" && date("z",$time) != date("z",$user_start) ) { $pdf->SetFillColor(220);

} elseif (CheckHols($date,$user_id,$current_time) != "yes" && date("z",$time) == date("z",$user_start) ) { $pdf->SetFillColor(255,0,0);

} elseif (in_array($date,$array_bankholidays_find)) { $pdf->SetFillColor(240);

} else { $pdf->SetFillColor(175);

}

if ($user_user_added >= $user_start) { $pdf->SetFillColor(255); } elseif ($user_user_ended <= $user_start && $user_user_ended > 0) { $pdf->SetFillColor(255); }

if ( array_search ( $date , $array_bankholidays ) > 0 ) { $pdf->SetFillColor(150); } // don't understand why this search does not find the bank holidays?

if (date("N",$user_start) < 6) {

$print_cell = date("j",$user_start);

$pdf->Cell($day_width,5,'',L,0,L,1);

}

$user_start = $user_start + 86400;

}

$pdf->Cell(0,5,'',0,1);

$pdf->SetX(10);

}

// Now let's attempt a graph

$pdf->addPage(L); DrawGrid();

$axis_y_max_1 = max ($weekdiff_array);

$axis_y_min_1 = min ($weekdiff_array);

$axis_y_max_2 = max ($array_netprofit);

$axis_y_min_2 = min ($array_netprofit);

if ($axis_y_max_1 > $axis_y_max_2) { $axis_y_max = $axis_y_max_1; } else { $axis_y_max = $axis_y_max_2; }

if ($axis_y_min_1 < $axis_y_min_2) { $axis_y_min = $axis_y_min_1; } else { $axis_y_min = $axis_y_min_2; }

$max_value = "£" . number_format ($axis_y_max);

$min_value = "£" . number_format ($axis_y_min);

$pdf->SetDrawColor(0);

$x = 50;

$y = $pdf->GetY() + 50;

$zero = $y;

$pdf->SetXY($x,$y);

$height = 40;

$range = $axis_y_max - $axis_y_min;

$ratio = $height / $range;

// Datum line

$pdf->SetXY(($x - 20),($y - 2.5));

$pdf->Cell(20,5,"£0",0,0,R);

$pdf->SetXY($x,$y);

$pdf->Line($x,$y,280,$y);

// Maximum line

$pdf->SetDrawColor(200);

$pdf->SetXY($x,$y);

$start_y = $y - ($ratio * $axis_y_max);

$pdf->SetXY(30,($start_y - 2.5));

$pdf->Cell(20,5,$max_value,0,0,R);

$start_y = $y - ($ratio * $axis_y_max);

$pdf->Line($x,$start_y,280,$start_y);

// Minimum line

$pdf->SetXY($x,$y);

$start_y = $y - ($ratio * $axis_y_min);

$pdf->SetXY(30,($start_y - 2.5));

$pdf->Cell(20,5,$min_value,0,0,R);

$start_y = $y - ($ratio * $axis_y_min);

$pdf->Line($x,$start_y,280,$start_y);

$color = array(0.07,0.82,0.72);

$pdf->SetDrawColor($color[0] * 255, $color[1] * 255, $color[2] * 255);

$pdf->SetLineWidth(0.5);

$x = $x + 5;

$counter = 0;

while ($x <= 270) {

$y_fee_start = $y - ($ratio * $weekdiff_array[$counter]);

$y_fee_end = $y - ($ratio * $weekdiff_array[$counter + 1]);

$pdf->Line($x,$y_fee_start,$x + $colwidth,$y_fee_end);

$x = $x + $colwidth;

$counter++;

}

$x = 55;

$color = array(0.47,0.75,0.94);

$pdf->SetDrawColor($color[0] * 255, $color[1] * 255, $color[2] * 255);

$pdf->SetLineWidth(0.3);

$y = $zero;

$pdf->SetY($zero);

$counter = 0;

while ($x <= 270) {

$y_fee_start = $y - ($ratio * $array_netprofit[$counter]);

$y_fee_end = $y - ($ratio * $array_netprofit[$counter + 1]);

$pdf->Line($x,$y_fee_start,$x + $colwidth,$y_fee_end);

$x = $x + $colwidth;

$counter++;

}

$x = 55;

$color = array(0.80,0.80,0.80);

$pdf->SetDrawColor($color[0] * 255, $color[1] * 255, $color[2] * 255);

$pdf->SetLineWidth(0.3);

$y = $zero;

$pdf->SetY($zero);

$counter = 0;

while ($x <= 270) {

$y_fee_start = $y - ($ratio * $array_grossprofit[$counter]);

$y_fee_end = $y - ($ratio * $array_grossprofit[$counter + 1]);

$pdf->Line($x,$y_fee_start,$x + $colwidth,$y_fee_end);

$x = $x + $colwidth;

$counter++;

}

// and send to output

$file_name = date ("Y-m-d",$current_time) . "_resourcing_analysis.pdf";

$pdf->Output($file_name,I);

//}

//PDFResourcing();

}