corrigiendo el reporte de devoluciones
This commit is contained in:
@@ -2335,16 +2335,16 @@ Partial Class PopUpVerFactura
|
||||
Dim ObjCompra As New ClsCompras()
|
||||
If ObjCompra.GetCompras(CveCompra, "-1", "-1", -1, -1, UsuarioActual.CveEmpresa) AndAlso ObjCompra.DtResultados.Rows.Count > 0 Then
|
||||
Dim dr As DataRow = ObjCompra.DtResultados.Rows(0)
|
||||
Dim FechaCompra As Date = dr("Fecha").ToString.ToDate
|
||||
Dim FechaCompra As Date = dr("FechaMovto").ToString.ToDate
|
||||
Dim FechaVencimiento As Date = dr("FechaVencimiento").ToString.ToDate
|
||||
params.Add(New ReportParameter("Fecha", FechaCompra.ToShortDateString))
|
||||
params.Add(New ReportParameter("FechaVencimiento", FechaVencimiento.ToShortDateString))
|
||||
params.Add(New ReportParameter("Plazo", DateDiff(DateInterval.Day, FechaCompra, FechaVencimiento).ToString))
|
||||
params.Add(New ReportParameter("Folio", Folio.ToString))
|
||||
'params.Add(New ReportParameter("Folio", Folio.ToString))
|
||||
params.Add(New ReportParameter("Serie", dr("Serie").ToString))
|
||||
|
||||
'params.Add(New ReportParameter("NumeroOrden", dr("OCVinculada").ToString))
|
||||
'params.Add(New ReportParameter("FacturaProveedor", dr("SerieFolio").ToString))
|
||||
params.Add(New ReportParameter("FacturaProveedor", dr("SerieFolio").ToString))
|
||||
params.Add(New ReportParameter("NombreProveedor", dr("RazonSocial").ToString))
|
||||
params.Add(New ReportParameter("DireccionProveedor", dr("Direccion").ToString))
|
||||
params.Add(New ReportParameter("CiudadProveedor", " "))
|
||||
|
||||
Reference in New Issue
Block a user