diff --git a/Ventas/PVCobranza.aspx b/Ventas/PVCobranza.aspx index f9629653d..9588e6991 100644 --- a/Ventas/PVCobranza.aspx +++ b/Ventas/PVCobranza.aspx @@ -396,8 +396,7 @@
- Cancelaciones pendientes - + Cancelaciones en proceso
@@ -418,16 +417,14 @@ + CssClass="table table-striped table-advance table-hover Widthall ScrollAD mysmallbtn" GridLines="None" Width="100%"> - - - - - + + + - + diff --git a/Ventas/PVCobranza.aspx.vb b/Ventas/PVCobranza.aspx.vb index 73019e857..85557279f 100644 --- a/Ventas/PVCobranza.aspx.vb +++ b/Ventas/PVCobranza.aspx.vb @@ -384,21 +384,24 @@ Partial Class Ventas_PVCobranza End Sub Private Sub CargaCancelaciones() - DivCancelacionesPendientes.Visible = True - Dim DtVentas As DataTable = Nothing + If DdlSubProyecto.SelectedValue.ToEntero() > 0 Then + DivCancelacionesPendientes.Visible = True + Dim DtVentas As DataTable = Nothing - Dim ObjVentas = New ClsVentas() - If ObjVentas.GetVentasPendientesCancelacion(UsuarioActual.CveEmpresa, UsuarioActual.CveUsuario) Then - DtVentas = ObjVentas.DtResultados.Copy() + Dim ObjVentas = New ClsVentas() + If ObjVentas.GetVentasPendientesCancelacion(UsuarioActual.CveEmpresa, UsuarioActual.CveUsuario) Then + DtVentas = ObjVentas.DtResultados.Copy() + End If + ObjVentas.Dispose() + + If DtVentas IsNot Nothing Then + + GvCancelaciones.DataSource = DtVentas.FiltraParametros($"(CveEstatusFactura IN (20) AND CveEstatusRefacturacion IN (0,4)) AND CveSubProyecto={DdlSubProyecto.SelectedValue.ToEntero()}") + GvCancelaciones.DataBind() + End If + + UpL.Update() End If - ObjVentas.Dispose() - - If DtVentas IsNot Nothing Then - GvCancelaciones.DataSource = DtVentas.FiltraParametros("(CveEstatusFactura IN (20,23) AND CveEstatusRefacturacion IN (0,4))") - GvCancelaciones.DataBind() - End If - - UpL.Update() End Sub Private Sub GvDatos_RowDataBound(sender As Object, e As GridViewRowEventArgs) Handles GvDatos.RowDataBound