dateNow($format="%Y%m%d") ; list($d, $m, $y) = explode("/", $data) ; $numGiorni = $dateCalc->dateToDays($d,$m,$y) ; $dd_scad = $dateCalc->daysToDate($numGiorni + $giorni, $format="%Y%m%d") ; if (($today > $dd_scad) and $importo == " ") $dd = $dateCalc->daysToDate($numGiorni + $giorni, $format = "%d/%m/%Y") . " (*)" ; else $dd = $dateCalc->daysToDate($numGiorni + $giorni, $format = "%d/%m/%Y") ; return $dd ; } $query = "select * from clienti where idclienti = $cliente" ; $db->query($query) ; while($db->next_record()) $nomecliente = addslashes($db->f("Nome")) ; $titolo = 'Situazione Econominca del Cliente ' . $nomecliente . ' per gli anni: ' ; if ($anno_2prec != '') $titolo .= $anno_2prec . ', ' ; if ($anno_prec != '') $titolo .= $anno_prec . ', ' ; $titolo .= $annoFinale ; $arrVal = array() ; $arrValPag = array() ; $arrTotCliente = array() ; if ($TipoScelta == "TA") $q = " select CONCAT(O.idordini, '^', '{$anno}') as idordini, F.nome as NomeFornitore, O.numfattura, O.dataspedfattura as DataSpedFattura, DATE_FORMAT(O.dataspedfattura, '%d/%m/%Y') as ItaDataSpedFattura, DATE_FORMAT(O.datarichiesta, '%d/%m/%Y') as ItaDataPagFattura, O.idpagamento, P.modalita as Tipo_Pagamento, case when (P.giorni = 999) then 0 else P.giorni end as GG, O.importofattura, O.saldoFattura, A.nome from ordini O inner join fornitori F on F.idfornitori = O.idfornitore inner join pagamenti P on P.idpagamenti = O.idpagamento inner join agenti A on A.idagenti = O.idagente where (O.Anno = $annoFinale or O.Anno = $anno_prec or O.Anno = $anno_2prec) and idcliente = $cliente and numfattura > 0 order by NomeFornitore, DataSpedFattura " ; else $q = " select CONCAT(O.idordini, '^', '{$anno}') as idordini, F.nome as NomeFornitore, O.numfattura, O.dataspedfattura as DataSpedFattura, DATE_FORMAT(O.dataspedfattura, '%d/%m/%Y') as ItaDataSpedFattura, DATE_FORMAT(O.datarichiesta, '%d/%m/%Y') as ItaDataPagFattura, O.idpagamento, P.modalita as Tipo_Pagamento, case when (P.giorni = 999) then 0 else P.giorni end as GG, O.importofattura, O.saldoFattura, A.nome from ordini O inner join fornitori F on F.idfornitori = O.idfornitore inner join pagamenti P on P.idpagamenti = O.idpagamento inner join agenti A on A.idagenti = O.idagente where O.Anno = $annoFinale and idcliente = $cliente and numfattura > 0 order by NomeFornitore, DataSpedFattura " ; list($n,$d) = $db->RecuperaDati($q) ; // print_r($d) ; for ($i=0; $i<$n; $i++) { if (! array_key_exists($d['NomeFornitore'][$i], $arrVal)) $arrVal[$d['NomeFornitore'][$i]] = array() ; $arrValPag[$d['NomeFornitore'][$i]]['TotFatt'] += $d['importofattura'][$i] ; $arrTotCliente['TotFatt'] += $d['importofattura'][$i] ; if ($d['saldoFattura'][$i] == 0) $impPagato = " " ; else { $arrValPag[$d['NomeFornitore'][$i]]['Pagato'] += $d['importofattura'][$i] ; $arrTotCliente['Pagato'] += $d['importofattura'][$i] ; $impPagato = $d['importofattura'][$i] ; } if ($d['ItaDataPagFattura'][$i] == '00/00/0000') $dataPagFattura = " " ; else $dataPagFattura = $d['ItaDataPagFattura'][$i] ; $arrVal[$d['NomeFornitore'][$i]][] = array( 'IdOrdine' => $d['idordini'][$i], 'NumFatt' => $d['numfattura'][$i], 'DataFattura' => $d['ItaDataSpedFattura'][$i], 'Scadenza' => CalcolaScadenza($d['ItaDataSpedFattura'][$i], $d['GG'][$i], $impPagato) , 'TipoPagamento' => $d['Tipo_Pagamento'][$i], 'ImportoFattura' => $d['importofattura'][$i], 'ImportoPagato' => $impPagato, 'DataPagFattura' => $dataPagFattura, 'Agente' => $d['nome'][$i], ) ; } $arrParGen = array() ; $arrParGen = RecuperaParametriGenerali($arrParGen, $tparametri) ; $nome = $arrParGen['NomeAgenzia'] ; $sede = "Sede operativa: " . $arrParGen['IndirizzoAgenzia'] ; $datisede = "Telefono: " . $arrParGen['TelefonoAgenzia'] . " Fax: " . $arrParGen['FaxAgenzia'] . " -- P.I. " . $arrParGen['PartitaIvaAgenzia'] ; $emailsede = "Email: " . $arrParGen['MailAgenzia'] ; ?>

al dateNow($format="%d/%m/%Y") ?>
Fornitore:
N. Fatt.	Data Fattura	Scadenza	Tipo Pag.	Importo	Imp. Pagato	Data Pag. Fatt.	Agente	Note
(*) = fattura scaduta		Totale:				Differenza:
Totale Cliente Importo Fatture: Pagato: Da Pagare: