<?php
require_once('Spreadsheet/Excel/Writer.php');

session_start();
if($_SESSION['dbName']==""){
header("location:../index.php");
}


include("config.inc.php");

//Set Time Execution For the Report
ini_set('max_execution_time', $config['ReportTimeExecution']);

$connection = mysql_connect($config['dbServer'],$config['dbUser'],$config['dbPass']) or die("Could not connect to DB");
mysql_select_db($_SESSION['dbName'],$connection) or die("Could not find DB");


$querylog=" select ifNull(FI_RepRestrictProject,0) As FI_RepRestrictProject, ifNull(FI_RepRestrictCostcenter,0) As FI_RepRestrictCostcenter, ".
		  " ifNull(FI_RepRestrictWarehouse,0) As FI_RepRestrictWarehouse ".
          " from ".$_SESSION['dbLabel'].".login where user_account='".$_SESSION['useraccount']."' and Upper(Login_Schema) = Upper('".$_SESSION['dbName']."') ";
$resultlog=mysql_query($querylog) or die(mysql_error());
while($rows=mysql_fetch_array($resultlog)){
	extract($rows);
}

$querysetup="select grid_color1,grid_color2, DecimalBase, DecimalBase1, DecimalBase2, Base1, Base2, Company_Name As CompanyName from setup";
$resultsetup=mysql_query($querysetup,$connection) or die(mysql_error());
while($rows=mysql_fetch_array($resultsetup)){
  extract($rows);
}


$queryproject=" select distinct project.project_code, project_name ".
              " from project left join ".$_SESSION['dbLabel'].".loginstk on project.project_code like concat(ifnull(loginstk.project_code,project.project_code),'%') ".
			  " where user_account='".$_SESSION['useraccount']."' ".
			  " and (loginstk.project_code is not null and loginstk.project_code != '') ".
			  " order by project.project_code";
$projectresult = mysql_query($queryproject,$connection) or die(mysql_error());
$projectexist   = mysql_num_rows($projectresult);

$querycostcent=" select distinct costcent.costcent_code, costcent_name ".
               " from costcent left join ".$_SESSION['dbLabel'].".loginstk on costcent.costcent_code like concat(ifnull(loginstk.costcent_code,costcent.costcent_code),'%') ".
			   " where user_account='".$_SESSION['useraccount']."' ".
			   " and (loginstk.costcent_code is not null and loginstk.costcent_code != '') ".
			   " order by costcent.costcent_code";
$costcentresult = mysql_query($querycostcent,$connection) or die(mysql_error());
$costcentexist  = mysql_num_rows($costcentresult);	



$now=current_server_time($connection);
$dt=split(" ",$now[0]);
$printdate=split("-",$dt[0]);

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

//Sending HTTP headers
$workbook->send('Exp_ListofPurchases.xls');
 
//Creating a worksheet
$worksheet=&$workbook->addWorksheet('List of Purchases');
$worksheet->setLandscape();
 
//set all columns same width
$columnWidth = 10;

//Title Format 
$sheetTitleFormat =& $workbook->addFormat(array('bold'=>1,
  'size'=>10));

//Column Title Format  
$columnTitleFormat =& $workbook->addFormat(array('bold'=>1,
  'top'=>1,
  'bottom'=>1 ,
  'size'=>15,
  'color'=>0x0A,
  ));
  
 
  
// Regular Format
$regularleftFormat =& $workbook->addFormat(array('size'=>9,
  'align'=>'left'  ));
$regularrightFormat =& $workbook->addFormat(array('size'=>9,
  'align'=>'right'  ));  
$regularrightFormatNum =& $workbook->addFormat(array('size'=>9,
  'align'=>'right'  )); 
$regularcenterFormat =& $workbook->addFormat(array('size'=>9,
  'align'=>'center'  ));    
  
$regularleftFormat1 =& $workbook->addFormat(array('size'=>8,
  'align'=>'left'  ));
$regularrightFormat1 =& $workbook->addFormat(array('size'=>8,
  'align'=>'right'  ));    
$regularrightFormat1Num =& $workbook->addFormat(array('size'=>8,
  'align'=>'right'  )); 
  
$TitleFormat =& $workbook->addFormat(array('size'=>11,
  'align'=>'left',
  'bold'=>1
  ));

