<?
  include ("../common/public.php") ;

  if ($_POST["anno"] != "")
    $GLOBALS["anno"]  = $_POST["anno"] ;

	$dbt = new FC_SQL ;
  
  $annop = $anno - 1 ;
  $fattA  = "FATT_$anno" ;
  $fattAP = "FATT_$annop" ;

  $bottA  = "BOTT_$anno" ;
  $bottAP = "BOTT_$annop" ;

  /*********************
  * Per le bottiglie
  *********************/
  $qbott = "
    SELECT
	    TT.Nome,
	    SUM(TT.TotBott + TT.TotBottSM) as TotBott,
      SUM(TT.TotBottSM),
      SUM(TT.TotBottAP + TT.TotBottAPSM) as TotBottAP,
      SUM(TT.TotBottAPSM),
      TT.idfornitore
    FROM
    (
      SELECT
	      F.Nome,
	      SUM(D.ConfezioniDa*D.NumCartoni) as TotBott,
        0 as TotBottSM,
    	  0 as TotBottAP,
        0 as TotBottAPSM,
        O.idfornitore
      FROM
          `ordini` O
          inner join fornitori F on O.IdFornitore = F.IdFornitori
            Inner join dettagli D on O.IdOrdini = D.IdOrdine 
                                 and D.Anno = $anno
      WHERE
      	O.Anno = $anno
    	and O.DataSpedFattura > 0
    	-- and F.IdFornitori = 13
    group by O.IdFornitore
UNION ALL
SELECT
	F.Nome,
	    0 as TotBott,
        SUM(D.ConfezioniDa*D.NumCartoni) as TotBottSM,
    	0 as TotBottAP,
    	0 as TotBottAPSM,
        O.idfornitore
      FROM
          `ordini` O
          inner join fornitori F on O.IdFornitore = F.IdFornitori
            Inner join scontomerce D on O.IdOrdini = D.IdOrdine 
                                 and D.Anno = $anno
      WHERE
      	O.Anno = $anno
    	and O.DataSpedFattura > 0
		-- and F.IdFornitori = 13 and    
    group by O.IdFornitore
 UNION ALL
 SELECT
	F.Nome,
	    0 as TotBott,
        0 as TotBottSM,
	    SUM(D.ConfezioniDa*D.NumCartoni) as TotBottAP,
        0 as TotBottAPSM,
    	O.idfornitore
      FROM
          `ordini` O
          inner join fornitori F on O.IdFornitore = F.IdFornitori
            Inner join dettagli D on O.IdOrdini = D.IdOrdine 
                                 and D.Anno = $annop
      WHERE
      	O.Anno = $annop
    	and O.DataSpedFattura > 0
    	-- and F.IdFornitori = 13
    group by O.IdFornitore
UNION ALL
SELECT
	F.Nome,
	    0 as TotBott,
        0 as TotBottSM,
    	0 as TotBottAP,
        SUM(D.ConfezioniDa*D.NumCartoni) as TotBottAPSM,
        O.idfornitore
      FROM
          `ordini` O
          inner join fornitori F on O.IdFornitore = F.IdFornitori
            Inner join scontomerce D on O.IdOrdini = D.IdOrdine 
                                 and D.Anno = $annop
      WHERE
      	O.Anno = $annop
    	and O.DataSpedFattura > 0
		-- and F.IdFornitori = 13 and    
    group by O.IdFornitore

    ) as TT
GROUP BY TT.Nome
           " ;
  list($nbott, $dbott) = $dbt->RecuperaDati($qbott) ;

  /**************************************
  * Numero clienti serviti
  ***************************************/
  $qcli = "
SELECT
	TT.Anno,
    TT.IdFornitore as IdFornitore,
    TT.NomeFornitore as Nomefornitore,
    SUM(TT.NC) as NC,
    SUM(TT.NCAP) as NCAP
