From 9643a30d16d08c3e3937524327bd1dc9ed3215ba Mon Sep 17 00:00:00 2001 From: rrene Date: Mon, 20 May 2024 08:49:41 -0700 Subject: [PATCH] -- comentarios --- Ventas/PVCobranza.aspx.vb | 6 ++++++ 1 file changed, 6 insertions(+) diff --git a/Ventas/PVCobranza.aspx.vb b/Ventas/PVCobranza.aspx.vb index c42948839..5d2e39164 100644 --- a/Ventas/PVCobranza.aspx.vb +++ b/Ventas/PVCobranza.aspx.vb @@ -614,6 +614,12 @@ Partial Class Ventas_PVCobranza ObjPVenta.Dispose() End Sub Private Sub BtnCerrarTurno_Click(sender As Object, e As EventArgs) Handles BtnCerrarTurno.Click + + 'validar. + ' que no existan movimientos pendientes de pago. + ' que no halla facturas pendientes de cancelación. + ' no facturar remisiones de días anteriores + Dim ObjPVenta As New ClsPuntoVenta If TxtEfectivoEnCaja.Text.Trim <> "" Then If ObjPVenta.UpdateFinalizadoVtaCortes(CveCorte, TxtEfectivoEnCaja.Text.ToDouble, LblDiferenciaCaja.Text.ToDouble, NowADS(), UsuarioActual.CveEmpresa) Then