query("select * from fornitori where IdFornitori = $fornitore") ;
while ($db->next_record())
$nome = $db->f("Nome") ;
}
$str = "" ;
if ($dal == "")
{
$datadal = MySqlDate("01/01/$anno") ;
$dataal = MySqlDate("31/12/$anno") ;
}
else
{
$datadal = MySqlDate($dal) ;
$dataal = MySqlDate($al) ;
}
$dbt = new FC_SQL ;
if ($tipo == "nonpagate")
{
$titolo = "Ordini con provvigioni NON PAGATE per il Fornitore: $nome" ;
$query = "
select distinct
*,
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.NumFattura <> 0 and
SaldoProvvigione = 0 and
O.DataSpedFattura >= '$datadal' and
O.DataSpedFattura <= '$dataal' and
O.idfornitore = $fornitore and
O.IdCliente = C.IdClienti and
O.IdFornitore = F.IdFornitori and
O.IdPagamento = P.IdPagamenti
order by
O.DataSpedFattura,
O.NumFattura
" ;
}
else
{
$titolo = "Ordini con provvigioni PAGATE per il Fornitore: $nome" ;
$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.NumFattura <> 0 and
SaldoProvvigione = 1 and
O.DataSpedFattura >= '$datadal' and
O.DataSpedFattura <= '$dataal' and
O.idfornitore = $fornitore and
O.IdCliente = C.IdClienti and
O.IdFornitore = F.IdFornitori and
O.IdPagamento = P.IdPagamenti
order by
O.DataSpedFattura,
O.NumFattura
" ;
}
debug (0, $query) ;
list($n, $d) = $db->RecuperaDati($query) ;
// print_r($d) ; exit ;
for ($i=0; $i<$n; $i++)
{
$annoOrdine = $d['Anno'][$i] ;
$idordine = $d['IdOrdini'][$i] ;
$numfattura = $d['NumFattura'][$i] ;
$importoNC = $d['ImportoNC'][$i] ;
if ($importoNC > 0)
$valNC = ($importoNC / 1.2) ;
else
$valNC = 0 ;
if ($fornitore == $idsarzi)
$dbt->query("select * from $tdettagli, $tsarzi where $tdettagli.idordine = $idordine and $tdettagli.idprodotto = CONCAT('SA',idprodotti)") ;
else
$dbt->query("select
*
from
dettagli D,
prodotti P
where
P.Anno = $annoOrdine and
D.Anno = $annoOrdine and
D.idordine = $idordine and
P.idprodotti = D.idprodotto") ;
$importo = 0 ;
while ($dbt->next_record())
{
/***************************************************************
* 9.5.2012: controllo se il prodotto ha un prezzo forzato
***************************************************************/
if ($dbt->f("PrezzoForzato") > 0.00)
$prezzoProdotto = $dbt->f("PrezzoForzato") ;
else
$prezzoProdotto = $dbt->f("PrezzoUnitario") ;
debug (0, "ID ORDINE = " . $idordine . " ; PREZZO UNITARIO = " . $dbt->f("PrezzoUnitario") . " ; PREZZO FORZATO = " . $dbt->f("PrezzoForzato")) ;
// PRIMA => $impparz = $dbt->f("NumCartoni") * $dbt->f("ConfezioniDa") * $dbt->f("PrezzoUnitario") ;
$impparz = $dbt->f("NumCartoni") * $dbt->f("ConfezioniDa") * $prezzoProdotto ;
if ($dbt->f("ScontoPrd") != "" )
$impparz = CalcolaScontoProdotto($impparz, $dbt->f("ScontoPrd")) ;
$importo += $impparz ;
}
$sconto1 = ($importo * $d['Sconto1'][$i] / 100) ;
$subimporto1 = $importo - $sconto1 ;
$sconto2 = ($subimporto1 * $d['Sconto2'][$i] / 100) ;
$sconti = $sconto1 + $sconto2 ;
$importo = $importo - $sconti - $valNC;
$importoprov = ($importo * $d['ProvvigioneAgenzia'][$i] / 100) ;
$totale += $importo ;
$totaleprov += $importoprov ;
$str .= "" ;
$str .= "| $idordine | " ;
$str .= "$numfattura | " ;
$str .= "" . SiNo($d['SaldoFattura'][$i]) . " | " ;
$str .= "" . htmlspecialchars($d['NomeCliente'][$i]) . " | " ;
$str .= "" . ItaDate($d['DataSpedFattura'][$i]) . " | " ;
$str .= "" . nfp($importo) . " | " ;
$str .= "" . nfp($d['ProvvigioneAgenzia'][$i]) . " | " ;
$str .= "" . nfp($importoprov) . " | " ;
$str .= " | " ;
$str .= "
" ;
}
$str .= "" ;
if ($tipo == "nonpagate")
{
$header = "N. ORD,N. FATT,FATT SALD?,CLIENTE,DATA FATT.,IMPORTO,% PROVV,PROVV,CALCOLA" ;
$footer = "TOTALE:-#cspan-#cspan-#cspan-#cspan-" . nfp($totale) . "--" . "0,00
" . "-" ;
$setColType = "ro,ro,ro,ro,ro,ro,ro,ro,ch" ;
$iniWP = "6,7,10,27,10,10,10,10,8" ;
}
else
{
$header = "N. ORD,N. FATT,FATT SALD?,CLIENTE,DATA FATT.,IMPORTO,% PROVV,PROVV," ;
$footer = "TOTALE:-#cspan-#cspan-#cspan-#cspan-" . nfp($totale) . "--" . nfp($totaleprov) . "-";
$setColType = "ro,ro,ro,ro,ro,ro,ro,ro,ro" ;
$iniWP = "6,7,10,27,10,10,10,10,8" ;
}
$strSort = "int,int,str,str,date,euro,int,euro," ;
$setColAlign = "center,center,center,left,center,right,center,right,center" ;
?>
<? echo TITLE ?>
0) : ?>
0) : ?>
Numero Ordini:
(per selezionare un ordine clicca sulla riga corrispondente)