diff --git a/Bancos/CuentasBancarias.aspx.vb b/Bancos/CuentasBancarias.aspx.vb
index 0726942d5..ce28b5f56 100644
--- a/Bancos/CuentasBancarias.aspx.vb
+++ b/Bancos/CuentasBancarias.aspx.vb
@@ -33,8 +33,9 @@ Partial Class Bancos_CuentasBancarias
     Public Sub CargaDatos()
         Dim ObjBancos As New ClsBancos
         If ObjBancos.GetBancosCuentas(-1) Then
-            ViewState("DTBancosCuentas") = ObjBancos.DtResultados.FiltraParametros("CveEmpresa = " & UsuarioActual.CveEmpresa)
-            DtBan = ObjBancos.DtResultados.FiltraParametros("CveEmpresa = " & UsuarioActual.CveEmpresa)
+            Dim dt = ObjBancos.DtResultados.FiltraParametros("CveEmpresa = " & UsuarioActual.CveEmpresa, "", {"CveCuenta", "TipoCuenta", "Banco", "NumCuenta", "CLABE", "Moneda", "FInicial", "Estatus", "Fecha", "Usuario"})
+            ViewState("DTBancosCuentas") = dt
+            DtBan = dt
         Else
             Me.GvDatos.DataSource = Nothing
         End If
@@ -66,14 +67,14 @@ Partial Class Bancos_CuentasBancarias
         If ObjBancos.RemoveBancosCuentas(GvDatos.DataKeys(e.RowIndex).Value.ToString.ToEntero) Then
             GvDatos.EditIndex = -1
             ViewState("DTBancosCuentas") = ObjBancos.DtResultados.FiltraParametros("CveEmpresa = " & UsuarioActual.CveEmpresa)
-            DtBan = ObjBancos.DtResultados.FiltraParametros("CveEmpresa = " & UsuarioActual.CveEmpresa)
-
-            GlobalDTBancosCuentas(-1, CveEmpresa:=UsuarioActual.CveEmpresa) = Nothing
-
-            'If ObjBancos.GetBancosCuentasUsuarios(-1) Then
-            '    GlobalDTBancosCuentas(-1, CveEmpresa:=UsuarioActual.CveEmpresa) = ObjBancos.DtResultados
-            'End If
-
+            DtBan = ObjBancos.DtResultados.FiltraParametros("CveEmpresa = " & UsuarioActual.CveEmpresa)
+
+            GlobalDTBancosCuentas(-1, CveEmpresa:=UsuarioActual.CveEmpresa) = Nothing
+
+            'If ObjBancos.GetBancosCuentasUsuarios(-1) Then
+            '    GlobalDTBancosCuentas(-1, CveEmpresa:=UsuarioActual.CveEmpresa) = ObjBancos.DtResultados
+            'End If
+
             Alert("El Banco se eliminó correctamente.", TipoMensaje.MsgInformacion)
         End If