$boldleftFormat =& $workbook->addFormat(array('size'=>9,
  'align'=>'left'  ,
  'valign'=>'top'  ,
  'bold'=>1
  ));  
$boldrightFormat =& $workbook->addFormat(array('size'=>9,
  'align'=>'right'  ,
  'bold'=>1
  )); 
$boldrightFormatNum =& $workbook->addFormat(array('size'=>9,
  'align'=>'right'  ,
  'bold'=>1
  )); 
$boldcenterFormat =& $workbook->addFormat(array('size'=>9,
  'align'=>'center'  ,
  'valign'=>'top'  ,
  'bold'=>1
  ));    
  
$grouplevel1Format =& $workbook->addFormat(array('size'=>10,
  'align'=>'left',
  'bold'=>1,
  'color'=>0x0C
  )); 
$grouplevel2Format =& $workbook->addFormat(array('size'=>10,
  'align'=>'left',
  'bold'=>0,
  'color'=>0x0A
  )); 
$grouplevel3Format =& $workbook->addFormat(array('size'=>9,
  'align'=>'left',
  'italic'=>1,
  'color'=>0x11
  ));   
$grouplevel1totalFormat =& $workbook->addFormat(array('size'=>10,
  'align'=>'right',
  'bold'=>1,
  'color'=>0x0C
  ));  
$grouplevel2totalFormat =& $workbook->addFormat(array('size'=>10,
  'align'=>'right',
  'bold'=>0,
  'color'=>0x0A
  ));  
$grouplevel3totalFormat =& $workbook->addFormat(array('size'=>9,
  'align'=>'right',
  'italic'=>1,
  'color'=>0x11
  ));   

$seloptionFormat =& $workbook->addFormat(array('size'=>9,
  'align'=> 'left'  ,
  'valign'=> 'top'  ,
  'bold'=> 1
  ));
$seloptionFormat->setTextWrap();

$regularrightFormatNum->setNumFormat('_(* #,##0.00_);_(* (#,##0.00);_(* "-"??_);_(@_)');
$regularrightFormat1Num->setNumFormat('_(* #,##0.00_);_(* (#,##0.00);_(* "-"??_);_(@_)');
$boldrightFormatNum->setNumFormat('_(* #,##0.00_);_(* (#,##0.00);_(* "-"??_);_(@_)');
$grouplevel1totalFormat->setNumFormat('_(* #,##0.00_);_(* (#,##0.00);_(* "-"??_);_(@_)');


if ($cur == 'currency1'){
   $cur='null';  
   $displaycur = '';
}   
else {
   $displaycur = $cur;
   $cur="'".$cur."'";
}

$SelectedOptions = "Filter by: \n";
if ($fromdate != '')      $SelectedOptions .= "-> Date From: ". $fromdate . "  To: ". $todate ."\n";	
if ($displaycur != '')    $SelectedOptions .= "-> Currency: ". $displaycur ."\n";	
if ($fromref != '')       $SelectedOptions .= "-> Reference From: ". $fromref . "  To: ". $toref ."\n";
if ($fromsupp != '')      $SelectedOptions .= "-> Supplier From: ". $fromsupp . "  To: ". $tosupp ."\n";
if ($fromproject != '')   $SelectedOptions .= "-> Project From: ". $fromproject . "\n";



if (!empty($fromdate))   $fromdate = explodeword($fromdate);
if (!empty($todate))     $todate = explodeword($todate);  


$fromref      = GetSQLValueString($fromref, 'text');
$toref        = GetSQLValueString($toref, 'text');
$fromproject  = GetSQLValueString($fromproject, 'text');
$fromsupp     = GetSQLValueString($fromsupp, 'text');
$tosupp       = GetSQLValueString($tosupp, 'text');
$fromdate	  = GetSQLValueString($fromdate, 'date');
$todate       = GetSQLValueString($todate, 'date');   

$showboth = $purchaseboth;   

if (empty($purtype)) $purtype = 'PI';



//Display Report Header
$worksheet->write(1,0,$CompanyName, $TitleFormat);
$worksheet->write(1,4,"List of Purchases", $TitleFormat);
               