FROM
	(
SELECT
        O.Anno,
        O.IdFornitore,
        F.Nome as NomeFornitore,
     	COUNT(DISTINCT(O.idcliente)) as NC,
        0 as NCAP
      FROM
        ordini O
        	inner join fornitori F on O.IdFornitore = F.IdFornitori
      WHERE
          O.Anno = $anno
      GROUP BY O.IdFornitore
UNION ALL
SELECT
        O.Anno,
        O.IdFornitore,
        F.Nome as NomeFornitore,
        0 as NC,
        COUNT(DISTINCT(O.idcliente)) as NCAP
      FROM
        ordini O
        	inner join fornitori F on O.IdFornitore = F.IdFornitori
      WHERE
          O.Anno = $annop
      GROUP BY O.IdFornitore
        ) as TT
        GROUP BY TT.IdFornitore
        order By TT.NomeFornitore ASC          
        " ;

  list($ncli, $dcli) = $dbt->RecuperaDati($qcli) ;

  $query = "
        SELECT
          TT.NomeFornitore,
          TT.IdFornitore,
          SUM(TT.IOANNO) as $fattA,
          SUM(TT.IOANNOP) as $fattAP
      FROM 
        (
          SELECT DISTINCT
            F.nome AS NomeFornitore,
            F.idFornitori AS IdFornitore,
            SUM(O.ImportoFattura / 1.22) as IOANNO,
            0 as IOANNOP
          FROM
            ordini O
              INNER JOIN fornitori F ON F.IdFornitori = O.IdFornitore
          WHERE
            O.Anno = $anno 
            AND O.ImportoFattura > 0
          group by F.Nome
        UNION ALL
          SELECT DISTINCT
            F.nome AS NomeFornitore,
            F.idFornitori AS IdFornitore,
            0 as IOANNO,
            SUM(O.ImportoFattura / 1.22) as IOANNOP
          FROM
            ordini O 
              INNER JOIN fornitori F ON F.IdFornitori = O.IdFornitore
          WHERE
            O.Anno = $annop
            AND O.ImportoFattura > 0
          group by F.Nome
        ) as TT
        group By TT.NomeFornitore  
        ORDER BY `TT`.`NomeFornitore` ASC
           " ;

  list($n, $d) = $db->RecuperaDati($query) ;

  $str = "<rows>" ;

  for ($i=0; $i<$n; $i++)
  {
    $idFor = $d['IdFornitore'][$i] ;
    $diffFatt = $d[$fattAP][$i] - $d[$fattA][$i] ;
    if ($diffFatt != 0 and $d[$fattAP][$i] != "0.000000")
    {
		  $diffFattper = @nfeExt((($diffFatt / $d[$fattAP][$i]) * 100) * -1) ;
		  $arrTotali[5] += ($diffFatt / $d[$fattAP][$i]) * 100 ;
    }
    else 
		  $diffFattper = @nfeExt(0) ;
    		
    if ($diffFatt <= 0)
    {
			$classFatt = "piu" ;
			if ($diffFattper == "0,00000")
				$diffFattper = "100,000000" ;
		}
    elseif ($diffFatt > 0)
		{
			$classFatt = "meno" ;
			if ($diffFattper == "0,00000")
				$diffFattper = "100,000000" ;
		}
		else
			$classFatt = "" ;
    
    
    $diffBott = $dbott['TotBottAP'][$i] - $dbott['TotBott'][$i] ;
    if ($diffBott != 0 and $dbott['TotBottAP'][$i] != 0)
		  $diffBottper = @nfeExt((($diffBott / $dbott['TotBottAP'][$i]) * 100) * -1);
		else 
		  $diffBottper = @nfeExt(0) ;
    		
    if ($diffBott <= 0)
    {
			$classBott = "piu" ;
			if ($diffBottper == "0,00000")
				$diffBottper = "100,00000" ;
		}
    elseif ($diffBott > 0)
		{
			$classBott = "meno" ;
			if ($diffBottper == "0,00000")
				$diffBottper = "100,00000" ;
		}
		else
			$classBott = "" ;
    
    $diffCli = $dcli['NCAP'][$i] - $dcli['NC'][$i] ;
    if ($diffCli != 0 and $dcli['NCAP'][$i] != 0)
		  $diffCliper = @nfeExt((($diffCli / $dcli['NCAP'][$i]) * 100) * -1);
		else 
		  $diffCliper = @nfeExt(0) ;
    		
    if ($diffCli <= 0)
    {
			$classCli = "piu" ;
			if ($diffCliper == "0,00000")
				$diffCliper = "100,00000" ;
		}
    elseif ($diffCli > 0)
		{
			$classCli = "meno" ;
			if ($diffCliper == "0,00000")
				$diffCliper = "100,00000" ;
		}
		else
			$classCli = "" ;

    $totBott = $totBottAP = $pmA = $pmAP = 0 ;
    $dBPerc = "0,00000" ;
    $ind = -1 ;
    
    $totCli = $totCliAP = 0 ;
    $dCPerc = "0,00000" ;
    $indCli = -1 ;
 
    $fattCA = $fattCAP = 0 ;
    $ind    = array_search($idFor, $dbott['idfornitore']) ;
    $indCli = array_search($idFor, $dcli['IdFornitore']) ;
    
    if ($ind > -1)
    {
      $totBott   = $dbott['TotBott'][$ind] ;
      $totBottAP = $dbott['TotBottAP'][$ind] ;
      $dBPerc    = $diffBottper ; 
    }
    if ($indCli > -1)
    {
      $totCli   = $dcli['NC'][$indCli] ;
      $totCliAP = $dcli['NCAP'][$indCli] ;
      $dCPerc    = $diffCliper ; 
    }
    if ($totBott > 0)
    {
      $pmA = $d[$fattA][$i] / $totBott ;
      $fattCA = $d[$fattA][$i] / $totCli ;
    }

    if ($totBottAP > 0)    
    {
      $pmAP = $d[$fattAP][$i] / $totBottAP ;
      $fattCAP = $d[$fattAP][$i] / $totCliAP ;
    }

    $diffPM = $pmAP - $pmA ;
    if ($diffPM != 0 and $pmAP != 0)
		  $diffPMper = @nfeExt((($diffPM / $pmAP) * 100) * -1) ;
		else 
		  $diffPMper = @nfeExt(0) ;
    
    if ($diffPM <= 0)
    {
			$classPM = "piu" ;
			if ($diffPMper == "0,00000")
				$diffPMper = "100,00000" ;
		}
    elseif ($diffPM > 0)
		{
			$classPM = "meno" ;
			if ($diffPMper == "0,00000")
				$diffPMper = "100,00000" ;
		}
		else
			$classPM = "" ;

    $diffFC = $fattCAP - $fattCA ;
    if ($diffFC != 0 and $fattCAP != 0)
		  $diffFCper = @nfeExt((($diffFC / $fattCAP) * 100) * -1) ;
		else 
		  $diffFCper = @nfeExt(0) ;
    
    if ($diffFC <= 0)
    {
			$classFC = "piu" ;
			if ($diffFCper == "0,00000")
				$diffFCper = "100,00000" ;
		}
    elseif ($diffFC > 0)
		{
			$classFC = "meno" ;
			if ($diffFCper == "0,00000")
				$diffFCper = "100,00000" ;
		}
		else
			$classFC = "" ;

		$str .= "<row id='" . $d['IdFornitore'][$i] . "'><cell>" . htmlspecialchars($d['NomeFornitore'][$i]) . "</cell><cell>" . nfp($d[$fattA][$i]) . "</cell><cell>" . nfp($d[$fattAP][$i]) . "</cell><cell class='$classFatt'>$diffFattper</cell><cell></cell><cell>" . nfl($totBott) . "</cell><cell>" . nfl($totBottAP) . "</cell><cell class='$classBott'>$dBPerc</cell><cell></cell><cell>" . nfp($pmA) . "</cell><cell>" . nfp($pmAP) . "</cell><cell class='$classPM'>$diffPMper</cell><cell></cell><cell>$totCli</cell><cell>$totCliAP</cell><cell class='$classCli'>$dCPerc</cell><cell></cell><cell>" . nfp($fattCA) . "</cell><cell>" . nfp($fattCAP) . "</cell><cell class='$classFC'>$diffFCper</cell></row>" ;
	}

	$str .= "</rows>" ;

  $headerOne   = "NOME FORNITORE,FATTURATO,#cspan,#cspan,,BOTTIGLIE,#cspan,#cspan,#cspan,PREZZO MEDIO,#cspan,#cspan,#cspan,CLIENTI SERVITI,#cspan,#cspan,#cspan,FATTURATO PER CLIENTE,#cspan,#cspan" ;
	
	$header      = "#rspan,$anno,$annop, DIFF %,,$anno,$annop,DIFF %,,$anno,$annop,DIFF %,,$anno,$annop,DIFF %,,$anno,$annop,DIFF %" ;
  $strSort     = "str,euro,euro,int,na,int,int,int,na,int,int,int,na,int,int,int,na,euro,euro,int" ;
  $iniWP       = "30,7,7,6,1,5,5,6,1,4,4,6,1,4,4,6,1,6,6,6" ;
  $setColType  = "ro,ro,ro,ro,ro,ro,ro,ro,ro,ro,ro,ro,ro,ro,ro,ro,ro,ro,ro,ro" ;
  $setColAlign = "left,right,right,right,center,right,right,right,center,right,right,right,center,right,right,right,center,right,right,right" ;
