faltaba un dispose en una instancia de ClsVentas

2020-09-02 12:10:49 -07:00
parent 9e7e01f81f
commit fe2567f24a
5 changed files with 18 additions and 18 deletions
--- a/Bancos/RepCortes.aspx.vb
+++ b/Bancos/RepCortes.aspx.vb
@@ -61,9 +61,7 @@ Partial Class Bancos_RepCortes
            txtFechaVI.Text = Now.ToShortDateString
            txtFechaVF.Text = Now.ToShortDateString
            Me.Form.DefaultButton = BtnConsultar.UniqueID
-            DdlSubProyectos.DataSource = GlobalDTSubProyectosUsuarios(UsuarioActual.CveUsuario, -1, UsuarioActual.CveEmpresa)
-            DdlSubProyectos.DataBind()
-            DdlSubProyectos.Items.Insert(0, New ListItem("Todos", "-1"))
+            CargarCentrosDeCosto(Nothing, DdlSubProyectos, Nothing, LblSubProyecto)
        End If
    End Sub