='".$date_start."' AND co_documenti.data<='".$date_end."' and co_documenti.idstatodocumento='1' and co_tipidocumento.mod_riepilogo_iva='1' and co_righe_documenti.qta > 0 GROUP BY co_documenti.id, co_righe_documenti.idiva"; } elseif ('uscita' == $dir) { $Testo="REGISTRO IVA USCITE"; $query = "SELECT *, SUM(subtotale-co_righe_documenti.sconto) AS subtotale, SUM(iva) AS iva, (SELECT ragione_sociale FROM an_anagrafiche WHERE an_anagrafiche.idanagrafica=co_documenti.idanagrafica) AS ragione_sociale FROM co_documenti INNER JOIN co_righe_documenti ON co_documenti.id=co_righe_documenti.iddocumento INNER JOIN co_tipidocumento ON co_documenti.idtipodocumento=co_tipidocumento.id WHERE dir='uscita' AND co_documenti.data>='".$date_start."' AND co_documenti.data<='".$date_end."' and co_documenti.idstatodocumento='1' and co_tipidocumento.mod_riepilogo_iva='1' and co_righe_documenti.qta > 0 GROUP BY co_documenti.id, co_righe_documenti.idiva"; } $rs = $dbo->fetchArray($query); $totrows = sizeof($rs); $body .= "
N° Documento | \n"; $body .= "Data | \n"; $body .= "Causale Ragione sociale | \n";
$body .= "Aliquota | \n"; $body .= "Imponibile | \n"; $body .= "Imposta | \n"; $body .= "".date('d/m/Y', strtotime($rs[$r]['data']))." | \n"; if ('entrata' == $dir) { $body .= "
Fattura di vendita ".$rs[$r]['ragione_sociale'].' | ';
} elseif ('uscita' == $dir) {
$body .= "
Fattura di acquisto ".$rs[$r]['ragione_sociale'].' | ';
}
$body .= " ". $rs[$r]['desc_iva']." € | \n"; $body .= "".number_format( $rs[$r]['subtotale'], 2, ",", "." )." | \n"; $body .= "".number_format( $rs[$r]['iva'], 2, ",", "." )." € | \n"; $body .= "\n"; $v_iva[$rs[$r]['desc_iva']] += $rs[$r]['iva']; $v_totale[$rs[$r]['desc_iva']] += $rs[$r]['subtotale']; $totale_iva += $rs[$r]['iva']; $totale_subtotale += $rs[$r]['subtotale']; } $body .= "
---|
Cod. IVA | \n"; $body .= "Imponibile | \n"; $body .= "Imposta | \n"; $body .= "
---|---|---|
".$desc_iva." | \n"; $body .= "".number_format( $v_totale[$desc_iva], 2, ",", "." )." | \n"; $body .= "".number_format( $v_iva[$desc_iva], 2, ",", "." )." | \n"; $body .= "