" ;
if ($cosa == "singcl_singfor")
{
$query = "
select
*,
F.provvigione as ProvvigioneAgenzia,
C.Nome as NomeCliente,
F.Nome as NomeFornitore
from
clienti C
left join ordini O on O.idcliente = C.idclienti
left join pagamenti P on P.idpagamenti = O.idpagamento
left join fornitori F on F.idfornitori = O.idfornitore
where
O.Anno = $annop and
O.DataOrdine <= '$dataordine' and
C.idclienti = $id_cliente and
F.idfornitori = $id_fornitore
order by
O.IdOrdini
" ;
}
elseif ($from == "confronti")
{
$fornitoreBack = $fornitore ;
list($id_fornitore, $nomefornitore) = explode("^", stripslashes($fornitore)) ;
if ($id_fornitore > 0)
$where_for = "F.idfornitori = $id_fornitore" ;
else
$where_for = "1=1" ;
$query = "
select
*,
F.provvigione as ProvvigioneAgenzia,
C.Nome as NomeCliente,
F.Nome as NomeFornitore
from
clienti C
left join ordini O on O.idcliente = C.idclienti
left join pagamenti P on P.idpagamenti = O.idpagamento
left join fornitori F on F.idfornitori = O.idfornitore
where
O.Anno = $annop and
O.DataOrdine <= '$dataordine' and
C.idclienti = $id_cliente and
$where_for
order by
O.IdOrdini
" ;
}
else
{
$query = "
select
*,
F.provvigione as ProvvigioneAgenzia,
C.Nome as NomeCliente,
F.Nome as NomeFornitore
from
clienti C
left join ordini O on O.idcliente = C.idclienti
left join pagamenti P on P.idpagamenti = O.idpagamento
left join fornitori F on F.idfornitori = O.idfornitore
where
O.Anno = $annop and
O.DataOrdine <= $dataordine and
C.idclienti = $id_cliente
order by
O.IdOrdini
" ;
}
debug (0, $query) ;
list($n, $d) = $db->RecuperaDati($query) ;
for ($i=0; $i<$n; $i++)
{
$nome = $d['NomeCliente'][$i] ;
$titolo = "Totale Venduto / Fatturato per il Cliente: $nome" ;
if ($cosa == "singcl_singfor" or ($from == "confronti" and $id_fornitore > 0))
$titolo .= "
verso il fornitore $nomefornitore" ;
$titolo .= " per l'anno $annop" ;
$idordine = $d['IdOrdini'][$i] ;
$numfatt = $d['NumFattura'][$i] ;
$importofattura = $d['ImportoFattura'][$i] ;
$importoNC = $d['ImportoNC'][$i] ;
if ($idordine > 0)
{
if ($importoNC > 0)
$valNC = ($importoNC / 1.2) ;
else
$valNC = 0 ;
if ($d['IdFornitori'][$i] != $idsarzi)
$qdett = "
select
*
from
dettagli D,
prodotti P
where
D.Anno = $annop and
D.idordine = $idordine and
P.idprodotti = D.idprodotto
" ;
else
$qdett = "
select
*
from
dettagli_$annop D,
sarzi_$annop S
where
D.idordine = $idordine and
D.idprodotto = CONCAT('SA',idprodotti)" ;
$dbt->query($qdett) ;
$importo = 0 ;
while ($dbt->next_record())
{
$impparz = $dbt->f("NumCartoni") * $dbt->f("ConfezioniDa") * $dbt->f("PrezzoUnitario") ;
if ($dbt->f("ScontoPrd") != "")
$impparz = CalcolaScontoProdotto($impparz, $dbt->f("ScontoPrd")) ;
$importo += $impparz ;
}
$sconto1 = ($importo * $d['Sconto1'][$i] / 100) ;
$importo1 = $importo - $sconto1 ;
$sconto2 = ($importo1 * $d['Sconto2'][$i] / 100) ;
$importo2 = $importo1 - $sconto2 - $valNC ;
$sconto3 = ($importo2 * $d['Sconto3'][$i] / 100) ;
/*************************************************************
* L'importo della provvigione va calcolato a questo punto,
* non considerando lo sconto pagamento. Idem per il fatturato
**************************************************************/
$importoprov = ($importo2 * $d['ProvvigioneAgenzia'][$i] / 100) ;
$sconti = $sconto1 + $sconto2 + $sconto3 ;
$importo = $importo - $sconti - $valNC ;
if ($importofattura > 0)
{
$totalefatt += $importo ;
$totaleprovfatt += $importoprov ;
}
$totale += $importo ;
$totaleprov += $importoprov ;
$nord = $idordine ;
$nfatt = $numfatt ;
$fornitore = htmlspecialchars($d['NomeFornitore'][$i]) ;
$data_ordine = ItaDate($d['DataOrdine'][$i]) ;
$importo = nfp($importo) ;
$perc_provv = nfp($d['ProvvigioneAgenzia'][$i]) ;
$imp_provv = nfp($importoprov) ;
if ($profilo > 1)
$str .= "| $nord | $nfatt | $fornitore | $data_ordine | $importo |
" ;
else
$str .= "| $nord | $nfatt | $fornitore | $data_ordine | $importo | $perc_provv | $imp_provv |
" ;
}
}
$str .= "" ;
if ($profilo > 1)
{
$header = "N.ORD,N.FATT,FORNITORE,DATA ORDINE,IMPORTO" ;
$footer_ven = "TOTALE VENDUTO:-#cspan-#cspan-#cspan-" . nfp($totale) ;
$footer_fatt = "TOTALE FATTURATO:-#cspan-#cspan-#cspan-" . nfp($totalefatt) ;
}
else
{
$header = "N.ORD,N.FATT,FORNITORE,DATA ORDINE,IMPORTO,% PROV,IMPORTO PROV" ;
$footer_ven = "TOTALE VENDUTO:-#cspan-#cspan-#cspan-" . nfp($totale) . "--" . nfp($totaleprov) ;
$footer_fatt = "TOTALE FATTURATO:-#cspan-#cspan-#cspan-" . nfp($totalefatt) . "--" . nfp($totaleprovfatt) ;
}
$strSort = "int,int,str,date,euro,int,euro" ;
$iniWP = "6,6,40,12,13,10,12" ;
$setColType = "ro,ro,ro,ro,ro,ro,ro" ;
$setColAlign = "center,center,left,right,right,right,right" ;
?>
<? echo TITLE ?>