$worksheet->write(1,8,"Printed Date:", $boldleftFormat);
$worksheet->write(1,9,$printdate[2]."/".$printdate[1]."/".$printdate[0], $regularleftFormat);
$worksheet->write(2,8,"Time:", $boldleftFormat);		
$worksheet->write(2,9,$dt[1]." ".$dt[2], $regularleftFormat);

//Displaying Selected Options	
// Merge cells from row 3, col 0 to row 3, col 0
$worksheet->setMerge(3, 0, 8, 6);
$worksheet->write(3,0,$SelectedOptions, $seloptionFormat);  

$RowNum    = 10;
$ColumnNum = 0;	   


$worksheet->setColumn ($ColumnNum, $ColumnNum, 15);
$worksheet->write($RowNum,$ColumnNum,"Date", $boldleftFormat);
$ColumnNum += 1;
$worksheet->write($RowNum,$ColumnNum,"Ref.", $boldleftFormat);
$ColumnNum += 1;
$worksheet->write($RowNum,$ColumnNum,"Type", $boldleftFormat);
$ColumnNum += 1;
$worksheet->setColumn ($ColumnNum, $ColumnNum, 15);
$worksheet->write($RowNum,$ColumnNum,"Supplier", $boldcenterFormat);
$ColumnNum += 1;
$worksheet->setColumn ($ColumnNum, $ColumnNum, 40);
$worksheet->write($RowNum,$ColumnNum,"Description", $boldcenterFormat);
$ColumnNum += 1;
$worksheet->setColumn ($ColumnNum, $ColumnNum, 15);
$worksheet->write($RowNum,$ColumnNum,"Invoice No.", $boldcenterFormat);
$ColumnNum += 1;
$worksheet->setColumn ($ColumnNum, $ColumnNum, 15);
$worksheet->write($RowNum,$ColumnNum,"Project", $boldcenterFormat);
$ColumnNum += 1;
if ($showProjCostName == 1){
	$worksheet->setColumn ($ColumnNum, $ColumnNum, 20);
	$worksheet->write($RowNum,$ColumnNum,"Project Name", $boldcenterFormat);
	$ColumnNum += 1;
}	
$worksheet->setColumn ($ColumnNum, $ColumnNum, 15);
$worksheet->write($RowNum,$ColumnNum,"Costcenter", $boldcenterFormat);
$ColumnNum += 1;
if ($showProjCostName == 1){
	$worksheet->setColumn ($ColumnNum, $ColumnNum, 20);
	$worksheet->write($RowNum,$ColumnNum,"Costcenter Name", $boldcenterFormat);
	$ColumnNum += 1;
}	
if ($purtype == 'PI') {
	$worksheet->write($RowNum,$ColumnNum,"Cur.", $boldcenterFormat);
	$ColumnNum += 1;
	$worksheet->setColumn ($ColumnNum, $ColumnNum, 15);
	$worksheet->write($RowNum,$ColumnNum,"Net Total ".$displaycur, $boldcenterFormat);
	$ColumnNum += 1;
	$worksheet->setColumn ($ColumnNum, $ColumnNum, 12);
	$worksheet->write($RowNum,$ColumnNum,"Charges", $boldcenterFormat);
	$ColumnNum += 1;
}



