This commit is contained in:
2024-05-31 21:42:18 -07:00
parent 0dedc847dc
commit 3609bb71d9
2 changed files with 3 additions and 3 deletions

View File

@@ -740,7 +740,7 @@ Partial Class Ventas_PVCobranza
ObjPVenta.Dispose()
End Sub
Private Sub CargaEntradasSalidas()
Dim ObjPVenta As New ClsPuntoVenta
Dim ObjPVenta As New ClsVentas
'Salida
If ObjPVenta.GetVta_MovimientosCajas(CveCorte, 0) Then
@@ -1005,7 +1005,7 @@ Partial Class Ventas_PVCobranza
Dim FechaI As Date = If(txtFechaI.Text <> "", txtFechaI.Text.ToDate, MinFecha)
Dim FechaF As Date = If(txtFechaF.Text <> "", txtFechaF.Text.ToDate, MaxFecha)
Dim ObjPuntoVenta As New ClsPuntoVenta
Dim ObjPuntoVenta As New ClsVentas
If ObjPuntoVenta.GetCortesDetalleVentas(CveCorte, DdlSubProyecto.SelectedValue.ToEntero, UsuarioActual.CveEmpresa, 2) Then
GvD.DataSource = ObjPuntoVenta.DtResultados

View File

@@ -3902,7 +3902,7 @@ Partial Class Ventas
ObjPVenta.Dispose()
End Sub
Private Sub CargaEntradasSalidas()
Dim ObjPVenta As New ClsPuntoVenta
Dim ObjPVenta As New ClsVentas
'Salida
If ObjPVenta.GetVta_MovimientosCajas(CveCorte, 0) Then