<?
  /**********************
  * VERSIONE 3.0 READY
  **********************/
  include "../common/public.php" ;

  // print_r($_GET + $_POST) ; // exit ;

	$arrVal = array() ;
	
	$my_idforni = $hidforni ;
  
	$hidforni = substr($hidforni, 0, strlen($hidforni) -1) ;
  $tmp = explode(",", $hidforni) ;

  /* NON SERVE PIU'
  $query = "select * from $tclienti where idclienti = $idcliente" ;
  $db->query($query) ;
  while($db->next_record())
    $nomecliente = stripslashes($db->f("Nome")) ;
  */

  for ($i=0; $i<count($tmp); $i++)
  {
    $id = $tmp[$i] ;
    $query = "select * from fornitori where idfornitori = $id" ;
    $db->query($query) ;
    while($db->next_record())
    {
      $arrIdFornitori[]   = $id ;
      $arrNomeFornitori[] = $db->f("Nome") ;
    }
  }
  @array_multisort($arrNomeFornitori, SORT_STRING, SORT_ASC, $arrIdFornitori) ;
  $nomeFornitore = stripslashes($arrNomeFornitori[0]) ;

  /*************************************************************************
  * Dopo aver eventualmente inserito le programmazioni non ancora definite
  * recupero tutti i dati di programmazione del cliente scelto rispetto alle
  * aziende scelte e le visualizzo
  ***************************************************************************/
  $anno1 = $anno - 1 ;
  $anno2 = $anno - 2 ;
  $anno3 = $anno - 3 ;

  $tanno3 = false ;
  $tanno2 = false ;
  $tanno1 = false ;

  /**********************************************************************
  * PRIMA:
  * Controllo se esistono le tabelle degli anni precedenti
  * ADESSO (3.0): la tabella dei prodotti è unica
  ***********************************************************************
  $tables = mysql_list_tables($db_azienda); // db_azienda definito in ../common/public.php
  $num_tables = @mysql_numrows($tables);

  $i = 0 ;
  while($i < $num_tables)
  { 
    $table = mysql_tablename($tables, $i) ;
    if ($table == "prodotti_$anno3")
      $tanno3 = true ;
    elseif ($table == "prodotti_$anno2")
      $tanno2 = true ;
    elseif ($table == "prodotti_$anno1")
      $tanno1 = true ;
    $i ++ ;
  }
	  */
  $tanno3 = true ;
  $tanno2 = true ;
  $tanno1 = true ;

	for ($j=0; $j < count($arrIdFornitori); $j++)
  {
    $idforni = $arrIdFornitori[$j] ;
		
		if ($idforni == $idsarzi)
		{
      if ($tanno3)
      {
				$query3 = "
						select
							'Sarzi Amadè'               as NomeFornitore,
						  CONCAT('dt^', 'SA', P.idprodotti) as IdProdotto,
							P.Nome                      as NomeProdotto,
							MONTH(O.dataOrdine)         as Mese,
							YEAR(O.dataOrdine)          as Anno,
							SUM((D.numcartoni * D.confezionida)) as NumBottiglie
						from 
							ordini_$anno3 O
								inner join 	dettagli_$anno3 D on D.idordine = O.idordini
									inner join sarzi_$anno3 P on CONCAT('SA', P.idprodotti) = D.idprodotto
								inner join fornitori_$anno3 F on F.idfornitori = O.idfornitore
						where 
							O.idcliente = $idcliente
						group by
							F.nome,
							P.nome,
							Mese
					
					Union

						select
							'Sarzi Amadè'               as NomeFornitore,
						  CONCAT('sm^', 'SA', P.idprodotti) as IdProdotto,
							CONCAT(P.Nome, ' (Sconto Merce)')      as NomeProdotto,
							MONTH(O.dataOrdine)         as Mese,
							YEAR(O.dataOrdine)          as Anno,
							SUM((D.numcartoni * D.confezionida)) as NumBottiglie
						from 
							ordini_$anno3 O
								inner join 	scontomerce_$anno3 D on D.idordine = O.idordini
									inner join sarzi_$anno3 P on CONCAT('SA', P.idprodotti) = D.idprodotto
								inner join fornitori_$anno3 F on F.idfornitori = O.idfornitore
						where 
							O.idcliente = $idcliente
						group by
							F.nome,
							P.nome,
							Mese
					
					Union
									" ;				
      }
			else
				$query3 = "" ;
			
      if ($tanno2)
      {
				$query2 = "
						select
							'Sarzi Amadè'               as NomeFornitore,
						  CONCAT('dt^', 'SA', P.idprodotti) as IdProdotto,
							P.Nome                      as NomeProdotto,
							MONTH(O.dataOrdine)         as Mese,
							YEAR(O.dataOrdine)          as Anno,
							SUM((D.numcartoni * D.confezionida)) as NumBottiglie
						from 
							ordini_$anno2 O
								inner join 	dettagli_$anno2 D on D.idordine = O.idordini
									inner join sarzi_$anno2 P on CONCAT('SA', P.idprodotti) = D.idprodotto
								inner join fornitori_$anno2 F on F.idfornitori = O.idfornitore
						where 
							O.idcliente = $idcliente
						group by
							F.nome,
							P.nome,
							Mese
					
					Union

						select
							'Sarzi Amadè'               as NomeFornitore,
						  CONCAT('sm^', 'SA', P.idprodotti) as IdProdotto,
							CONCAT(P.Nome, ' (Sconto Merce)')      as NomeProdotto,
							MONTH(O.dataOrdine)         as Mese,
							YEAR(O.dataOrdine)          as Anno,
							SUM((D.numcartoni * D.confezionida)) as NumBottiglie
						from 
							ordini_$anno2 O
								inner join 	scontomerce_$anno2 D on D.idordine = O.idordini
									inner join sarzi_$anno2 P on CONCAT('SA', P.idprodotti) = D.idprodotto
								inner join fornitori_$anno2 F on F.idfornitori = O.idfornitore
						where 
							O.idcliente = $idcliente
						group by
							F.nome,
							P.nome,
							Mese
					
					Union
									" ;				
      }
			else
				$query2 = "" ;

      if ($tanno1)
      {
				$query1 = "
						select
							'Sarzi Amadè'               as NomeFornitore,
						  CONCAT('dt^', 'SA', P.idprodotti) as IdProdotto,
							P.Nome                      as NomeProdotto,
							MONTH(O.dataOrdine)         as Mese,
							YEAR(O.dataOrdine)          as Anno,
							SUM((D.numcartoni * D.confezionida)) as NumBottiglie
						from 
							ordini_$anno1 O
								inner join 	dettagli_$anno1 D on D.idordine = O.idordini
									inner join sarzi_$anno1 P on CONCAT('SA', P.idprodotti) = D.idprodotto
								inner join fornitori_$anno1 F on F.idfornitori = O.idfornitore
						where 
							O.idcliente = $idcliente
						group by
							F.nome,
							P.nome,
							Mese
					
					Union

						select
							'Sarzi Amadè'               as NomeFornitore,
						  CONCAT('sm^', 'SA', P.idprodotti) as IdProdotto,
							CONCAT(P.Nome, ' (Sconto Merce)')      as NomeProdotto,
							MONTH(O.dataOrdine)         as Mese,
							YEAR(O.dataOrdine)          as Anno,
							SUM((D.numcartoni * D.confezionida)) as NumBottiglie
						from 
							ordini_$anno1 O
								inner join 	scontomerce_$anno1 D on D.idordine = O.idordini
									inner join sarzi_$anno1 P on CONCAT('SA', P.idprodotti) = D.idprodotto
								inner join fornitori_$anno1 F on F.idfornitori = O.idfornitore
						where 
							O.idcliente = $idcliente
						group by
							F.nome,
							P.nome,
							Mese
					
					Union
									" ;				
      }
			else
				$query1 = "" ;

			$query = "
					select
						'Sarzi Amadè'               as NomeFornitore,
						CONCAT('dt^', 'SA', P.idprodotti) as IdProdotto,
						P.Nome                      as NomeProdotto,
						MONTH(O.dataOrdine)         as Mese,
						YEAR(O.dataOrdine)          as Anno,
						SUM((D.numcartoni * D.confezionida)) as NumBottiglie
					from 
						ordini_$anno O
							inner join 	dettagli_$anno D on D.idordine = O.idordini
								inner join sarzi_$anno P on CONCAT('SA', P.idprodotti) = D.idprodotto 
							inner join fornitori_$anno F on F.idfornitori = O.idfornitore
					where 
						O.idcliente = $idcliente
					group by
						F.nome,
						P.nome,
						Mese
				
				Union
					
					select
						'Sarzi Amadè'               as NomeFornitore,
						CONCAT('sm^', 'SA', P.idprodotti) as IdProdotto,
						CONCAT(P.Nome, ' (Sconto Merce)')      as NomeProdotto,
						MONTH(O.dataOrdine)         as Mese,
						YEAR(O.dataOrdine)          as Anno,
						SUM((D.numcartoni * D.confezionida)) as NumBottiglie
					from 
						ordini_$anno O
							inner join 	scontomerce_$anno D on D.idordine = O.idordini
								inner join sarzi_$anno P on CONCAT('SA', P.idprodotti) = D.idprodotto
							inner join fornitori_$anno F on F.idfornitori = O.idfornitore
					where 
						O.idcliente = $idcliente
					group by
						F.nome,
						P.nome,
						Mese
								" ;
		}
		else
    {
      if ($tanno3)
      {
				$query3 = "
						select
							C.Nome                      as NomeCliente,
						  'dt'                        as IdProdotto,
							P.Nome                      as NomeProdotto,
							MONTH(O.dataOrdine)         as Mese,
							YEAR(O.dataOrdine)          as Anno,
							SUM((D.numcartoni * D.confezionida)) as NumBottiglie
						from 
							ordini O
								inner join 	dettagli D on D.idordine = O.idordini and
                                          D.Anno     = $anno3
									inner join prodotti P on P.idprodotti = D.idprodotto and 
																					 P.fornitore  = $idforni 
								inner join clienti C on C.idclienti = O.idcliente
						where 
              O.Anno        = $anno3   and
							O.idfornitore = $idforni and
              O.idcliente   = $IdCliente 
						group by
							C.nome,
							P.nome,
							Mese
					
					Union

						select
							C.Nome                      as NomeCliente,
						  'sm'                        as IdProdotto,
							P.Nome                      as NomeProdotto,
							MONTH(O.dataOrdine)         as Mese,
							YEAR(O.dataOrdine)          as Anno,
							SUM((D.numcartoni * D.confezionida)) as NumBottiglie
						from 
							ordini O
								inner join scontomerce D on D.idordine = O.idordini and
                                            D.Anno = $anno3
									inner join prodotti P on P.idprodotti = D.idprodotto and 
																					 P.fornitore  = $idforni 
								inner join clienti C on C.idclienti = O.idcliente
						where 
              O.Anno        = $anno3   and
							O.idfornitore = $idforni and
              O.idcliente   = $IdCliente
						group by
							C.nome,
							P.nome,
							Mese
					
					Union
									" ;				
      }
			else
				$query3 = "" ;
      /**************************************************************************
      * mi calcolo i valori dell' anno2 se la tabella dei prodotti_$anno2 esiste
      **************************************************************************/
      if ($tanno2)
      {
				$query2 = "
						select
							C.Nome                      as NomeCliente,
						  'dt'                        as IdProdotto,
							P.Nome                      as NomeProdotto,
							MONTH(O.dataOrdine)         as Mese,
							YEAR(O.dataOrdine)          as Anno,
							SUM((D.numcartoni * D.confezionida)) as NumBottiglie
						from 
							ordini O
								inner join 	dettagli D on D.idordine = O.idordini and
                                          D.Anno     = $anno2
									inner join prodotti P on P.idprodotti = D.idprodotto and 
																					 P.fornitore  = $idforni 
								inner join clienti C on C.idclienti = O.idcliente
						where 
              O.Anno        = $anno2   and
							O.idfornitore = $idforni and
              O.idcliente   = $IdCliente
						group by
							C.nome,
							P.nome,
							Mese

				Union
						
						select
							C.Nome                      as NomeCliente,
						  'sm'                        as IdProdotto,
							P.Nome                      as NomeProdotto,
							MONTH(O.dataOrdine)         as Mese,
							YEAR(O.dataOrdine)          as Anno,
							SUM((D.numcartoni * D.confezionida)) as NumBottiglie
						from 
							ordini O
								inner join 	scontomerce D on D.idordine = O.idordini and
                                             D.Anno     = $anno2
									inner join prodotti P on P.idprodotti = D.idprodotto and 
																					 P.fornitore  = $idforni 
								inner join clienti C on C.idclienti = O.idcliente
						where 
              O.Anno        = $anno2   and
							O.idfornitore = $idforni and
              O.idcliente   = $IdCliente
						group by
							C.nome,
							P.nome,
							Mese

				Union
									" ;
      }
			else
				$query2 = "" ;

      /***********************************************************************
      * mi calcolo i valori dell' anno1 se la tabella prodotti_$anno1 esiste
      ************************************************************************/
      if ($tanno1)
      {
				$query1 = "
						select
							C.Nome                      as NomeCliente,
						  'dt'                        as IdProdotto,
							P.Nome                      as NomeProdotto,
							MONTH(O.dataOrdine)         as Mese,
							YEAR(O.dataOrdine)          as Anno,
							SUM((D.numcartoni * D.confezionida)) as NumBottiglie
						from 
							ordini O
								inner join 	dettagli D on D.idordine = O.idordini and
                                          D.Anno     = $anno1
									inner join prodotti P on P.idprodotti = D.idprodotto and 
																					 P.fornitore  = $idforni 
								inner join clienti C on C.idclienti = O.idcliente
						where 
              O.Anno        = $anno1   and
							O.idfornitore = $idforni and
              O.idcliente   = $IdCliente
						group by
							C.nome,
							P.nome,
							Mese
					
					Union

						select
							C.Nome                      as NomeCliente,
						  'sm'                        as IdProdotto,
							P.Nome                      as NomeProdotto,
							MONTH(O.dataOrdine)         as Mese,
							YEAR(O.dataOrdine)          as Anno,
							SUM((D.numcartoni * D.confezionida)) as NumBottiglie
						from 
							ordini O
								inner join 	scontomerce D on D.idordine = O.idordini and
                                             D.Anno     = $anno1
									inner join prodotti P on P.idprodotti = D.idprodotto and 
																					 P.fornitore  = $idforni 
								inner join clienti C on C.idclienti = O.idcliente
						where 
              O.Anno        = $anno1   and
							O.idfornitore = $idforni and
              O.idcliente   = $IdCliente
						group by
							C.nome,
							P.nome,
							Mese
					
					Union
									" ;
			}
			else
				$query1 = "" ;

			/************************************
			* sicuramente l'anno in corso esiste
			************************************/
			$query = "
					select
						C.Nome                      as NomeCliente,
						'dt'                        as IdProdotto,
						P.Nome                      as NomeProdotto,
						MONTH(O.dataOrdine)         as Mese,
						YEAR(O.dataOrdine)          as Anno,
						SUM((D.numcartoni * D.confezionida)) as NumBottiglie
					from 
						ordini O
							inner join 	dettagli D on D.idordine = O.idordini and
                                        D.Anno     = $anno
								inner join prodotti P on P.idprodotti = D.idprodotto and 
																								P.fornitore  = $idforni 
							inner join clienti C on C.idclienti = O.idcliente
					where 
            O.Anno        = $anno    and
					  O.idfornitore = $idforni and
            O.idcliente   = $IdCliente
					group by
						C.nome,
						P.nome,
						Mese
				
				Union
					
					select
						C.Nome                      as NomeCliente,
						'sm'                        as IdProdotto,
						P.Nome                      as NomeProdotto,
						MONTH(O.dataOrdine)         as Mese,
						YEAR(O.dataOrdine)          as Anno,
						SUM((D.numcartoni * D.confezionida)) as NumBottiglie
					from 
						ordini O
							inner join 	scontomerce D on D.idordine = O.idordini and
                                           D.Anno     = $anno
								inner join prodotti P on P.idprodotti = D.idprodotto and 
																				 P.fornitore  = $idforni 
							inner join clienti C on C.idclienti = O.idcliente
					where 
            O.Anno        = $anno    and
						O.idfornitore = $idforni and
            O.idcliente   = $IdCliente
					group by
						C.nome,
						P.nome,
						Mese
								" ;
		}

		$qfin = "
				$query3
				$query2
				$query1
				$query
			order by
				NomeProdotto
				" ;
    
    debug (0, $qfin) ;

		list($n, $d) = $db->RecuperaDati($qfin) ;
		for($i=0; $i<$n; $i++)
		{
			$nf = $d['NomeCliente'][$i] ;
			$ip = $d['IdProdotto'][$i] ;
			$np = $d['NomeProdotto'][$i] ;
			$nb = $d['NumBottiglie'][$i] ;
			$me = $d['Mese'][$i] ;
			$an = $d['Anno'][$i] ;
			
			debug (0, "$nf ; $np ; $an ; $me ; $nb") ;
			if ($nf != "")
			{
				if (! array_key_exists($nf, $arrVal))
					$arrVal[$nf] = array() ;
				
				if (! array_key_exists($np, $arrVal[$nf]))
					$arrVal[$nf][$np] = array() ;
					
				$arrVal[$nf][$np][$an][$ip]['totale'] += $nb ;

				if (! array_key_exists($me, $arrVal[$nf][$np]))
					$arrVal[$nf][$np][$me] = array() ;
			
				$arrVal[$nf][$np][$me][$an][$ip] = $nb ;
			}
		}
	}
	// print_r($arrVal) ; exit ;
	

