-fecha de fluctuación ventas

2019-12-02 16:59:38 -07:00
parent 695d8ea5be
commit fd75484f1c
2 changed files with 199 additions and 199 deletions
--- a/Ventas/Ventas.aspx.vb
+++ b/Ventas/Ventas.aspx.vb
@@ -21488,7 +21488,7 @@ Partial Class Ventas
                If ObjIE.DtResultados.Rows.Count > 0 Then
                    Dim tFecha As Date = TxtFecha.Text.ToDate
                    Dim Fecha As String = String.Format("{0}/{1}/{2}", tFecha.Year, tFecha.Month, tFecha.Day)
-                    Dim drr As DataRow = ObjIE.DtResultados.FiltroPrimero("Fecha < #" & Fecha & "#", "Fecha DESC")
+                    Dim drr As DataRow = ObjIE.DtResultados.FiltroPrimero("Fecha > #" & Fecha & "#", "Fecha DESC")

                    If drr IsNot Nothing Then
                        TipoCambioFactura = drr("TipoCambio").ToString.ToDecimal