?>
<html>
<head>
<title><? echo TITLE ?></title>
<meta http-equiv="expires" content="Fri, 5 Apr 1996 23:59:59 GMT">
</head>
<link rel="stylesheet" href="../common/mystyle.css" type="text/css">
<link rel="stylesheet" type="text/css" href="../common/stili.css">
<link rel="stylesheet" type="text/css" href="../common/stilisv.css">
<link rel="stylesheet" type="text/css" href="../common/need_in_Grid.css">
<style>
div.gridbox table.obj td.meno {
  color: red ;
	}
div.gridbox table.obj td.piu {
  color: #33CC00 ;
	}
</style>

<script language="JavaScript" src="../common/func_javascript.js"></script>

<script language="JavaScript" src="../new_js/dhtmlXCommon.js"></script>
<script language="JavaScript" src="../new_js/dhtmlxgrid.js"></script>
<script language="JavaScript" src="../new_js/dhtmlXGrid_srnd.js"></script>
<script language="JavaScript" src="../new_js/dhtmlXGridCell.js"></script>
<script language="JavaScript" src="../js/dhtmlXgrid_split.js"></script>
<script language="JavaScript" src="../new_js/dhtmlxgrid_deprecated.js"></script>
<script language="JavaScript" src="../new_js/dhtmlXGrid_filter.js"></script>

