From 07ec58ad176b91d3f97b5a47063212c85e09a97f Mon Sep 17 00:00:00 2001 From: Jonathan Alexis Perez Morales Date: Mon, 15 Jul 2024 09:28:34 -0700 Subject: [PATCH] --FIX autorizaciones de NC, --etiqueta de promociones --- Ventas/Ventas.aspx | 15 +++++++++------ Ventas/Ventas.aspx.vb | 6 +++--- 2 files changed, 12 insertions(+), 9 deletions(-) diff --git a/Ventas/Ventas.aspx b/Ventas/Ventas.aspx index 59e0d4f5f..d0cb29335 100644 --- a/Ventas/Ventas.aspx +++ b/Ventas/Ventas.aspx @@ -1253,9 +1253,11 @@ <%--1--%> -
-
+
+ +
+
@@ -1671,7 +1673,7 @@ Amort. Ant.: -   +   @@ -4929,7 +4931,7 @@     - + Sucursal: @@ -7970,9 +7972,9 @@
-
+
- +
@@ -8590,6 +8592,7 @@
+
diff --git a/Ventas/Ventas.aspx.vb b/Ventas/Ventas.aspx.vb index 1b81cae90..4ab55aa65 100644 --- a/Ventas/Ventas.aspx.vb +++ b/Ventas/Ventas.aspx.vb @@ -9752,13 +9752,13 @@ Partial Class Ventas Dim CveVendedor As Integer = DdlVendedor.SelectedValue.ToEntero() Dim ObjVentas As New ClsVentas - If ObjVentas.GetAutorizacionLimite(UsuarioActual.CveEmpresa, CveCliente, CveVendedor, "Ing", CveEstatus:=1) Then + If ObjVentas.GetAutorizacionLimite(UsuarioActual.CveEmpresa, CveCliente, CveVendedor, If(DdlTipoComprobante.SelectedValue = "Egs", "Egs", "Ing"), CveEstatus:=1) Then Dim RowAutorizacion As DataRow = Nothing 'SI TIENE DIAS VENCIDOS BUSCAR POR TIPO VENCIMIENTO If TieneDiasVencidos Then - RowAutorizacion = ObjVentas.DtResultados.FiltroPrimero($"TipoAutorizacion IN(1,2) AND CveVenta IS NULL AND CveTipoDocumento='Ing'", Orderby:="Importe DESC") + RowAutorizacion = ObjVentas.DtResultados.FiltroPrimero($"TipoAutorizacion IN(1,2) AND CveVenta IS NULL AND CveTipoDocumento='{If(DdlTipoComprobante.SelectedValue = "Egs", "Egs", "Ing")}'", Orderby:="Importe DESC") Else - RowAutorizacion = ObjVentas.DtResultados.FiltroPrimero($"TipoAutorizacion = 1 AND CveVenta IS NULL AND CveTipoDocumento='Ing'", Orderby:="Importe DESC") + RowAutorizacion = ObjVentas.DtResultados.FiltroPrimero($"TipoAutorizacion = 1 AND CveVenta IS NULL AND CveTipoDocumento='{If(DdlTipoComprobante.SelectedValue = "Egs", "Egs", "Ing")}'", Orderby:="Importe DESC") End If If RowAutorizacion IsNot Nothing Then