diff --git a/Inventarios/RecepcionUsados.aspx b/Inventarios/RecepcionUsados.aspx index cd25a6832..804c83873 100644 --- a/Inventarios/RecepcionUsados.aspx +++ b/Inventarios/RecepcionUsados.aspx @@ -324,6 +324,8 @@ + + diff --git a/Inventarios/RecepcionUsados.aspx.vb b/Inventarios/RecepcionUsados.aspx.vb index 96262ce47..1b073987b 100644 --- a/Inventarios/RecepcionUsados.aspx.vb +++ b/Inventarios/RecepcionUsados.aspx.vb @@ -1096,6 +1096,7 @@ Partial Class Inventarios_RecepcionUsados EnvioCorreo() + CargaPendientesRecibir() UPDatos.Update() Else @@ -1923,6 +1924,10 @@ Partial Class Inventarios_RecepcionUsados End Sub Protected Sub BtnConsultarPendientes_Click(sender As Object, e As EventArgs) + CargaPendientesRecibir() + End Sub + + Private Sub CargaPendientesRecibir() Dim ObjVentas As New ClsVentas If ObjVentas.GetVentasUsados(-1, DdlSubProyectos.SelectedValue.ToEntero(), TxtFechaPendientes.Text.ToDateTime(), UsuarioActual.CveEmpresa) Then GVPendientes.DataSource = ObjVentas.DtResultados