<SCRIPT LANGUAGE="JavaScript">
<!--
parent.sei_in_anno.innerHTML = "Anno " + <? echo $GLOBALS["anno"] ?> ;
parent.sei_in.innerHTML = "Sei in: FORNITORI >> Statistiche >> Totali" ;

var str = "<? echo $str ?>" ;
var id_for = 0 ;
var strIdRow = '' ;
var arrIdRow = new Array() ;

<?
  if ($colToSort != null)
  {
?>
window.s_col = <? echo $colToSort ?> ;
window.a_direction = "<? echo $direction ?>" ;
<?
  }
  else
  {
?>
window.s_col = 0 ;
window.a_direction = "asc" ;
<?
  }
?>

function doOnLoad() 
{
  mygrid = new dhtmlXGridObject('gridbox') ;
  mygrid.setImagePath("../imgs/");
	mygrid.selMultiRows = true ;
	mygrid.imgURL = "../imgs/" ;
  mygrid.setHeader("<? echo $headerOne ?>") ;
	mygrid.attachHeader("<? echo $header ?>") ;

  mygrid.setInitWidthsP("<? echo $iniWP ?>") ;
	mygrid.setColTypes("<? echo $setColType ?>");
 	mygrid.setColAlign("<? echo $setColAlign ?>");

  mygrid.setColSorting("<? echo $strSort ?>") ;

  if (mygrid.setOnColumnSort)
    mygrid.setOnColumnSort(customColumnSort) ;

  mygrid.setOnRowSelectHandler(doOnRowSelected) ;

  mygrid.enableColumnAutoSize(true) ;
 
  mygrid.init();

  mygrid.parse(str) ;

  mygrid.setSortImgState(true,window.s_col,window.a_direction); 
  mygrid.sortRows(window.s_col,"",window.a_direction) ;

<? if (isset($cur_id) and ($cur_id != '')) { ?>
  mygrid.showRow('<? echo $cur_id ?>') ;
  mygrid.setSelectedRow('<? echo $cur_id ?>', '', true, false) ;
  id_for = '<? echo $cur_id ?>' ;
<? } ?>
  
  mygrid.attachEvent("onRowDblClicked", function(rId,cInd){
	  var f = document.forms.lista_ordini ;
    var a_state = mygrid.getSortingState() ;
    f.fornitore.value = rId ;
    f.colToSort.value = a_state[0];
    f.direction.value = a_state[1] ;
    f.submit() ;
    return ;
  }) ;

  return true;
}