?>
<html>
<head>
<title><? echo TITLE ?></title>
<meta http-equiv="expires" content="Fri, 5 Apr 1996 23:59:59 GMT">
</head>
<link rel="stylesheet" type="text/css" href="../common/mystyle.css">
<link rel="stylesheet" type="text/css" href="../common/stili.css">
<link rel="stylesheet" type="text/css" href="../common/stilisv.css">
<style>
.green {
	color:green ;
}
.border_top 
{
	border-top:   1px solid black ;
	border-right: 1px solid black ;
	width:        2% ;
}
.only_border_top 
{
	border-top:   1px solid black ;
}

.red 
{
	color: red ;
}

.blue 
{
	color: blue ;
}

.bold 
{
	font-weight: bold ;
}

</style>

<script language="JavaScript" src="../common/func_javascript.js"></script>


<body  topmargin="0" vlink="#336633" marginheight="0" bgcolor="#FFFFFF" leftmargin="0" link="#006600" marginwidth="0">
<table width="670" border="0" cellpadding="0" cellspacing="0">
  <tr>
    <td width="100%"><IMG SRC="../images/Logo1.gif" WIDTH="200" HEIGHT="80" BORDER=0 ALT=""></td>
  </tr>
  <tr>
    <td><hr color="black" size="1"></td> 
  </tr>
  <tr>
    <td align="center" width="100%"><font class="ordine10">Report Prodotti del Fornitore <? echo $nomeFornitore ?> </font></td>
  </tr>