if ($showdetail == 1) {
	$RowNum += 1;
	$ColumnNum = 0;
	
	$worksheet->setMerge($RowNum, $ColumnNum, $RowNum, $ColumnNum + 3);
	$worksheet->write($RowNum,$ColumnNum,"Item Code/Description", $boldleftFormat);
	$ColumnNum += 4;
	$worksheet->write($RowNum,$ColumnNum,"Warehouse", $boldleftFormat);
	$ColumnNum += 1;
	$worksheet->write($RowNum,$ColumnNum,"Qty.", $boldcenterFormat);
	$ColumnNum += 1;
	
	if ($purtype == 'PI') {
		$worksheet->write($RowNum,$ColumnNum,"Unit Price", $boldcenterFormat);
		$ColumnNum += 1;
		$worksheet->write($RowNum,$ColumnNum,"Disc. %", $boldcenterFormat);
		$ColumnNum += 1;
		$worksheet->write($RowNum,$ColumnNum,"Total", $boldcenterFormat);
		$ColumnNum += 1;
	}	
}	


   
$querypurchases= " select Purchase_id, date_format(Purchase_Date,'%d/%m/%Y') Purchase_Date, Purchase_Reference, Journal_Type, ".
                 " purchases.Supplier_code, suppliers.Ledger_name , purchases.project_code, project_name, purchases.costcent_code, purchases.currency_code, ".
				 " ( ifnull(if(upper($cur)='".$Base1."',Purchase_TaxableBase1,if(upper($cur)='".$Base2."',Purchase_TaxableBase2,Purchase_Taxable)),0) + ".
  				 "   ifnull(if(upper($cur)='".$Base1."',Purchase_NoneTaxableBase1,if(upper($cur)='".$Base2."',Purchase_NoneTaxableBase2,Purchase_NoneTaxable)),0) + ".
 				 "   ifnull(if(upper($cur)='".$Base1."',Purchase_VATBase1,if(upper($cur)='".$Base2."',Purchase_VATBase2,Purchase_VAT)),0) - ".
				 "   ifnull(if(upper($cur)='".$Base1."',Purchase_DiscountBase1,if(upper($cur)='".$Base2."',Purchase_DiscountBase2,Purchase_DiscountAmount)),0)) net_total, ".
				 " ifnull(if(upper($cur)='".$Base1."',Purchase_ChargesBase1,if(upper($cur)='".$Base2."',Purchase_ChargesBase2, Purchase_Charges)),0) PurchaseCharges, ".
				 " if('".$date."' = 'date', date_format(Purchase_Date,'%Y-%m-%d'), Purchase_Reference) ord, Purchase_InvoiceNo, Costcent_name ".
 				 " from purchases ".
				 " left join suppliers on purchases.Supplier_code = suppliers.ledger_number ".
				 " left join project on purchases.project_code = project.project_code ".
				 " left join costcent on costcent.Costcent_code = purchases.Costcent_code ";
				
if ($projectexist >	0 && $FI_RepRestrictProject == 1)
  $querypurchases= $querypurchases." left join ( select distinct project_code from ".$_SESSION['dbLabel'].".loginstk ".
								   "			 where loginstk.user_account='".$_SESSION['useraccount']."' ".
								   "             and (loginstk.project_code is not null and loginstk.project_code != '') ".
								   "	       ) Q1 on purchases.project_code like concat(Q1.project_code,'%') ";
if ($costcentexist > 0 && $FI_RepRestrictCostcenter == 1) 
		$querypurchases = $querypurchases." Inner join ( select distinct costcent_code from ".$_SESSION['dbLabel'].".loginstk ".
								  "			     where loginstk.user_account='".$_SESSION['useraccount']."' ".
								  "              and (costcent_code is not null and costcent_code != '') ".
								  "			 ) Q2 on purchases.costcent_code like concat(Q2.Costcent_Code,'%')";
								  
$querypurchases= $querypurchases.  
				" where Purchase_Reference between ifNull(". $fromref .",Purchase_Reference) and ifNull(". $toref.",Purchase_Reference) ".
				" and (($grpsupplier=1 and purchases.Supplier_code between ifNull(".$fromsupp.",purchases.Supplier_code) and ifNull(". $tosupp.",purchases.Supplier_code)) or ($grpsupplier=0 and 1 = 1)) ".
				//" and upper(purchases.currency_code) = ifNull(upper(".$cur."), upper(purchases.currency_code)) ".
				" and upper(ifNull(purchases.project_code,-1)) like Concat(ifNull(upper(".$fromproject."), upper(ifNull(purchases.project_code,-1))),'%') ".
				" and date_format(Purchase_Date,'%Y-%m-%d') between ifNull(". $fromdate.",date_format(Purchase_Date,'%Y-%m-%d')) and ifNull(". $todate.",date_format(Purchase_Date,'%Y-%m-%d'))  ".
				" and (($showboth = 1 and 1 = 1) or ($showboth =0 and purchases.journal_type='".$transaction."')) ";
				//" and ifNull(purchases.purchase_type,'PI') In ('".$purtype."') ";

$querypurchases= $querypurchases.  
				" order by if($grpsupplier=1, purchases.Supplier_code, if($grpproject=1, purchases.project_code, null) ), ord, Purchase_Reference ";
				


				