function doOnRowSelected(id) {
  id_for = id ;
  return ;
}

function customColumnSort(ind)
{
  return true;
}

function ListaOrdini()
{
	var f = document.forms.lista_ordini ;
	if (id_for == 0)
	{
		alert ('Nessun Fornitore selezionato') ;
		return false ;
	}
	f.fornitore.value = id_for ;
	f.submit() ;
	return true ;
}

function Stampa()
{
	alert ('Funzione ancora non disponibile') ;
  return true ;
}
//-->
</SCRIPT>
<body  topmargin="0" vlink="#336633" marginheight="0" bgcolor="#ffffaa" leftmargin="0" link="#006600" marginwidth="0" onload="doOnLoad(); CalcolaAltezzaDiv('gridbox')">

<!--************************** linea tab *****************************-->
<div id="linea_tab">
<table cellspacing="0">
  <tr>
    <td width="2%" class="onlybottom">&nbsp;</td>
    <td width="20%" class="btm_prj_no_sel" Onclick="parent.LoadIFrameContent(9)">Ordini per Fornitore</td>
    <td width="20%" class="btm_prj_no_sel" Onclick="parent.LoadIFrameContent(10)">Ordini per Fornitore per Mese</td>
    <td width="20%" class="btm_prj_sel">Totali</td>
    <td class="onlybottom">&nbsp;</td>
  </tr>
</table>
</div>

<!--************************** bottoni azione ***************************************-->
<div id="actions">
	<input type="button" class="input" onclick="Stampa()" value="Stampa">
</div>

<div class="par_space">
	<span class="lbl8l dx_spaz">Numero Fornitori: <FONT SIZE="-1" COLOR="red"><B><? echo $totfornitori ?></B></FONT></span>
	<span class="lbl8l dx_spaz"><I>(per selezionare un fornitore clicca sulla riga corrispondente)</I></span> 
</div>
<div id="gridbox" height="82%"></div>

<FORM METHOD=POST ACTION="./totfornitori.php" name="lista_ordini">
	<INPUT TYPE="hidden" NAME="fornitore" value="">
	<INPUT TYPE="hidden" NAME="colToSort" value="">
	<INPUT TYPE="hidden" NAME="direction" value="">
	<INPUT TYPE="hidden" NAME="from" value="statistiche">
</FORM>

<FORM METHOD=POST name="stampaStatistiche" ACTION="./StampaStatistiche.php"  target="_blank">
  <input type="hidden" name="colToSort" value="">
  <input type="hidden" name="dirToSort" value="">
</FORM>

</body>
</html>