\n\n";


if (!$group)
{
$HTML_text.="\n\n";
$HTML_text.="PLEASE SELECT AN IN-GROUP AND DATE ABOVE THEN CLICK SUBMIT\n";
}

else
{
#	$time_BEGIN=$AM_shift_BEGIN;
#	$time_END=$AM_shift_END;
#$query_date_BEGIN = "$query_date $time_BEGIN";   
#$query_date_END = "$query_date $time_END";

$Cqdate = explode('-',$query_date);
$Eqdate = explode('-',$end_date);

if ($shift == 'AM') 
	{
	$query_date_BEGIN = date("Y-m-d H:i:s", mktime(1, 0, 0, $Cqdate[1], $Cqdate[2], $Cqdate[0]));
	$query_date_END = date("Y-m-d H:i:s", mktime(17, 45, 0, $Eqdate[1], $Eqdate[2], $Eqdate[0]));
	}
if ($shift == 'PM') 
	{
	$query_date_BEGIN = date("Y-m-d H:i:s", mktime(17, 45, 1, $Cqdate[1], $Cqdate[2], $Cqdate[0]));
	$query_date_END = date("Y-m-d H:i:s", mktime(24, 59, 59, $Eqdate[1], $Eqdate[2], $Eqdate[0]));
	}
if ($shift == 'ALL') 
	{
	$query_date_BEGIN = date("Y-m-d H:i:s", mktime(1, 0, 0, $Cqdate[1], $Cqdate[2], $Cqdate[0]));
	$query_date_END = date("Y-m-d H:i:s", mktime(24, 59, 59, $Eqdate[1], $Eqdate[2], $Eqdate[0]));
	}
if ($query_hour) 
	{
	$query_date_BEGIN = date("Y-m-d H:i:s", mktime($query_hour, 0, 0, $Cqdate[1], $Cqdate[2], $Cqdate[0]));
	}
if ($end_hour) 
	{
	$query_date_END = date("Y-m-d H:i:s", mktime($end_hour, 59, 59, $Eqdate[1], $Eqdate[2], $Eqdate[0]));
	}

$HTML_text.="In-Group Fronter-Closer Stats Report                      $NOW_TIME\n";

$HTML_text.="\n";
$HTML_text.="---------- TOTALS FOR $query_date_BEGIN to $query_date_END\n";

$fronter_campaign_stmt="select campaign_id from vicidial_campaigns where closer_campaigns like '%".mysqli_real_escape_string($link, $group)."%' $LOGallowed_campaignsSQL";
$fronter_campaign_rslt=mysql_to_mysqli($fronter_campaign_stmt, $link);
$fronter_campaigns_ct=mysqli_num_rows($fronter_campaign_rslt);
for ($q=0; $q<$fronter_campaigns_ct; $q++) {
	$campaign_row=mysqli_fetch_row($fronter_campaign_rslt);
	$fronter_campaigns.="'$campaign_row[0]',";
}
$fronter_campaigns=preg_replace('/,$/', '', $fronter_campaigns);

$sale_dispo_stmt="select distinct status from vicidial_campaign_statuses where sale='Y' and campaign_id in (SELECT campaign_id from vicidial_campaigns where closer_campaigns LIKE \"% " . mysqli_real_escape_string($link, $group) . " %\" $LOGallowed_campaignsSQL) UNION select distinct status from vicidial_statuses where sale='Y'";
if ($DB) {$HTML_text.="$sale_dispo_stmt\n";}
$sale_dispo_rslt=mysql_to_mysqli($sale_dispo_stmt, $link);
$sale_dispos="'SALE'"; $sale_dispo_str="|SALE";
while ($ssrow=mysqli_fetch_row($sale_dispo_rslt)) {
	$sale_dispos.=",'$ssrow[0]'";
	$sale_dispo_str.="|$ssrow[0]";
}
$sale_dispo_str.="|";
if ($DB) {$HTML_text.="Sale dispo string: $sale_dispo_str\n";}

$stmt="select count(*) from vicidial_closer_log where call_date >= '$query_date_BEGIN' and call_date <= '$query_date_END' and campaign_id='" . mysqli_real_escape_string($link, $group) . "' and status in ($sale_dispos) $VCLuser_group_SQL;";
$rslt=mysql_to_mysqli($stmt, $link);
if ($DB) {$HTML_text.="$stmt\n";}
$row=mysqli_fetch_row($rslt);
$A1_points = ($row[0] * 1);
$A1_points =	sprintf("%10s", $A1_points);
$A1_tally =	sprintf("%10s", $row[0]);

$TOT_tally = ($A1_tally + $A2_tally + $A3_tally + $A4_tally);
$TOT_points = ($A1_points + $A2_points + $A3_points + $A4_points);
$TOT_tally =	sprintf("%10s", $TOT_tally);
$TOT_points =	sprintf("%10s", $TOT_points);

$HTML_text.="IN-GROUP:        $group\n";
$HTML_text.="USER GROUPS:     $user_group_string\n";
$HTML_text.="STATUS           CUSTOMERS\n";
$HTML_text.="SALES:          $A1_tally\n";

$HTML_text.="\n";









##############################
#########  FRONTER STATS

$TOTagents=0;
$TOTcalls=0;
$TOTsales=0;
$totA1=0;
$totDROP=0;
$totOTHER=0;
$TOTunder540=0;
$TOTover540=0;
$TOTagent_xfers=0;
$TOTagent_calls=0;

$CSV_fronter_header="\"TOTALS FOR $query_date_BEGIN to $query_date_END\"\n";
$CSV_fronter_header.="\"IN-GROUP:\",\"$group\"\n";
$CSV_fronter_header.="\"USER GROUPS:\",\"$user_group_string\"\n";
$CSV_fronter_header.="\"STATUS   CUSTOMERS\"\n";
$CSV_fronter_header.="\"SALES:   $A1_tally\"\n\n";
$CSV_fronter_header.="\"FRONTER STATS\"\n";
$CSV_fronter_header.="\"AGENT\",\"XFERS\",\"CALLS\",\"XFER %\",\"DROP\",\"OVER 540\",\"UNDER 539\",\"SALE\"\n";
$CSV_fronter_lines="";
$CSV_fronter_footer="";

$CSV_fronter_header2="\"TOTALS FOR $query_date_BEGIN to $query_date_END\"\n";
$CSV_fronter_header.="\"IN-GROUP:\",\"$group\"\n";
$CSV_fronter_header.="\"USER GROUPS:\",\"$user_group_string\"\n";
$CSV_fronter_header2.="\"SALES:   $A1_tally\"\n\n";
$CSV_fronter_header2.="\"FRONTER XFER DETAILS\"\n";

$CSV_fronter_header3="\"TOTALS FOR $query_date_BEGIN to $query_date_END\"\n";
$CSV_fronter_header.="\"IN-GROUP:\",\"$group\"\n";
$CSV_fronter_header.="\"USER GROUPS:\",\"$user_group_string\"\n";
$CSV_fronter_header3.="\"SALES:   $A1_tally\"\n\n";
$CSV_fronter_header3.="\"CLOSER XFER DETAILS\"\n";


$ASCII_text="\n";
$ASCII_text.="---------- FRONTER STATS      [download details]\n";
$ASCII_text.="+--------------------------+--------+--------+--------+------+------+------+------+\n";
$ASCII_text.="|                          |        |        |        |      | OVER |UNDER |      |\n";
$ASCII_text.="| AGENT (click for details)| XFERS  | CALLS  | XFER % | DROP |  540 | 540  | SALE |\n";
$ASCII_text.="+--------------------------+--------+--------+--------+------+------+------+------+\n";

######## GRAPHING #########
$graph_stats=array();
$max_success=1;
$max_xfers=1;
$max_success_pct=1;
$max_sales=1;
$max_drops=1;
$max_other=1;
$GRAPH="";
$GRAPH.="";
$GRAPH.="
SUCCESS
XFERS
SUCCESS %
SALE
DROP
OTHER

 


";
$graph_header="";
$SUCCESS_graph=$graph_header."";
$XFERS_graph=$graph_header."";
$SUCCESSPCT_graph=$graph_header."";
$SALE_graph=$graph_header."";
$DROP_graph=$graph_header."";
$OTHER_graph=$graph_header."";
###########################

# GET ARRAY OF VICIDIAL USERS FOR LATER USE
$user_stmt="select user, full_name, user_group from vicidial_users where user_group is not null $TCuser_group_SQL";
if ($DB) {$ASCII_text.="$user_stmt\n";}
$user_rslt=mysql_to_mysqli($user_stmt, $link);
$user_array=array();
$user_id_array=array();
while ($user_row=mysqli_fetch_row($user_rslt)) {
	$user_array["$user_row[0]"]=$user_row[1];
	$user_id_array[]=$user_row[0];
}
$user_full_str="'".implode("','", $user_id_array)."'";

# $stmt="select vicidial_xfer_log.user,count(distinct vicidial_xfer_log.lead_id) from vicidial_xfer_log where call_date >= '$query_date_BEGIN' and call_date <= '$query_date_END' and  campaign_id='" . mysqli_real_escape_string($link, $group) . "' and user in ($user_full_str) group by user;";
$stmt="select vicidial_xfer_log.user,count(*) from vicidial_xfer_log where call_date >= '$query_date_BEGIN' and call_date <= '$query_date_END' and  campaign_id='" . mysqli_real_escape_string($link, $group) . "' and user in ($user_full_str) group by user;";
if ($non_latin > 0) {$rslt=mysql_to_mysqli("SET NAMES 'UTF8'", $link);}
$rslt=mysql_to_mysqli($stmt, $link);
if ($DB) {$ASCII_text.="$stmt\n";}
$users_to_print = mysqli_num_rows($rslt);
$i=0;
while ($i < $users_to_print)
	{
	$row=mysqli_fetch_row($rslt);

	$TOTcalls = ($TOTcalls + $row[1]);

	$userRAW[$i]=$row[0];
	$user[$i] =	sprintf("%-6s", $row[0]);while(strlen($user[$i])>6) {$user[$i] = substr("$user[$i]", 0, -1);}
	$USERcallsRAW[$i] =	$row[1];
	$USERcalls[$i] =	sprintf("%6s", $row[1]);

	$i++;
	}

$i=0;
while ($i < $users_to_print)
	{
	$stmt="select full_name from vicidial_users where user='$userRAW[$i]' $LOGadmin_viewable_groupsSQL;";
	if ($non_latin > 0) {$rslt=mysql_to_mysqli("SET NAMES 'UTF8'", $link);}
	$rslt=mysql_to_mysqli($stmt, $link);
	if ($DB) {$ASCII_text.="$stmt\n";}
	$names_to_print = mysqli_num_rows($rslt);
	if ($names_to_print > 0)
		{
		$row=mysqli_fetch_row($rslt);
		if ($non_latin < 1)
			{
			 $full_name[$i] =	sprintf("%-15s", $row[0]); while(strlen($full_name[$i])>15) {$full_name[$i] = substr("$full_name[$i]", 0, -1);}	
			}
		else
			{
			 $full_name[$i] =	sprintf("%-45s", $row[0]); while(mb_strlen($full_name[$i],'utf-8')>15) {$full_name[$i] = mb_substr("$full_name[$i]", 0, -1,'utf-8');}	
			}
		}
	else
		{$full_name[$i] = '               ';}

	$A1=0; $DROP=0; $OTHER=0; $sales=0; $under540=0; $over540=0; $agent_xfers=0; $agent_calls=0;

	# GET TOTAL CALLS
	$call_stmt="select count(*) from vicidial_agent_log where user='$userRAW[$i]' and campaign_id in ($fronter_campaigns) $user_group_SQL and event_time >= '$query_date_BEGIN' and event_time <= '$query_date_END' and lead_id is not null";
	if ($DB) {$ASCII_text.="$call_stmt\n";}
	$call_rslt=mysql_to_mysqli($call_stmt, $link);
	$crow=mysqli_fetch_row($call_rslt);
	$agent_calls+=$crow[0];

	# GET TOTAL TRANSFERS ON OUTBOUND CALLS
	# $stmt="select vicidial_list.phone_number, trim(concat(vicidial_list.first_name, ' ', vicidial_list.last_name)) as full_name, vicidial_list.lead_id, vicidial_log.length_in_sec, vicidial_xfer_log.user, vicidial_xfer_log.closer, (vicidial_closer_log.length_in_sec-vicidial_closer_log.queue_seconds) as talk_time, vicidial_xfer_log.call_date, vicidial_xfer_log.xfercallid from vicidial_list, vicidial_log, vicidial_xfer_log, vicidial_closer_log where vicidial_xfer_log.call_date >= '$query_date_BEGIN' and vicidial_xfer_log.call_date <= '$query_date_END' and vicidial_log.call_date >= '$query_date_BEGIN' and vicidial_log.call_date <= '$query_date_END' and vicidial_log.campaign_id in ($fronter_campaigns) $VLuser_group_SQL and vicidial_xfer_log.campaign_id='" . mysqli_real_escape_string($link, $group) . "' and vicidial_xfer_log.user='$userRAW[$i]' and vicidial_xfer_log.lead_id=vicidial_log.lead_id and vicidial_xfer_log.user=vicidial_log.user and vicidial_xfer_log.lead_id=vicidial_list.lead_id and vicidial_xfer_log.xfercallid=vicidial_closer_log.xfercallid $VCLuser_group_SQL order by vicidial_xfer_log.call_date asc";

	$stmt="select vicidial_list.phone_number, trim(concat(vicidial_list.first_name, ' ', vicidial_list.last_name)) as full_name, vicidial_list.lead_id, 0 as length_in_sec, vicidial_xfer_log.user, vicidial_xfer_log.closer, (vicidial_closer_log.length_in_sec-vicidial_closer_log.queue_seconds) as talk_time, vicidial_xfer_log.call_date, vicidial_xfer_log.xfercallid from vicidial_list, vicidial_xfer_log, vicidial_closer_log where vicidial_xfer_log.call_date >= '$query_date_BEGIN' and vicidial_xfer_log.call_date <= '$query_date_END' and vicidial_xfer_log.campaign_id='" . mysqli_real_escape_string($link, $group) . "' and vicidial_xfer_log.user='$userRAW[$i]' and vicidial_xfer_log.lead_id=vicidial_list.lead_id and vicidial_xfer_log.xfercallid=vicidial_closer_log.xfercallid $VCLuser_group_SQL order by vicidial_xfer_log.call_date asc";
	$rslt=mysql_to_mysqli($stmt, $link);
	if ($DB) {$ASCII_text.="$stmt\n";}
	$calls_to_print = mysqli_num_rows($rslt);

	$xfer_info_array=array();
	$xfercallid_str="";
	$xfercallid_SQL="";
	$agent_xfers=0;
	for($q=0; $q<$calls_to_print; $q++) {
		$frow=mysqli_fetch_row($rslt);
		$lead_id=$frow[2];
		$call_date=$frow[7];

		# Check if there was a call by this agent from the fronter logs with 30 minutes of the transfer.  If so, this was a transfer from an outbound call and should not be included in the later inbound call
		$sec_stmt="select length_in_sec from vicidial_log where user='$userRAW[$i]' and lead_id='$lead_id' and call_date<'$call_date' and call_date>='$call_date'-INTERVAL 30 MINUTE order by call_date desc limit 1";
		$sec_rslt=mysql_to_mysqli($sec_stmt, $link);
		if ($DB) {$ASCII_text.="$sec_stmt\n";}
		if (mysqli_num_rows($sec_rslt)>0) {
			$xfercallid=$frow[8];
			$array_key="$userRAW[$i]-$xfercallid";

			$sec_row=mysqli_fetch_row($sec_rslt);
			$agent_xfers++;
			if ($sec_row[0]>=540) {$over540++;} else {$under540++;}
			$xfercallid_str.="$xfercallid,";

			$xfer_info_array[$array_key][0]=$frow[0];
			$xfer_info_array[$array_key][1]=$frow[1];
			$xfer_info_array[$array_key][2]=$frow[2];
			$xfer_info_array[$array_key][3]=$sec_row[0];
			$xfer_info_array[$array_key][4]=$frow[4];
			$xfer_info_array[$array_key][5]=$frow[5];
			$xfer_info_array[$array_key][6]=$frow[6];
			$xfer_info_array[$array_key][7]=$frow[7]; # SORT BY THIS
			$xfer_info_array[$array_key][8]=$frow[8];

			#$hphone=sprintf("%-12s", $frow[0]);
			#if (strlen($frow[1]==0)) {$frow[1]=" ** No name on lead ** ";}
			#$hname=sprintf("%-30s", substr($frow[1],0,30));
			#$hlead_id=sprintf("%-10s", $frow[2]);
			#$closer=sprintf("%-6s", $frow[5]);
			#$closer_full_name=sprintf("%-15s", substr($user_array["$frow[5]"],0, 15));
			#$closer_talk_time=$frow[6];
			#$closer_talk_time = sec_convert($closer_talk_time,'H'); 
			#$closer_talk_time =	sprintf("%5s", $closer_talk_time);
		}
		
	}
	if (strlen($xfercallid_str)>0) {
		$xfercallid_str=substr($xfercallid_str,0,-1);
		$xfercallid_SQL=" and vicidial_xfer_log.xfercallid not in ($xfercallid_str) ";
	}

	# GET TOTAL TRANSFERS ON INBOUND CALLS
	$stmt="select vicidial_closer_log.phone_number, trim(concat(vicidial_list.first_name, ' ', vicidial_list.last_name)) as full_name, vicidial_closer_log.lead_id, vicidial_closer_log.length_in_sec, vicidial_xfer_log.user, vicidial_xfer_log.closer, (vicidial_closer_log.length_in_sec-vicidial_closer_log.queue_seconds) as talk_time, vicidial_closer_log.call_date, vicidial_xfer_log.xfercallid from vicidial_list, vicidial_xfer_log, vicidial_closer_log where vicidial_xfer_log.call_date >= '$query_date_BEGIN' and vicidial_xfer_log.call_date <= '$query_date_END' and vicidial_closer_log.call_date >= '$query_date_BEGIN' and vicidial_closer_log.call_date <= '$query_date_END' and  vicidial_closer_log.campaign_id='" . mysqli_real_escape_string($link, $group) . "' and vicidial_xfer_log.campaign_id='" . mysqli_real_escape_string($link, $group) . "' and vicidial_xfer_log.user='$userRAW[$i]' and vicidial_closer_log.lead_id=vicidial_xfer_log.lead_id and vicidial_closer_log.xfercallid=vicidial_xfer_log.xfercallid $xfercallid_SQL and vicidial_closer_log.lead_id=vicidial_list.lead_id order by vicidial_closer_log.call_date;";
	$rslt=mysql_to_mysqli($stmt, $link);
	if ($DB) {$ASCII_text.="$stmt\n";}
	$calls_to_print = mysqli_num_rows($rslt);

	$CSV_fronter_header2.="\n\"$user[$i] - $full_name[$i] XFER STATS\"\n";
	$CSV_fronter_header2.="\"PHONE\",\"LEAD NAME\",\"LEAD ID\",\"CLOSER\",\"CLOSER CALL DATE\"\n";

	$hidden_span_txt="";
	if ($calls_to_print==0) {$hidden_span_txt.=": ".sprintf("%-59s", "*** NO TRANSFER INFORMATION TO REPORT ***")." :\n";}
	$agent_xfers+=$calls_to_print;
	for($q=0; $q<$calls_to_print; $q++) {
		$frow=mysqli_fetch_row($rslt);
		$array_key="$userRAW[$i]-$frow[8]";
		#$hphone=sprintf("%-12s", $frow[0]);
		#if (strlen($frow[1]==0)) {$frow[1]=" ** No name on lead ** ";}
		#$hname=sprintf("%-30s", substr($frow[1],0,30));
		#$hlead_id=sprintf("%-10s", $frow[2]);
		#$closer=sprintf("%-6s", $frow[5]);
		#$closer_full_name=sprintf("%-15s", substr($user_array["$frow[5]"],0, 15));
		#$closer_talk_time=$frow[6];
		#$closer_talk_time = sec_convert($closer_talk_time,'H'); 
		#$closer_talk_time =	sprintf("%5s", $closer_talk_time);

		if ($frow[3]>=540) {$over540++;} else {$under540++;}
		$xfer_info_array[$array_key][0]=$frow[0];
		$xfer_info_array[$array_key][1]=$frow[1];
		$xfer_info_array[$array_key][2]=$frow[2];
		$xfer_info_array[$array_key][3]=$frow[3];
		$xfer_info_array[$array_key][4]=$frow[4];
		$xfer_info_array[$array_key][5]=$frow[5];
		$xfer_info_array[$array_key][6]=$frow[6];
		$xfer_info_array[$array_key][7]=$frow[7]; # SORT BY THIS
		$xfer_info_array[$array_key][8]=$frow[8];
	

		/*
		$hidden_span_txt.=": $hphone : $hname : $hlead_id : $closer - $closer_full_name :\n";
		$closer_spans["$frow[5]"].=": $user[$i] - $full_name[$i] : $hphone :  $closer_talk_time  :\n";
		$closer_CSV_span["$frow[5]"].="\"$userRAW[$i] - $full_name[$i]\",\"$hphone\",\"$closer_talk_time\"\n";
		$CSV_fronter_header2.="\"$hphone\",\"$hname\",\"$hlead_id\",\"$closer - ".$user_array["$frow[5]"]."\"\n";
		*/
	}
	echo "\n";
	
	$new_xfer_info_array=array();
	while (list($key, $val)=each($xfer_info_array)) {
		$new_xfer_info_array[]=array('ID' => $key, 'phone' => $val[0], 'name' => $val[1], 'lead_id' => $val[2], 'length_in_sec' => $val[3], 'user' => $val[4], 'closer' => $val[5], 'talk_time' => $val[6], 'call_date' => $val[7], 'xfercallid' => $val[8]);
	}
	
	foreach ($new_xfer_info_array as $key2 => $row2) {
		$phone_ary[$key2]  = $row2['phone'];
		$name_ary[$key2]  = $row2['name'];
		$lead_id_ary[$key2]  = $row2['lead_id'];
		$length_in_sec_ary[$key2]  = $row2['length_in_sec'];
		$user_ary[$key2]  = $row2['user'];
		$closer_ary[$key2]  = $row2['closer'];
		$talk_time_ary[$key2]  = $row2['talk_time'];
		$call_date_ary[$key2]  = $row2['call_date'];
		$xfercallid_ary[$key2]  = $row2['xfercallid'];
	}

	// Sort the data with volume descending, edition ascending
	// Add $data as the last parameter, to sort by the common key
	array_multisort($call_date_ary, SORT_ASC, $xfercallid_ary, SORT_ASC, $lead_id_ary, SORT_ASC, $phone_ary, SORT_ASC, $name_ary, SORT_ASC, $length_in_sec_ary, SORT_ASC, $user_ary, SORT_ASC, $closer_ary, SORT_ASC, $talk_time_ary, SORT_ASC, $new_xfer_info_array);

	foreach ($new_xfer_info_array as $row) {

		$hphone=sprintf("%-12s", $row['phone']);
		if (strlen($row['name']==0)) {$row['name']=" ** No name on lead ** ";}
		$hname=sprintf("%-30s", substr($row['name'],0,30));
		$hlead_id=sprintf("%-10s", $row['lead_id']);
		$closer=sprintf("%-6s", $row['closer']);
		$closer_full_name=sprintf("%-15s", substr($user_array["$row[closer]"],0, 15));
		$closer_talk_time=$row['talk_time'];
		$closer_talk_time = sec_convert($closer_talk_time,'H'); 
		$closer_talk_time =	sprintf("%5s", $closer_talk_time);

		$hidden_span_txt.=": $hphone : $hname : $hlead_id : $closer - $closer_full_name : $row[call_date] :\n";
		$closer_spans["$row[closer]"].=": $user[$i] - $full_name[$i] : $hphone :  $closer_talk_time  :\n";
		$closer_CSV_span["$row[closer]"].="\"$userRAW[$i] - $full_name[$i]\",\"$hphone\",\"$closer_talk_time\",\"$row[call_date]\"\n";
		$CSV_fronter_header2.="\"$hphone\",\"$hname\",\"$hlead_id\",\"$closer - ".$user_array["$row[closer]"]."\"\n";
	}

	echo "\n";
	$hidden_span_txt.="";

	$stmt="select vicidial_closer_log.status,count(distinct vicidial_closer_log.lead_id) from vicidial_xfer_log, vicidial_closer_log where vicidial_xfer_log.call_date >= '$query_date_BEGIN' and vicidial_xfer_log.call_date <= '$query_date_END' and vicidial_closer_log.call_date >= '$query_date_BEGIN' and vicidial_closer_log.call_date <= '$query_date_END' and  vicidial_closer_log.campaign_id='" . mysqli_real_escape_string($link, $group) . "' $vicidial_closer_logLuser_group_SQL and vicidial_xfer_log.campaign_id='" . mysqli_real_escape_string($link, $group) . "' and vicidial_xfer_log.user='$userRAW[$i]' and vicidial_closer_log.lead_id=vicidial_xfer_log.lead_id and vicidial_closer_log.xfercallid=vicidial_xfer_log.xfercallid group by vicidial_closer_log.status;";
	if ($non_latin > 0) {$rslt=mysql_to_mysqli("SET NAMES 'UTF8'", $link);}
	$rslt=mysql_to_mysqli($stmt, $link);
	if ($DB) {$ASCII_text.="$stmt\n";}
	$lead_ids_to_print = mysqli_num_rows($rslt);
	$j=0;
	while ($j < $lead_ids_to_print)
		{
		$row=mysqli_fetch_row($rslt);
		$recL=0;
		if ( (preg_match("/\|$row[0]\|/", $sale_dispo_str)) and ($recL < 1) ) {$A1=$row[1]; $recL++; $sales=($sales + $row[1]);}
		if ( ($row[0]=='DROP') and ($recL < 1) ) {$DROP=$row[1]; $recL++;}
		if ($recL < 1) {$OTHER=($row[1] + $OTHER); $recL++;}
		$j++;
		}

	$totA1 = ($totA1 + $A1);
	$totDROP = ($totDROP + $DROP);
	$totOTHER = ($totOTHER + $OTHER);
	$TOTsales = ($TOTsales + $sales);
	$TOTunder540 = ($TOTunder540 + $under540);
	$TOTover540 = ($TOTover540 + $over540);
	$TOTagent_xfers = ($TOTagent_xfers + $agent_xfers);
	$TOTagent_calls = ($TOTagent_calls + $agent_calls);

	$Spct = MathZDC($sales, $USERcallsRAW[$i])*100;
	$Spct = round($Spct, 2);
	$Spct =	sprintf("%01.2f", $Spct);

	$Xpct = MathZDC($agent_xfers, $agent_calls)*100;
	$Xpct = round($Xpct, 2);
	$Xpct =	sprintf("%01.2f", $Xpct);
	
	if ($sales>$max_success) {$max_success=$sales;}
	if ($USERcalls[$i]>$max_xfers) {$max_xfers=$USERcalls[$i];}
	if ($Spct>$max_success_pct) {$max_success_pct=$Spct;}
	if ($A1>$max_sales) {$max_sales=$A1;}
	if ($DROP>$max_drops) {$max_drops=$DROP;}
	if ($OTHER>$max_other) {$max_other=$OTHER;}
	$graph_stats[$i][0]="$user[$i] - $full_name[$i]";
	$graph_stats[$i][1]=$sales;
	$graph_stats[$i][2]=$USERcalls[$i];
	$graph_stats[$i][3]=$Spct;
	$graph_stats[$i][4]=$A1;
	$graph_stats[$i][5]=$DROP;
	$graph_stats[$i][6]=$OTHER;

	$agent_xfers = sprintf("%6s", $agent_xfers);
	$agent_calls = sprintf("%6s", $agent_calls);
	$A1 =	sprintf("%4s", $A1);
	$DROP =	sprintf("%4s", $DROP);
	$OTHER =	sprintf("%4s", $OTHER);
	$sales =	sprintf("%4s", $sales);
	$Spct =	sprintf("%6s", $Spct);
	$Xpct =	sprintf("%6s", $Xpct);
	$under540 =	sprintf("%4s", $under540);
	$over540 =	sprintf("%4s", $over540);


	$ASCII_text.="| $user[$i] - $full_name[$i] | $agent_xfers | $agent_calls | $Xpct%| $DROP | $over540 | $under540 | $sales |\n";
	$ASCII_text.=$hidden_span_txt;
	$CSV_fronter_lines.="\"$user[$i] - $full_name[$i]\",\"$agent_xfers\",\"$agent_calls\",\"$Xpct%\",\"$DROP\",\"$over540\",\"$under540\",\"$sales\"\n";

	$i++;
	}


$totSpct = MathZDC($TOTsales, $TOTcalls)*100;
$totSpct = round($totSpct, 2);
$totSpct =	sprintf("%01.2f", $totSpct);
$totSpct =	sprintf("%6s", $totSpct);

$totXpct = MathZDC($TOTagent_xfers, $TOTagent_calls)*100;
$totXpct = round($totXpct, 2);
$totXpct =	sprintf("%01.2f", $totXpct);
$totXpct =	sprintf("%6s", $totXpct);
	

$TOTagents =	sprintf("%6s", $i);
$TOTcalls =		sprintf("%6s", $TOTcalls);
$TOTsales =		sprintf("%5s", $TOTsales);
$totA1 =		sprintf("%5s", $totA1);
$totDROP =		sprintf("%5s", $totDROP);
$totOTHER =		sprintf("%5s", $totOTHER);
$TOTunder540 =	sprintf("%4s", $TOTunder540);
$TOTover540 =	sprintf("%4s", $TOTover540);
$TOTagent_xfers = sprintf("%6s", $TOTagent_xfers);
$TOTagent_calls = sprintf("%6s", $TOTagent_calls);


$stmt="select avg(queue_seconds) from vicidial_closer_log where call_date >= '$query_date_BEGIN' and call_date <= '$query_date_END' and campaign_id='" . mysqli_real_escape_string($link, $group) . "' $VCLuser_group_SQL;";
$rslt=mysql_to_mysqli($stmt, $link);
if ($DB) {$ASCII_text.="$stmt\n";}
$row=mysqli_fetch_row($rslt);

$AVGwait = $row[0];
$AVGwait_M = MathZDC($AVGwait, 60);
$AVGwait_M = round($AVGwait_M, 2);
$AVGwait_M_int = intval("$AVGwait_M");
$AVGwait_S = ($AVGwait_M - $AVGwait_M_int);
$AVGwait_S = ($AVGwait_S * 60);
$AVGwait_S = round($AVGwait_S, 0);
if ($AVGwait_S < 10) {$AVGwait_S = "0$AVGwait_S";}
$AVGwait_MS = "$AVGwait_M_int:$AVGwait_S";
$AVGwait =		sprintf("%6s", $AVGwait_MS);

$ASCII_text.="+--------------------------+--------+--------+--------+------+------+------+------+\n";
$ASCII_text.="| TOTAL FRONTERS: $TOTagents   | $TOTagent_xfers | $TOTagent_calls | $totXpct%|$totDROP | $TOTover540 | $TOTunder540 |$TOTsales |\n";
$ASCII_text.="+--------------------------+--------+--------+--------+------+------+------+------+\n";
$ASCII_text.="|                                  Average time in Queue for customers:    $AVGwait |\n";
$ASCII_text.="+--------------------------+--------+--------+--------+------+------+------+------+\n";

$CSV_fronter_footer.="\"TOTAL FRONTERS: $TOTagents\",\"$TOTagent_xfers\",\"$TOTagent_calls\",\"$totXpct%\",\"$totDROP\",\"$TOTunder540\",\"$TOTunder540\",\"$TOTsales\"\n";
$CSV_fronter_footer.="\"Average time in Queue for customers:    $AVGwait\"\n\n\n";

	for ($d=0; $d";
		$XFERS_graph.="  ";
		$SUCCESSPCT_graph.="  ";
		$SALE_graph.="  ";
		$DROP_graph.="  ";
		$OTHER_graph.="  ";
	}
	$SUCCESS_graph.="
FRONTER STATS
AGENT
SUCCESS 
XFERS
SUCCESS %
SALE
DROP
OTHER
".$graph_stats[$d][1]."
".$graph_stats[$d][0]."
".$graph_stats[$d][2]."
".$graph_stats[$d][0]."
".$graph_stats[$d][3]."
".$graph_stats[$d][0]."
".$graph_stats[$d][4]."
".$graph_stats[$d][0]."
".$graph_stats[$d][5]."
".$graph_stats[$d][0]."
".$graph_stats[$d][5]."
TOTAL:
".trim($TOTsales)."";
	$XFERS_graph.="TOTAL:".trim($TOTcalls)."";
	$SUCCESSPCT_graph.="TOTAL:".trim($totSpct)."%";
	$SALE_graph.="TOTAL:".trim($totA1)."";
	$DROP_graph.="TOTAL:".trim($totDROP)."";
	$OTHER_graph.="TOTAL:".trim($totOTHER)."";
	$JS_onload.="\tDrawFronterGraph('SUCCESS', '1');\n"; 
	$JS_text.="function DrawFronterGraph(graph, th_id) {\n";
	$JS_text.="	var SUCCESS_graph=\"$SUCCESS_graph\";\n";
	$JS_text.="	var XFERS_graph=\"$XFERS_graph\";\n";
	$JS_text.="	var SUCCESSPCT_graph=\"$SUCCESSPCT_graph\";\n";
	$JS_text.="	var SALE_graph=\"$SALE_graph\";\n";
	$JS_text.="	var DROP_graph=\"$DROP_graph\";\n";
	$JS_text.="	var OTHER_graph=\"$OTHER_graph\";\n";
	$JS_text.="\n";
	$JS_text.="	for (var i=1; i<=6; i++) {\n";
	$JS_text.="		var cellID=\"frontergraph\"+i;\n";
	$JS_text.="		document.getElementById(cellID).style.backgroundColor='#DDDDDD';\n";
	$JS_text.="	}\n";
	$JS_text.="	var cellID=\"frontergraph\"+th_id;\n";
	$JS_text.="	document.getElementById(cellID).style.backgroundColor='#999999';\n";
	$JS_text.="	var graph_to_display=eval(graph+\"_graph\");\n";
	$JS_text.="	document.getElementById('fronter_graph').innerHTML=graph_to_display;\n";
	$JS_text.="}\n";
	$GRAPH_text.=$GRAPH;

##############################
#########  CLOSER STATS

$TOTagents=0;
$TOTcalls=0;
$totA1=0;
$totA2=0;
$totA3=0;
$totA4=0;
$totA5=0;
$totA6=0;
$totA7=0;
$totA8=0;
$totA9=0;
$totDROP=0;
$totOTHER=0;
$TOTsales=0;
$TOTunder90=0;

$CSV_closer_header="";
$CSV_closer_lines="";
$CSV_closer_footer="";

$ASCII_text.="\n";
$ASCII_text.="---------- CLOSER STATS      [download details]\n";
$ASCII_text.="+--------------------------+--------+------+------+------+-------+-------+\n";
$ASCII_text.="|                          |        |      | UNDER|      |  AVG  |       |\n";
$ASCII_text.="| AGENT (click for details)| CALLS  | SALE |  90  | DROP | TIME  | CONV %|\n";
$ASCII_text.="+--------------------------+--------+------+------+------+-------+-------+\n";

$CSV_closer_header="\"CLOSER STATS\"\n";
$CSV_closer_header.="\"AGENT\",\"CALLS\",\"SALE\",\"UNDER 90 SEC\",\"DROP\",\"SALE\",\"CONV %\"\n";

######## GRAPHING #########
$max_calls=1;
$max_sales=1;
$max_drops=1;
$max_other=1;
$max_sales2=1;
$max_conv_pct=1;
$GRAPH="

";
$GRAPH.="";
$GRAPH.="
CALLS
SALES
DROP
OTHER
SALES
CONV %

 


";
$graph_header="";
$CALLS_graph=$graph_header."";
$SALES_graph=$graph_header."";
$DROP_graph=$graph_header."";
$OTHER_graph=$graph_header."";
$SALES2_graph=$graph_header."";
$CONVPCT_graph=$graph_header."";
###########################

$stmt="select user,count(*) from vicidial_closer_log where call_date >= '$query_date_BEGIN' and call_date <= '$query_date_END' and  campaign_id='" . mysqli_real_escape_string($link, $group) . "'  $VCLuser_group_SQL and user is not null group by user;";
if ($non_latin > 0) {$rslt=mysql_to_mysqli("SET NAMES 'UTF8'", $link);}
$rslt=mysql_to_mysqli($stmt, $link);
if ($DB) {$ASCII_text.="$stmt\n";}
$users_to_print = mysqli_num_rows($rslt);
$i=0;
while ($i < $users_to_print)
	{
	$row=mysqli_fetch_row($rslt);

	$TOTcalls = ($TOTcalls + $row[1]);
	$userRAW[$i]=$row[0];
	$user[$i] =	sprintf("%-6s", $row[0]);while(strlen($user[$i])>6) {$user[$i] = substr("$user[$i]", 0, -1);}
	$USERcalls[$i] =	sprintf("%6s", $row[1]);
	$USERcallsRAW[$i] =	$row[1];



	$i++;
	}

$i=0;
$TOT_TALK_TIME=0;
while ($i < $users_to_print)
	{
	$stmt="select full_name from vicidial_users where user='$userRAW[$i]' $LOGadmin_viewable_groupsSQL;";
	if ($non_latin > 0) {$rslt=mysql_to_mysqli("SET NAMES 'UTF8'", $link);}
	$rslt=mysql_to_mysqli($stmt, $link);
	if ($DB) {$ASCII_text.="$stmt\n";}
	$names_to_print = mysqli_num_rows($rslt);
	if ($names_to_print > 0)
		{
		$row=mysqli_fetch_row($rslt);
		if ($non_latin < 1)
			{
			 $full_name[$i] =	sprintf("%-15s", $row[0]); while(strlen($full_name[$i])>15) {$full_name[$i] = substr("$full_name[$i]", 0, -1);}	
			}
		else
			{
			 $full_name[$i] =	sprintf("%-45s", $row[0]); while(mb_strlen($full_name[$i],'utf-8')>15) {$full_name[$i] = mb_substr("$full_name[$i]", 0, -1,'utf-8');}	
			}
		}
	else
		{$full_name[$i] = '               ';}

	$A1=0; $A2=0; $A3=0; $A4=0; $A5=0; $A6=0; $A7=0; $A8=0; $A9=0; $DROP=0; $OTHER=0; $sales=0; $uTOP=0; $uBOT=0; $points=0; 
	$under90=0; $AVG_TALK_TIME=0; $TALK_TIME=0;
	$stmt="select status,count(*),sum(length_in_sec-queue_seconds) as talk_time,sum(if((length_in_sec-queue_seconds)<90, 1, 0)) as under90 from vicidial_closer_log where call_date >= '$query_date_BEGIN' and call_date <= '$query_date_END' and  campaign_id='" . mysqli_real_escape_string($link, $group) . "' $VCLuser_group_SQL and user='$userRAW[$i]' group by status;";
	if ($non_latin > 0) {$rslt=mysql_to_mysqli("SET NAMES 'UTF8'", $link);}
	$rslt=mysql_to_mysqli($stmt, $link);
	if ($DB) {$ASCII_text.="$stmt\n";}
	$lead_ids_to_print = mysqli_num_rows($rslt);
	$j=0;
	
	while ($j < $lead_ids_to_print)
		{
		$row=mysqli_fetch_row($rslt);
		$recL=0;
		if ( preg_match("/\|$row[0]\|/", $sale_dispo_str) and ($recL < 1) ) 
			{
			$A1=$row[1]; $recL++; 
			$sales=($sales + $row[1]);
			$points = ($points + ($row[1] * 1) );
			}
		if ( ($row[0]=='DROP') and ($recL < 1) ) {$DROP=$row[1]; $recL++;}
		if ($recL < 1) {$OTHER=($row[1] + $OTHER); $recL++;}

		$TALK_TIME+=$row[2];
		$under90+=$row[3];
		
		$j++;
		}

	$totA1 = ($totA1 + $A1);	$TOTsales = ($TOTsales + $A1);
	$totA2 = ($totA2 + $A2);	$TOTsales = ($TOTsales + $A2);	$totTOP = ($totTOP + $A2);
	$totA3 = ($totA3 + $A3);	$TOTsales = ($TOTsales + $A3);	$totBOT = ($totBOT + $A3);
	$totA4 = ($totA4 + $A4);	$TOTsales = ($TOTsales + $A4);	$totTOP = ($totTOP + $A4);	$totBOT = ($totBOT + $A4);
	$totA5 = ($totA5 + $A5);
	$totA6 = ($totA6 + $A6);
	$totA7 = ($totA7 + $A7);
	$totA8 = ($totA8 + $A8);
	$totA9 = ($totA9 + $A9);
	$totDROP = ($totDROP + $DROP);
	$totOTHER = ($totOTHER + $OTHER);
	$totPOINTS = ($totPOINTS + $points);
	$TOT_TALK_TIME+=$TALK_TIME;
	$TOTunder90+=$under90;

	$Cpct = MathZDC($sales, ( ($USERcallsRAW[$i] - 0) - $DROP) )*100;
	$Cpct = round($Cpct, 2);
	$Cpct =	sprintf("%01.2f", $Cpct);
	$Cpct =	sprintf("%6s", $Cpct);

	$AVG_TIME = MathZDC($TALK_TIME, ($USERcallsRAW[$i] - 0));
	$AVG_TIME = round($AVG_TIME);
	$AVG_TIME = sec_convert($AVG_TIME,'H'); 
	$AVG_TIME =	sprintf("%5s", $AVG_TIME);

	$Spct = MathZDC($sales, ($USERcallsRAW[$i] - 0) )*100;
	$Spct = round($Spct, 2);
	$Spct =	sprintf("%01.2f", $Spct);
	$Spct =	sprintf("%6s", $Spct);

	$TOP = MathZDC($uTOP, $sales)*100;
	$TOP = round($TOP, 0);
	$TOP =	sprintf("%01.0f", $TOP);
	$TOP =	sprintf("%3s", $TOP);

	$BOT = MathZDC($uBOT, $sales)*100;
	$BOT = round($BOT, 0);
	$BOT =	sprintf("%01.0f", $BOT);
	$BOT =	sprintf("%3s", $BOT);

	$ppc = MathZDC($points, ( ($USERcallsRAW[$i] - 0) - $DROP) );
	$ppc = round($ppc, 2);
	$ppc =	sprintf("%01.2f", $ppc);
	$ppc =	sprintf("%4s", $ppc);

	if ($USERcalls[$i]>$max_calls) {$max_calls=$USERcalls[$i];}
	if ($A1>$max_sales) {$max_sales=$A1;}
	if ($DROP>$max_drops) {$max_drops=$DROP;}
	if ($OTHER>$max_other) {$max_other=$OTHER;}
	if ($sales>$max_sales2) {$max_sales2=$sales;}
	if ($Cpct>$max_conv_pct) {$max_conv_pct=$Cpct;}
	$graph_stats[$i][0]="$user[$i] - $full_name[$i]";
	$graph_stats[$i][1]=$USERcalls[$i];
	$graph_stats[$i][2]=$A1;
	$graph_stats[$i][3]=$DROP;
	$graph_stats[$i][4]=$OTHER;
	$graph_stats[$i][5]=$sales;
	$graph_stats[$i][6]=$Cpct;

	$A1 =	sprintf("%4s", $A1);
	$A2 =	sprintf("%4s", $A2);
	$A3 =	sprintf("%4s", $A3);
	$A4 =	sprintf("%4s", $A4);
	$A5 =	sprintf("%4s", $A5);
	$A6 =	sprintf("%4s", $A6);
	$A7 =	sprintf("%4s", $A7);
	$A8 =	sprintf("%4s", $A8);
	$A9 =	sprintf("%4s", $A9);
	$DROP =	sprintf("%4s", $DROP);
	$OTHER =	sprintf("%4s", $OTHER);
	$sales =	sprintf("%4s", $sales);
	$under90 =	sprintf("%4s", $under90);

	$ASCII_text.="| $user[$i] - $full_name[$i] | $USERcalls[$i] | $sales | $under90 | $DROP | $AVG_TIME |$Cpct%|\n";
	$ASCII_text.="";
	$ASCII_text.=$closer_spans["$userRAW[$i]"];
	$ASCII_text.="";

	$CSV_fronter_header3.="\n\"$user[$i] - $full_name[$i] XFER STATS\"\n";
	$CSV_fronter_header3.="\"FRONTER NAME\",\"PHONE\",\"TALK TIME\"\n";
	$CSV_fronter_header3.=$closer_CSV_span["$frow[5]"];

	$CSV_closer_lines.="\"$user[$i] - $full_name[$i]\",\"$USERcalls[$i]\",\"$A1\",\"$under90\",\"$DROP\",\"$AVG_TIME\",\"$Cpct%\"\n";

	$i++;
	}


$totCpct = MathZDC($TOTsales, ( ($TOTcalls - 0) - $totDROP) )*100;
$totCpct = round($totCpct, 2);
$totCpct =	sprintf("%01.2f", $totCpct);
$totCpct =	sprintf("%6s", $totCpct);
		
$totSpct = MathZDC($TOTsales, ($TOTcalls - 0) )*100;
$totSpct = round($totSpct, 2);
$totSpct =	sprintf("%01.2f", $totSpct);
$totSpct =	sprintf("%6s", $totSpct);
		
$TOT_AVG_TIME = MathZDC($TOT_TALK_TIME, ($TOTcalls - 0));
$TOT_AVG_TIME = round($TOT_AVG_TIME);
$TOT_AVG_TIME = sec_convert($TOT_AVG_TIME,'H'); 
$TOT_AVG_TIME =	sprintf("%5s", $TOT_AVG_TIME);

$ppc = MathZDC($totPOINTS, ( ($TOTcalls - $totOTHER) - $totDROP) );
$ppc = round($ppc, 2);
$ppc =	sprintf("%01.2f", $ppc);
$ppc =	sprintf("%4s", $ppc);
		
$TOP = MathZDC($totTOP, $TOTsales)*100;
$TOP = round($TOP, 0);
$TOP =	sprintf("%01.0f", $TOP);
$TOP =	sprintf("%3s", $TOP);

$BOT = MathZDC($totBOT, $TOTsales)*100;
$BOT = round($BOT, 0);
$BOT =	sprintf("%01.0f", $BOT);
$BOT =	sprintf("%3s", $BOT);

$TOTagents =	sprintf("%6s", $i);
$TOTcalls =		sprintf("%6s", $TOTcalls);
$totA1 =		sprintf("%5s", $totA1);
$totA2 =		sprintf("%5s", $totA2);
$totA3 =		sprintf("%5s", $totA3);
$totA4 =		sprintf("%5s", $totA4);
$totA5 =		sprintf("%5s", $totA5);
$totA6 =		sprintf("%5s", $totA6);
$totA7 =		sprintf("%5s", $totA7);
$totA8 =		sprintf("%5s", $totA8);
$totA9 =		sprintf("%5s", $totA9);
$totDROP =		sprintf("%5s", $totDROP);
$totOTHER =		sprintf("%5s", $totOTHER);
$TOTsales =		sprintf("%5s", $TOTsales);
$TOTunder90 =		sprintf("%4s", $TOTunder90);

$ASCII_text.="+--------------------------+--------+------+------+------+-------+-------+\n";
$ASCII_text.="| TOTAL CLOSERS:  $TOTagents   | $TOTcalls |$totA1 | $TOTunder90 |$totDROP | $TOT_AVG_TIME |$totCpct%|\n";
$ASCII_text.="+--------------------------+--------+------+------+------+-------+-------+\n";

$CSV_closer_footer.="\"TOTAL CLOSERS:  $TOTagents\",\"$TOTcalls\",\"$totA1\",\"$TOTunder90\",\"$totDROP\",\"$TOT_AVG_TIME\",\"$totCpct%\"\n";

	for ($d=0; $d";
		$SALES_graph.="  ";
		$DROP_graph.="  ";
		$OTHER_graph.="  ";
		$SALES2_graph.="  ";
		$CONVPCT_graph.="  ";
	}
	$CALLS_graph.="
CLOSER STATS
AGENT
CALLS 
SALES
DROP
OTHER
SALES
CONV %
".$graph_stats[$d][1]."
".$graph_stats[$d][0]."
".$graph_stats[$d][2]."
".$graph_stats[$d][0]."
".$graph_stats[$d][3]."
".$graph_stats[$d][0]."
".$graph_stats[$d][4]."
".$graph_stats[$d][0]."
".$graph_stats[$d][5]."
".$graph_stats[$d][0]."
".$graph_stats[$d][6]."%
TOTAL:
".trim($TOTcalls)."";
	$SALES_graph.="TOTAL:".trim($totA1)."";
	$DROP_graph.="TOTAL:".trim($totDROP)."";
	$OTHER_graph.="TOTAL:".trim($totOTHER)."";
	$SALES2_graph.="TOTAL:".trim($TOTsales)."";
	$CONVPCT_graph.="TOTAL:".trim($totCpct)."%";
	$JS_onload.="\tDrawCloserGraph('CALLS', '1');\n";
	$JS_text.="function DrawCloserGraph(graph, th_id) {\n";
	$JS_text.="	var CALLS_graph=\"$CALLS_graph\";\n";
	$JS_text.="	var SALES_graph=\"$SALES_graph\";\n";
	$JS_text.="	var DROP_graph=\"$DROP_graph\";\n";
	$JS_text.="	var OTHER_graph=\"$OTHER_graph\";\n";
	$JS_text.="	var SALES2_graph=\"$SALES2_graph\";\n";
	$JS_text.="	var CONVPCT_graph=\"$CONVPCT_graph\";\n";
	$JS_text.="\n";
	$JS_text.="	for (var i=1; i<=6; i++) {\n";
	$JS_text.="		var cellID=\"closergraph\"+i;\n";
	$JS_text.="		document.getElementById(cellID).style.backgroundColor='#DDDDDD';\n";
	$JS_text.="	}\n";
	$JS_text.="	var cellID=\"closergraph\"+th_id;\n";
	$JS_text.="	document.getElementById(cellID).style.backgroundColor='#999999';\n";
	$JS_text.="	var graph_to_display=eval(graph+\"_graph\");\n";
	$JS_text.="	document.getElementById('closer_graph').innerHTML=graph_to_display;\n";
	$JS_text.="}\n";
	$GRAPH_text.=$GRAPH;


$ENDtime = date("U");
$RUNtime = ($ENDtime - $STARTtime);

if ($report_display_type=="HTML") {
	$HTML_text.=$GRAPH_text;
	} 
else 
	{
	$HTML_text.=$ASCII_text;
	}

if ($DB) {$HTML_text.="\nRun Time: $RUNtime seconds|$db_source\n";}

$HTML_text.="