$SumNetTot      = 0;
$SumGroupNetTot = 0;
$masterproject  = '';
$mastersupplier = '';
	
//echo $querypurchases;

$RowNum    = 13;
$ColumnNum = 0;

$resultpurchases=mysql_query($querypurchases,$connection) or die(mysql_error());
while($rowpurchases=mysql_fetch_row($resultpurchases)){

    
	$querypurchasesdt= " select purchasesdt.item_code, items.item_description, purchasesdt.warehouse_code, PurchaseDt_Quantity, ".
				  	   " ifNull(if(upper($cur)='".$Base1."',PurchaseDt_PriceBase1,if(upper($cur)='".$Base2."',PurchaseDt_PriceBase2, PurchaseDt_Price)),0) PurchaseDtPrice, ".
					   " ifNull(PurchaseDt_DiscountPer,0) PurchaseDtDiscountPer, ".
					   " ((ifNull(PurchaseDt_Quantity,0) * ifNull(if(upper($cur)='".$Base1."',PurchaseDt_PriceBase1,if(upper($cur)='".$Base2."',PurchaseDt_PriceBase2,PurchaseDt_Price)),0)) - ".
					   " ((ifNull(PurchaseDt_Quantity,0) * ifNull(if(upper($cur)='".$Base1."',PurchaseDt_PriceBase1,if(upper($cur)='".$Base2."',PurchaseDt_PriceBase2,PurchaseDt_Price)),0) * ifNull(PurchaseDt_DiscountPer,0)) / 100) ) total ".
					   " from purchasesdt ".
					   " left join items on purchasesdt.item_code = items.item_code ".
					   " where purchasesdt.Purchase_id = ". $rowpurchases[0];				
					
	//echo $querypurchasesdt;
	
	if (($grpproject == 1 && $grpsupplier == 0) && ($masterproject == '' || $masterproject!= $rowpurchases[6])) {
	  
		if (($cur != 'null') && ($masterproject != '' && $masterproject!= $rowpurchases[6]) && $purtype == 'PI'){
			//$RowNum += 1;
			$ColumnNum = 6;
		
			$worksheet->setMerge($RowNum, $ColumnNum, $RowNum, $ColumnNum + 1);
			$worksheet->write($RowNum, $ColumnNum, "Total by group $displaycur", $grouplevel1Format);
			$ColumnNum += 2;
			$worksheet->writeNumber($RowNum, $ColumnNum, $SumGroupNetTot, $grouplevel1totalFormat);
			$ColumnNum += 1;
			
			$SumGroupNetTot = 0;
			
			//Increment the Rows Counter By 1 and Reset the Columns Counter
			$RowNum += 1;
			$ColumnNum = 0;
		}	
		
		$worksheet->write($RowNum, $ColumnNum, "Group by Project", $grouplevel1Format);
		$ColumnNum += 1;
		$worksheet->write($RowNum, $ColumnNum, $rowpurchases[6]." - ".$rowpurchases[7], $grouplevel1Format);
		$ColumnNum += 1;
	  
		$masterproject= $rowpurchases[6];
		
		//Increment the Rows Counter By 1 and Reset the Columns Counter
		$RowNum += 2;
		$ColumnNum = 0;
	
	}
	
	if (($grpsupplier == 1 ) && ($mastersupplier == '' || $mastersupplier!= $rowpurchases[4])) {
	  
		if (($cur != 'null') && ($mastersupplier != '' && $mastersupplier!= $rowpurchases[4]) && $purtype == 'PI'){
		
			//$RowNum += 1;
			$ColumnNum = 6;
		
			$worksheet->setMerge($RowNum, $ColumnNum, $RowNum, $ColumnNum + 1);
			$worksheet->write($RowNum, $ColumnNum, "Total by group $displaycur", $grouplevel1Format);
			$ColumnNum += 2;
			$worksheet->writeNumber($RowNum, $ColumnNum, $SumGroupNetTot, $grouplevel1totalFormat);
			$ColumnNum += 1;
			
			$SumGroupNetTot = 0;
			
			//Increment the Rows Counter By 1 and Reset the Columns Counter
			$RowNum += 1;
			$ColumnNum = 0;

        }	
		
		$worksheet->write($RowNum, $ColumnNum, "Group by Supplier", $grouplevel1Format);
		$ColumnNum += 1;
		$worksheet->write($RowNum, $ColumnNum, $rowpurchases[4]." - ".$rowpurchases[5], $grouplevel1Format);
		$ColumnNum += 1;	
	  
		$mastersupplier= $rowpurchases[4];
		
		//Increment the Rows Counter By 1 and Reset the Columns Counter
		$RowNum += 2;
		$ColumnNum = 0;
	
	}
	
	$worksheet->write($RowNum, $ColumnNum, $rowpurchases[1], $regularleftFormat);
	$ColumnNum += 1;
	$worksheet->write($RowNum, $ColumnNum, $rowpurchases[2], $regularleftFormat);
	$ColumnNum += 1;
	$worksheet->write($RowNum, $ColumnNum, $rowpurchases[3], $regularcenterFormat);
	$ColumnNum += 1;
	$worksheet->write($RowNum, $ColumnNum, $rowpurchases[4], $regularleftFormat);
	$ColumnNum += 1;
	$worksheet->write($RowNum, $ColumnNum, $rowpurchases[5], $regularleftFormat);
	$ColumnNum += 1;
	$worksheet->writestring($RowNum, $ColumnNum, $rowpurchases[13], $regularcenterFormat);
	$ColumnNum += 1;
	$worksheet->writestring($RowNum, $ColumnNum, $rowpurchases[6], $regularcenterFormat);
	$ColumnNum += 1;
	if ($showProjCostName == 1){
		$worksheet->writestring($RowNum, $ColumnNum, $rowpurchases[7], $regularcenterFormat);
		$ColumnNum += 1;
	}
	$worksheet->write($RowNum, $ColumnNum, $rowpurchases[8], $regularcenterFormat);
	$ColumnNum += 1;
	if ($showProjCostName == 1){
		$worksheet->writestring($RowNum, $ColumnNum, $rowpurchases[14], $regularcenterFormat);
		$ColumnNum += 1;
	}
	
	if ($purtype == 'PI') {
		$worksheet->write($RowNum, $ColumnNum, $rowpurchases[9], $regularcenterFormat);
		$ColumnNum += 1;
		$worksheet->writeNumber($RowNum, $ColumnNum, $rowpurchases[10], $regularrightFormatNum);
		$ColumnNum += 1;
		$worksheet->writeNumber($RowNum, $ColumnNum, $rowpurchases[11], $regularrightFormatNum);
		$ColumnNum += 1;
	} 

	
	if ($rowpurchases[2] == 'PI' || $showboth == 0) {
	  $SumNetTot       = $SumNetTot  + $rowpurchases[10];
	  $SumGroupNetTot  = $SumGroupNetTot  + $rowpurchases[10];
	} else {
	  $SumNetTot       = $SumNetTot  - $rowpurchases[10];
	  $SumGroupNetTot  = $SumGroupNetTot  - $rowpurchases[10];
	}

	if ($showdetail == 1) {
		$resultpurchasesdt=mysql_query($querypurchasesdt,$connection) or die(mysql_error());
		while($rowpurchasesdt=mysql_fetch_row($resultpurchasesdt)){
		
			$RowNum += 1;
			$ColumnNum = 0;
			
			//$worksheet->setMerge($RowNum, $ColumnNum, $RowNum, $ColumnNum + 1);
			$worksheet->write($RowNum, $ColumnNum, $rowpurchasesdt[0], $regularleftFormat1);
			$ColumnNum += 1;
			//$worksheet->setMerge($RowNum, $ColumnNum, $RowNum, $ColumnNum + 1);
			$worksheet->write($RowNum, $ColumnNum, $rowpurchasesdt[1], $regularleftFormat1);
			$ColumnNum += 3;
			$worksheet->write($RowNum, $ColumnNum, $rowpurchasesdt[2], $regularleftFormat1);
			$ColumnNum += 1;
			$worksheet->writeNumber($RowNum, $ColumnNum, $rowpurchasesdt[3], $regularrightFormat1Num);
			$ColumnNum += 1;
			
			if ($purtype == 'PI') {
				$worksheet->writeNumber($RowNum, $ColumnNum, $rowpurchasesdt[4], $regularrightFormat1Num);
				$ColumnNum += 1;
				$worksheet->writeNumber($RowNum, $ColumnNum, $rowpurchasesdt[5], $regularrightFormat1Num);
				$ColumnNum += 1;
				$worksheet->writeNumber($RowNum, $ColumnNum, $rowpurchasesdt[6], $regularrightFormat1Num);
				$ColumnNum += 1;
			}	

		}
	}	
	
	//Increment the Rows Counter By 1 and Reset the Columns Counter
	$RowNum += 1;
	$ColumnNum = 0;

}

