<cfif isdefined("url.vs") or isdefined("form.vs")>
	<cfif isdefined("url.vs")>
        <cfset vs_ = url.vs>
	<cfelseif isdefined("form.vs")>
        <cfset vs_ = form.vs>
	<cfelse>
        <cfset vs_ = "">
    </cfif>
	<cfset vs_ = replace(vs_, ";;", "; ;", "all")>
    <cfif listlen(vs_, ";") ge 6>
    	<cfif listlen(vs_, ";") lt 7>
            <cfset vs_ = listappend(vs_, 0 & "|" & year(now())  & "|" & year(now()) & "|" & 25, ";")>
        </cfif>
		<cfif listlen(vs_, ";") lt 8>
            <cfset vs_ = listappend(vs_, "0|0|0|25", ";")>
        </cfif>
		<cfif listlen(vs_, ";") lt 9>
            <cfset vs_ = listappend(vs_, "0|0|0|0|0|0|25", ";")>
        </cfif>
        <cfset IDsessione = listgetat(vs_, 1, ";")>
        <cfset IDutente = listgetat(vs_, 2, ";")>
        <cfset logo_soc = listgetat(vs_, 3, ";")>
        <cfset lista_aziende = listgetat(vs_, 4, ";")>
        <cfset larghezza = listgetat(vs_, 5, ";")>
        <cfset altezza = listgetat(vs_, 6, ";")>
        <cfquery name="dati_az" datasource="intranet">
            select * from aziende where logo = '#logo_soc#'
        </cfquery>
        <CFQUERY NAME="dati_ut" DATASOURCE="intranet">
            SELECT email FROM utenti where IDutente = #IDutente#
        </CFQUERY>
        		
        <cfquery name="datifattura" datasource="#dati_az.dsn#">
            Select *
            From fatture_attivo
            Where IDdocumento = #url.IDdocumento#
        </cfquery>
        <cfquery name="datiordine" datasource="#dati_az.dsn#">
            Select anticipo, data, Numero_Ordine, oda_cli
            from odv
            Where IDOrdine = #datifattura.IDOrdine#
        </cfquery>
        <CFQUERY NAME="Soc" datasource="#dati_az.dsn#">
            SELECT *
            FROM anagrafica
            Where IDSocieta = #datifattura.IDSocieta#
        </CFQUERY>
        <CFQUERY NAME="Usr" DATASOURCE="intranet">
            SELECT Nome, Cognome, UserID
            FROM utenti
            Where IDUtente = #datifattura.Agente#
        </CFQUERY>
        <CFQUERY NAME="dettagli" datasource="#dati_az.dsn#">
            SELECT *
            FROM odv_dett
            Where IDOrdine = #datifattura.IDOrdine#
            Order by IDDett_ordine
        </CFQUERY>
        <CFQUERY NAME="pagamento" DATASOURCE="#dati_az.dsn#">
            SELECT * from modalita_pagamento 
            where  sigla = '#datifattura.Mod_pagamento#'
        </CFQUERY>
        <CFQUERY name="banca" DATASOURCE="#dati_az.dsn#"> 
            select * from banche where 
			<cfif isdefined("form_conto_forzato") and len(trim(form_conto_forzato)) gt 0>
                descrizione like '%#form_conto_forzato#%'
            <cfelse>
                iban = '#datifattura.Mod_pagamento#'
            </cfif>
             order by banca, descrizione
        </CFQUERY>
		<cfset saldo = round(100*(datifattura.importo + datifattura.tot_iva - datifattura.anticipo - datifattura.acconto - datifattura.pagato))/100>
        <cfset pagato = datifattura.anticipo + datifattura.acconto + datifattura.pagato >	
        
        <CFQUERY NAME="dett_movimento" datasource="#dati_az.dsn#">
            SELECT *
            FROM movimenti
            Where IDFattura = #url.IDdocumento#
            and tipologia = '<cfif datifattura.ndc eq "ndc">OUT_<cfelse>IN</cfif>'
            Order by datacont, IDmovimento
        </CFQUERY>

        <CFQUERY NAME="pagamenti" DATASOURCE="#dati_az.dsn#">
            SELECT * from modalita_pagamento 
            order by descrizione
        </CFQUERY>
        <CFQUERY name="banche" DATASOURCE="#dati_az.dsn#"> 
            select * from banche order by banca, descrizione
        </CFQUERY>
        
        
        <cfif isdefined("form.email")>

			<cfif datifattura.ndc eq "ndc"><cfset tipo_fattura = "Nota di credito"><cfelse><cfset tipo_fattura = "Fattura"></cfif>
        
			<cfset nomefile = "#replace(tipo_fattura, " ", "_", "all")#_#datifattura.Numero_fattura#_#year(datifattura.Data_emissione)#.pdf">
            <cfdocument format="pdf" pagetype="a4" margintop="0.5" marginbottom="2" marginleft="1" marginright="1" unit="cm" filename="D:\wwwroot\voxnet\intranet\export\#nomefile#" overwrite="yes">
                <cfdocumentitem type="footer">
                    <html>
                    <head>
                    <link href="file:///d:/wwwroot/voxnet/intranet/css/main.css" rel="stylesheet" type="text/css">
                    <link href="file:///d:/wwwroot/voxnet/intranet/css/standard.css" rel="stylesheet" type="text/css">
                    </head>
                    <div align="center"><font face="Verdana" color="#002863" size="1">
                    <cfif year(datifattura.data_emissione) ge 2013>
                        Il pagamento dovr&agrave; essere effettuato nei termini indicati sulla fattura medesima, in caso di inadempienza  verr&agrave; applicato il D.L.gs n.192/2012 in attuazione alla Direttiva 2011/7/UE
                    <cfelse>
                        Alla fornitura si applicano le norme previste dal D. Leg. 231/02
                    </cfif>
                    <hr size="1" color="#000084">
                    <strong><em>s.e.&amp;o.</em></strong></font></div>
                    </html>
                </cfdocumentitem>
                <cfinclude template="../_#dati_az.logo#/fattura_pdf_corpo.cfm">
            </cfdocument>        
            <cfmail to="#form.email#" from="info@autoroute.it" subject="Invio copia #tipo_fattura# #datifattura.Numero_fattura#_#year(datifattura.Data_emissione)#" type="HTML">
            	<cfmailparam file="D:\wwwroot\voxnet\intranet\export\#nomefile#">
			</cfmail>        
            <cfset messaggio = 'Email inviata a: "<i>#form.email#</i>" !'>  
        </cfif>


        <html>
            <head>
                <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
                <title>INTRANET</title>
                <link rel="stylesheet" type="text/css" href="../css/style.css">
                <link rel="stylesheet" type="text/css" href="../css/bordi.css" />
                <script language="javascript" src="../java/common.js"></script>
                <script language="javascript" src="../java/show_hide.js"></script>
            </head>
            
            <body bgcolor="#DDDDDD" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
                <form method="post" id="pulsantiera" action="">
                    <div style="display:table; width:100%;">
                    <div style="display:table-row; width:100%;">
                        <cfoutput>
                            <input type="hidden" name="vs" value="#vs_#">	
                            <div style="display:table-cell; text-align:left; background-color:##DDDDDD; padding:5px; width:100px;"><a href="javascript:void();" 
                                onClick="document.getElementById('pulsantiera').action='app_fatture.cfm?vs=#vs_#';document.getElementById('pulsantiera').submit();"><img src="http://app.autoroute.it/images/back_64.png" border="0"></a></div>
                            <div style="display:table-cell; text-align:center; vertical-align:middle; background-color:##DDDDDD; padding:5px;" class="testob4">INTRANET :: #dati_az.nome_az#</div>
                            <div style="display:table-cell; text-align:right; background-color:##DDDDDD; padding:5px; width:100px;"><a href="javascript:void();" 
                                onClick="document.getElementById('pulsantiera').action='app_fattura.cfm?#cgi.QUERY_STRING#';document.getElementById('pulsantiera').submit();"><img src="http://app.autoroute.it/images/update64.png" border="0"></a></div>
                        </cfoutput>
                    </div>
                    </div>
                </form> 
                <div align="center" class="testob4">
                    <style type="text/css">
                        <!--
                        :focus:invalid {  background-color:#FF0000;}
                        :valid {  background-color:#00FF00;}
                        /*
                        :required { background-color:#FFFFFF;}
                        */
                        :optional { background-color:#FFFFFF;}
                        -->
                    </style>
                    

					<cfoutput>
                        <table border="0" cellpadding="3" cellspacing="0" bordercolor="##999999" background="../img/fondino2.jpg" width="100%" class="testobianco3">
                            <tr>
                                <td align="right" width="50%">                                
									<cfif datifattura.ndc eq "ndc">
                                        Nota di credito:
                                    <cfelse>
                                        Fattura: 
                                    </cfif>
                                </td>
                                <td width="50%" class="testobiancob3"><cfif sgn(#datifattura.Numero_fattura#-100) eq -1>0<cfif sgn(#datifattura.Numero_fattura#-10) eq -1>0</cfif></cfif>#datifattura.Numero_fattura#/#year(datifattura.data_emissione)#</td>
                            </tr>
                            <tr>
                                <td align="right">Data:</td>
                                <td class="testobiancob3">#dateformat(datifattura.Data_emissione, "dd/mm/yyyy")#</td>
                            </tr>
                            <tr>
                                <td align="right">Compilatore:</td>
                                <td class="testobiancob3"><cfif len(trim(usr.cognome)) gt 0 and len(trim(usr.nome)) gt 0>#ucase(left(usr.nome, 1))##ucase(left(usr.cognome, 1))#<cfelse>#usr.userid#</cfif></td>
                            </tr>
                            <tr>
                                <td align="right">Modalit&agrave; Pag.to:</td>
                                <td class="testobiancob3">
                                	<cfif pagamento.recordcount gt 0>
                                        #pagamento.descrizione#
                                    <cfelseif banca.recordcount gt 0>
                                        Bonifico
                                    <cfelse>
                                        #datifattura.Mod_pagamento#
                                    </cfif>
                                </td>
                            </tr>
                            <tr>
                                <td align="right">Scadenza Pag.to:</td>
                                <td class="testobiancob3">#dateformat(datifattura.Scadenza, "dd/mm/yyyy")#</td>
                            </tr>
                            </tr>
                            <tr>
                                <td align="right"> Rif. Ord. :</td>
                                <td class="testobiancob3"><cfif sgn(#datiordine.Numero_Ordine#-100) eq -1>0<cfif sgn(#datiordine.Numero_Ordine#-10) eq -1>0</cfif></cfif>#datiordine.Numero_Ordine#/#year(datiordine.data)#</td>
                            </tr>
                            <cfif len(trim(datiordine.oda_cli)) gt 0>
                                <tr>
                                    <td align="right"> Rif. Ord. Cli. :</td>
                                    <td class="testobiancob3">#datiordine.oda_cli#</td>
                                </tr>
                            </cfif>
                            <tr>
                                <td align="right">Cliente:</td>
                                <td class="testobiancob3">#Soc.Societa#</td>
                            </tr>
                            <tr>
                                <td align="right">Indirizzo:</td>
                                <td class="testobiancob3">#Soc.Indirizzo_fatturazione#<br>#Soc.CAP_fatturazione# #Soc.Citta_fatturazione# (#Soc.StatoOProvincia_fatturazione#)</td>
                            </tr>
                            <cfif len(trim(Soc.Partita_iva)) gt 0 and Soc.Partita_iva eq Soc.codice_fiscale>
                                <tr>
                                    <td align="right">P.IVA / C.F. :</td>
                                    <td class="testobiancob3">#Soc.Partita_iva#</td>
                                </tr>
                            <cfelse>
								<cfif len(trim(Soc.Partita_iva)) gt 0>
                                    <tr>
                                        <td align="right">P.IVA:</td>
                                        <td class="testobiancob3">#Soc.Partita_iva#</td>
                                    </tr>
                                </cfif>
                                <cfif len(trim(Soc.codice_fiscale)) gt 0>
                                    <tr>
                                        <td align="right">C.F. :</td>
                                        <td class="testobiancob3">#Soc.codice_fiscale#</td>
                                    </tr>
                                </cfif>
                            </cfif>

                        </table>


                        <table width="100%" border="0" cellspacing="1" cellpadding="1" align="center" bgcolor="##000000" class="testo2">
                            <tr align="center" class="testobianco3">
                                <td>Voce</td>
                                <td>&nbsp;Importo</td>
                                <td>Q.</td>
                                <td>UM</td>
                                <td>iva</td>
                                <td>
                                    <cfset flag_sconto = false>
                                    <cfloop query="dettagli"><cfif sconto neq 0><cfset flag_sconto = true></cfif></cfloop>
                                    <cfif flag_sconto>Sc.<cfelse>&nbsp;</cfif>
                                </td>
                                <td>Totale</td>
                            </tr>
                            <cfloop query="dettagli">
                                <cfif dettagli.quantita is 0 and dettagli.importo is 0>
                                    <tr bgcolor="##ffffff">
                                        <td align="justify" valign="top" colspan="7">#dettagli.voce#</td>
                                    </tr>
                                <cfelse>
                                    <tr align="right" valign="top" bgcolor="##ffffff">
                                        <td align="left">#dettagli.voce#</td>
                                        <td>&euro;&nbsp;#LSEuroCurrencyFormat(dettagli.importo, "none")#</td>
                                        <td>#dettagli.quantita#</td>
                                        <td><cfif len(trim(dettagli.UM)) gt 0>#dettagli.UM#<cfelse>&nbsp;</cfif></td>
                                        <td>#dettagli.aliquota#%</td>
                                        <td><cfif #sconto# neq "0">#sconto#%<cfelse>&nbsp;</cfif></td>
                                        <td>&euro;&nbsp;#LSEuroCurrencyFormat(dettagli.importo*dettagli.quantita*(1-dettagli.sconto/100), "none")#</td>
                                    </tr>
                                </cfif>
                            </cfloop>
                            <tr align="right" class="testobianco3">
                                <td colspan="4" align="right">Totale Imponibile:</td>
                                <td colspan="3" class="testobiancob3">&euro;&nbsp;#LSEuroCurrencyFormat(datifattura.importo, "none")#</td>
                            </tr>
                            <tr align="right" class="testobianco3">
								<cfif datifattura.iva_differita>
                                    <td colspan="2" align="left" style="border-right:0px;" class="testobiancob1">Operazione soggetta al regime di cui all'art. 32-bis D.L. n.83/12</td>
                                    <td colspan="3" style="border-left:0px;">IVA:</td>
                                <cfelse>
                                    <td colspan="4">IVA:</td>
                                </cfif>
                                <td colspan="3" class="testobiancob3">&euro;&nbsp;#LSEuroCurrencyFormat(datifattura.tot_iva, "none")#</td>
                            </tr>
                            <tr align="right" class="testobianco3">
                                <td colspan="4">Totale fattura:</td>
                                <td colspan="3" class="testobiancob3">&euro;&nbsp;#LSEuroCurrencyFormat(round(100*(datifattura.importo+datifattura.tot_iva))/100, "none")#</td>
                            </tr>
                            <tr>
                                <td valign="top" align="center" bgcolor="##ffffff" colspan="7">
									<cfif banca.recordcount gt 0>
                                        Banca di appoggio:<br>
                                        #banca.banca#
                                        <br>IBAN <strong>#banca.iban#</strong>
                                        <cfif len(trim(banca.swift)) gt 0>
                                            <br>BIC/SWIFT <strong>#banca.swift#</strong>
                                        </cfif>
                                    <cfelse>
                                    	&nbsp;
                                    </cfif>
                                </td>
                            </tr>
                            <tr align="right" class="testobianco3">
                                <td colspan="4">Importo pagato:</td>
                                <td colspan="3" class="testobiancob3">&euro;&nbsp;#LSEuroCurrencyFormat(pagato, "none")#</td>
                            </tr>
                            <cfif dett_movimento.recordcount gt 0>
                                <tr>
                                    <td valign="top" align="center" bgcolor="##ffffff" colspan="7">
                                        <table width="100%" border="0" cellspacing="1" cellpadding="1" align="center" bgcolor="##666666" class="testo2">
                                            <tr align="center" class="testobiancob2">
                                                <td>data contabile</td>
                                                <td>data valuta</td>
                                                <td>Destinazione</td>
                                                <td>Importo</td>
                                                <td>Descrizione</td>
                                            </tr>
                                            <cfset pagato = 0>
                                            <cfloop query="dett_movimento">
                                                <tr bgcolor="##ffffff">
                                                    <td>#dateformat(datacont, "dd/mm/yyyy")#</td>
                                                    <td>#dateformat(dataval, "dd/mm/yyyy")#</td>
                                                    <td>
                                                        <CFQUERY NAME="pagamento" dbtype="query">
                                                            SELECT * from pagamenti where  sigla = '#destinazione#'
                                                        </CFQUERY>
                                                        <CFQUERY NAME="banca" dbtype="query">
                                                            SELECT * from banche where  iban = '#destinazione#'
                                                        </CFQUERY>
                                                        <cfif pagamento.recordcount gt 0>
                                                            #pagamento.descrizione#
                                                        <cfelseif banca.recordcount gt 0>
                                                            #banca.banca# #banca.descrizione#
                                                        <cfelse>
                                                            #destinazione#
                                                        </cfif>
                                                    </td>
                                                    <cfif valuta eq "Lira">
                                                        <td align="right">#NumberFormat(Importo)# L.</td>
                                                        <cfset pagamento = importo / 1936.27>
                                                    <cfelse>
                                                        <td align="right">#LSEuroCurrencyFormat(Importo, "local")#</td>
                                                        <cfset pagamento = importo>
                                                    </cfif>
                                                    <td>#Descrizione#&nbsp;</td>
                                                </tr>
                                                <cfset pagato = pagato + pagamento>
                                            </cfloop>
                                        </TABLE>
                                    </td>
                                </tr>
                            </cfif>
                            <tr align="right" class="testobianco3">
                                <td colspan="4">Saldo a <cfif datifattura.ndc eq "ndc">credito<cfelse>pagare</cfif>:</td>
                                <td colspan="3" class="testobiancob3">&euro;&nbsp;#LSEuroCurrencyFormat(saldo, "none")#</td>
                            </tr>
                            <form method="post">
                                <tr align="center" class="testobianco3">
                                    <td colspan="7">Invia copia fattura a: <input type="text" name="email" class="form2" style="width:150px; height:20px;" value="<cfif len(trim(dati_ut.email)) gt 0>#dati_ut.email#</cfif>"> <input type="submit" value="   &raquo;&raquo;   " class="form2" style="width:40px; height:20px;"></td>
                                </tr>                                
                            </form>
                        </table>
                         <cfparam name="messaggio" default="">
                         <cfif len(trim(messaggio)) gt 0><font color="red">#messaggio#</font></cfif>
                        <!--- 
                        <br>
                        <a href="app_fattura_pdf.cfm?vs=#vs_#&IDDocumento=#url.IDDocumento#"><img src="http://app.autoroute.it/images/pdf.png" border="0" vspace="10"></a>
                         --->
                        </div>
					</cfoutput>

                </div>
            </body>
        </html>
	</cfif>
</cfif>



