query("select * from fornitori where IdFornitori = $fornitore") ;
while ($db->next_record())
$nome = $db->f("Nome") ;
$per_il_mese = "" ;
if ($from == "stats_singolo_mese")
{
$query = "
select
*,
F.provvigione as ProvvigioneAgenzia,
C.Nome as NomeCliente,
F.Nome as NomeFornitore
from
ordini O,
pagamenti P,
clienti C,
fornitori F
where
O.Anno = $anno and
O.idfornitore = $fornitore and
month(O.DataOrdine) = $mese and
O.IdCliente = C.IdClienti and
O.IdFornitore = F.IdFornitori and
O.IdPagamento = P.IdPagamenti
order by
IdOrdini
" ;
$per_il_mese = " per il mese " . $arrMesi[$mese] . "";
}
else
$query = "
select
*,
F.provvigione as ProvvigioneAgenzia,
C.Nome as NomeCliente,
F.Nome as NomeFornitore
from
ordini O,
pagamenti P,
clienti C,
fornitori F
where
O.Anno = $anno and
O.idfornitore = $fornitore and
O.IdCliente = C.IdClienti and
O.IdFornitore = F.IdFornitori and
O.IdPagamento = P.IdPagamenti
order by
IdOrdini
" ;
$titolo = "Totale Venduto / Fatturato per il Fornitore: $nome" . $per_il_mese ;
debug (0, $query) ;
$dbt = new FC_SQL ;
$db->query($query) ;
$i = 0 ;
$totale = 0 ;
$totaleprov = 0 ;
$str = "" ;
while ($db->next_record())
{
$idordine = $db->f("IdOrdini") ;
$importoNC = $db->f("ImportoNC") ;
$importofattura = $db->f("ImportoFattura") ;
if ($importoNC > 0)
$valNC = ($importoNC / 1.2) ;
else
$valNC = 0 ;
if ($fornitore != $idsarzi)
$qdett = "
select
*
from
dettagli D,
prodotti P
where
P.Anno = $anno and
D.Anno = $anno and
D.idordine = $idordine and
P.idprodotti = D.idprodotto" ;
else
$qdett = "select * from $tdettagli, $tsarzi where $tdettagli.idordine = $idordine and $tdettagli.idprodotto = CONCAT('SA',idprodotti)" ;
$dbt->query($qdett) ;
$importo = 0 ;
while ($dbt->next_record())
{
if ($dbt->f("PrezzoForzato") > 0 )
$prProd = $dbt->f("PrezzoForzato") ;
else
$prProd = $dbt->f("PrezzoUnitario") ;
$impparz = $dbt->f("NumCartoni") * $dbt->f("ConfezioniDa") * $prProd ;
if ($dbt->f("ScontoPrd") != "")
$impparz = CalcolaScontoProdotto($impparz, $dbt->f("ScontoPrd")) ;
$importo += $impparz ;
}
$sconto1 = ($importo * $db->f("Sconto1") / 100) ;
$importo1 = $importo - $sconto1 ;
$sconto2 = ($importo1 * $db->f("Sconto2") / 100) ;
$importo2 = $importo1 - $sconto2 ;
$importo2 = $importo2 - $valNC ;
/**********************************************************
* L'importo della provvigione va calcolato a questo punto,
* non considerando lo sconto pagamento. Anche il fatturato
* va calcolato a questo punto non considerando lo sconto
* pagamento.
***********************************************************/
$importoprov = ($importo2 * $db->f("ProvvigioneAgenzia") / 100) ;
$sconti = $sconto1 + $sconto2 ;
$importo = $importo - $sconti - $valNC ;
if ($importofattura > 0)
{
$totalefatt += $importo ;
$totaleprovfatt += $importoprov ;
}
$totale += $importo ;
$totaleprov += $importoprov ;
$nord = $db->f("IdOrdini") ;
$nfatt = $db->f("NumFattura") ;
$cliente = htmlspecialchars($db->f("NomeCliente")) ;
$data_ordine = ItaDate($db->f("DataOrdine")) ;
$importo = nfp($importo) ;
$perc_provv = nfp($db->f("ProvvigioneAgenzia")) ;
$imp_provv = nfp($importoprov) ;
$str .= "| $nord | $nfatt | $cliente | $data_ordine | $importo | $perc_provv | $imp_provv |
" ;
$i ++ ;
}
$str .= "" ;
$header = "N. ORD,N. FATT,CLIENTE,DATA ORDINE,IMPORTO,% PROV,IMP. 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,7,37,14,10,10,14" ;
$setColType = "ro,ro,ro,ro,ro,ro,ro" ;
$setColAlign = "center,center,left,center,right,center,right" ;
?>
<? echo TITLE ?>