if (($grpproject == 1  && $grpsupplier == 0) && ($masterproject == '' || $masterproject!= $rowpurchases[6])) {
	  
    if (($cur != 'null') && ($masterproject != '' ) && $purtype == 'PI'){
	   //$RowNum += 1;
		$ColumnNum = 6;
		
		$worksheet->setMerge($RowNum, $ColumnNum, $RowNum, $ColumnNum + 1);
		$worksheet->write($RowNum, $ColumnNum, "Total by group $displaycur", $grouplevel1Format);
		$ColumnNum += 2;
		$worksheet->writeNumber($RowNum, $ColumnNum, $SumGroupNetTot, $grouplevel1totalFormat);
		$ColumnNum += 1;
			
		$SumGroupNetTot = 0;
			
		//Increment the Rows Counter By 1 and Reset the Columns Counter
		$RowNum += 1;
		$ColumnNum = 0;
	}	
  
}
if (($grpsupplier == 1) && ($mastersupplier == '' || $mastersupplier!= $rowpurchases[4])) {
	  
    if (($cur != 'null') && ($mastersupplier != '' ) && $purtype == 'PI'){
	   //$RowNum += 1;
		$ColumnNum = 6;
		
		$worksheet->setMerge($RowNum, $ColumnNum, $RowNum, $ColumnNum + 1);
		$worksheet->write($RowNum, $ColumnNum, "Total by group $displaycur", $grouplevel1Format);
		$ColumnNum += 2;
		$worksheet->writeNumber($RowNum, $ColumnNum, $SumGroupNetTot, $grouplevel1totalFormat);
		$ColumnNum += 1;
			
		$SumGroupNetTot = 0;
			
		//Increment the Rows Counter By 1 and Reset the Columns Counter
		$RowNum += 1;
		$ColumnNum = 0;
	}	

}
	