</table>

<table width="670" border="0" cellpadding="0" cellspacing="2">
<?
	@reset($arrVal) ;
	foreach($arrVal as $nf => $arrNf)
	{
		foreach($arrNf as $np => $arrPr)
		{
?>
	<tr bgcolor="black">
		<td class="etidettaglin" align="center">Cliente</td>
		<td class="etidettaglin" align="center">Prodotto</td>
		<td class="etidettaglin" align="center"><? echo $anno3 ?></td>
		<td class="etidettaglin" align="center"><? echo $anno2 ?></td>
		<td class="etidettaglin" align="center"><? echo $anno1 ?></td>
		<td class="etidettaglin" align="center"><? echo $anno ?></td>
	</tr>
	<tr>  
		<td class="datiordini8"><? echo $nf ?></td>
		<td class="datiordini8 red bold"><? echo $np ?></td>
<?
			for($ann = $anno3 ; $ann <= $anno; $ann ++)
			{
				if (array_key_exists($ann, $arrPr))
				{
					$tot = $arrPr[$ann]['dt']['totale'] ;
					if (array_key_exists('sm', $arrPr[$ann]))
						$tot .= " ({$arrPr[$ann]['sm']['totale']})" ;
?>
		<td class="datiordini8"><? echo $tot ?></td>
<?
				}
				else
				{
?>
		<td class="datiordini8">&nbsp;</td>
<?
				}
			}
?>
	</tr>
<?
			$tot_anno1_dt = $arrPr[$anno1]['dt']['totale'] ;
			$tot_anno1_sm = $arrPr[$anno1]['sm']['totale'] ;
			$tot_anno_dt  = $arrPr[$anno]['dt']['totale'] ;
			$tot_anno_sm  = $arrPr[$anno]['sm']['totale'] ;
						
			if ( ($tot_anno1_dt > 0) or ($tot_anno1_sm > 0) or ($tot_anno_dt > 0) or ($tot_anno_sm > 0))
			{
?>
	<tr>
		<td align="center" colspan="6">
			<table border="0" width="100%" cellspacing="0" cellpadding="0">
				<tr>
					<td class="datiordini8 border_top"><nobr>&nbsp;<nobr></td>
					<td class="datiordini8 border_top" colspan="1">GEN</td>
					<td class="datiordini8 border_top" colspan="1">FEB</td>
					<td class="datiordini8 border_top" colspan="1">MAR</td>
					<td class="datiordini8 border_top" colspan="1">APR</td>
					<td class="datiordini8 border_top" colspan="1">MAG</td>
					<td class="datiordini8 border_top" colspan="1">GIU</td>
					<td class="datiordini8 border_top" colspan="1">LUG</td>
					<td class="datiordini8 border_top" colspan="1">AGO</td>
					<td class="datiordini8 border_top" colspan="1">SET</td>
					<td class="datiordini8 border_top" colspan="1">OTT</td>
					<td class="datiordini8 border_top" colspan="1">NOV</td>
					<td class="datiordini8 border_top" colspan="1">DIC</td>
					<td class="datiordini8 border_top bold" colspan="1">TOT</td>
				</tr>
<?
				if ($tot_anno1_dt > 0 or $tot_anno1_sm > 0)
				{
?>
				<tr>
					<td class="datiordini8 border_top green"><? echo $anno1 ?></td>
<?
				for ($m = 1 ; $m < 13; $m ++)
				{
					if (array_key_exists($m, $arrPr))
					{
						if (array_key_exists($anno1, $arrPr[$m]))
						{
							$tot = $arrPr[$m][$anno1]['dt'] ;
								if (array_key_exists('sm', $arrPr[$m][$anno1]))
									$tot .= " ({$arrPr[$m][$anno1]['sm']})"
?>
					<td class="datiordini8 border_top green"><? echo $tot ?></td>
<?
						}
						else
						{
?>
					<td class="datiordini8 border_top">&nbsp;</td>
<?
						}
					}
					else
					{
?>
					<td class="datiordini8 border_top">&nbsp;</td>
<?
					}
				}
				
				$tot = $arrPr[$anno1]['dt']['totale'] ;
				if (array_key_exists('sm', $arrPr[$anno1]))
					$tot .= " ({$arrPr[$anno1]['sm']['totale']})" ;
?>
					<td class="datiordini8 border_top green bold"><? echo $tot ?></td>
				</tr>
<?
				}

				if ($tot_anno_dt > 0 or $tot_anno_sm > 0)
				{
?>
				<tr>
					<td class="datiordini8 border_top blue"><? echo $anno ?></td>
<?
				for ($m = 1 ; $m < 13; $m ++)
				{
					if (array_key_exists($m, $arrPr))
					{
						if (array_key_exists($anno, $arrPr[$m]))
						{
							$tot = $arrPr[$m][$anno]['dt'] ;
								if (array_key_exists('sm', $arrPr[$m][$anno]))
									$tot .= " ({$arrPr[$m][$anno]['sm']})"
?>
					<td class="datiordini8 border_top blue"><? echo $tot ?></td>
<?
						}
						else
						{
?>
					<td class="datiordini8 border_top">&nbsp;</td>
<?
						}
					}
					else
					{
?>
					<td class="datiordini8 border_top">&nbsp;</td>
<?
					}
				}

				$tot = $arrPr[$anno]['dt']['totale'] ;
				if (array_key_exists('sm', $arrPr[$anno]))
					$tot .= " ({$arrPr[$anno]['sm']['totale']})" ;
?>
					<td class="datiordini8 border_top blue bold"><? echo $tot ?></td>
				</tr>
<?
				}
?>
				<tr>
					<td colspan="27" class="only_border_top">&nbsp;</td>
				</tr>
			</table></td>
		</tr>
<?
			}
			else
			{
?>
	<tr>
		<td colspan="27" class="only_border_top">&nbsp;</td>
	</tr>
<?
			}
		}
	}
?>

</table>

</body>
</html>