require_once("Spreadsheet/Excel/Writer.php");

function create_report($tg)
{

// Creating a workbook
	$workbook = new Spreadsheet_Excel_Writer();

// sending HTTP headers
	$workbook->send($tg.'.xls');

// Creating a worksheet
	$worksheet =& $workbook->addWorksheet($tg);
	$format_title =& $workbook->addFormat();
	$format_title->setBold();
	$format_title->setColor('blue');


	$memvarlist = getmemvarinfo($tg);
	$worksheet->write(0, 0, $tg);

	$i=2;
	foreach($memvarlist as $k => $v)
	{

		$worksheet->write($i, 0, 'Memvar',$format_title);
		$worksheet->write($i+1, 0, 'Members',$format_title);
		$worksheet->write($i+2, 0, 'CICs',$format_title);
		$worksheet->write($i+3, 0, 'Provider Ckt ID',$format_title);
		$worksheet->write($i+4, 0, 'CFA',$format_title);
		$worksheet->write($i+5, 0, 'Circuit ID',$format_title);

		$worksheet -> write($i,1,$k);
		$worksheet -> write($i+1,1,mylist($memvarlist[$k]['memlist']));
		$worksheet -> write($i+2,1,mylist($memvarlist[$k]['ciclist']));

		$xx=tgreport_getid($k);
		$worksheet -> write($i+3,1,$xx[0]['Z_Parent_Provider_Circuit_Id']);
		$worksheet -> write($i+4,1,$xx[0]['Z_Parent_CFA']);
		$worksheet -> write($i+5,1,$xx[0]['Circuit Id']);


		$p=tgreport_fujpath($k);
		$x=0;
		foreach($p as $leg)
		{
			$p = explode("-",$leg['aid']);
			$p[1] = "0".$p[1];
			$leg['aid'] = implode("-",$p);
			$worksheet -> write($i+$x,2,$leg['shelf']." ".$leg['aid']);
			$x++;
		}
		
		$i+=7;
	}
	$workbook->close();
}