AdminADS/SIG
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Correcion en impresion de corte

Browse Source
This commit is contained in:
Jonathan Alexis Perez Morales
2020-06-22 22:05:51 -07:00
parent 6cb3dda36b
commit a913ca96f9
1 changed files with 5 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
Compras/PopUpVerFactura.aspx.vb
View File

@@ -502,9 +502,11 @@ Partial Class PopUpVerFactura
End If End If
If ObjPuntoVenta.GetCortesDetalleVentas(CveCorte, UsuarioActual.CveEmpresa) Then If ObjPuntoVenta.GetCortesDetalleVentas(CveCorte, UsuarioActual.CveEmpresa) Then
DtCortesVentas = ObjPuntoVenta.DtResultados DtCortesVentas = ObjPuntoVenta.DtResultados
If ObjPuntoVenta.DtResultados.Rows.Count > 0 Then If DtCortesVentas.Rows.Count > 0 Then
Fecha = ObjPuntoVenta.DtResultados.Rows(0)("FechaInicial").ToString Dim RowInfo As DataRow = DtCortesVentas.FiltroPrimero("CveVenta > 0")
Nombre = ObjPuntoVenta.DtResultados.Rows(0)("Nombre").ToString
Fecha = RowInfo("FechaInicial").ToString
Nombre = RowInfo("Nombre").ToString
End If End If
End If End If
ObjVenta.Dispose() ObjVenta.Dispose()