if ($cur != 'null' && $purtype == 'PI'){
	$RowNum += 1;
	$ColumnNum = 6;
	
	$worksheet->setMerge($RowNum, $ColumnNum, $RowNum, $ColumnNum + 1);
	$worksheet->write($RowNum, $ColumnNum, "Total ".$displaycur, $boldrightFormat);
	$ColumnNum += 2;
	$worksheet->writeNumber($RowNum, $ColumnNum, $SumNetTot, $boldrightFormatNum);
	$ColumnNum += 1;
	
}



function current_server_time($connection){

  $string="Select date_format(NOW(),'%Y-%m-%d %h:%i %p') ";
  $result=mysql_query($string,$connection) or die(mysql_error());
  $now=mysql_fetch_row($result);

  return $now;
}

function explodeword($date)
{

$trim = explode('/',$date);
$trim = "$trim[2]"."-"."$trim[1]"."-"."$trim[0]";
return $trim;
}



function GetSQLValueString($theValue, $theType) 
{
  $theValue = get_magic_quotes_gpc() ? stripslashes($theValue) : $theValue;

  $theValue = function_exists("mysql_real_escape_string") ? mysql_real_escape_string($theValue) : mysql_escape_string($theValue);

  switch ($theType) {
    case "text":
      $theValue = ($theValue != "") ? "'" . $theValue . "'" : "Null";
      break;    
    case "long":
    case "int":
      $theValue = ($theValue != "") ? intval($theValue) : "Null";
      break;
    case "double":
      $theValue = ($theValue != "") ? "'" . doubleval($theValue) . "'" : "Null";
      break;
    case "date":
      $theValue = ($theValue != "") ? "'" . $theValue . "'" : "Null";
      break;
  }
  return $theValue;
}



$workbook->close();

?>