Correcion Filtro Estatus Cliente

Bancos/PolizaCheque.aspx.vb

@@ -403,6 +403,7 @@ Partial Class Bancos_PolizaCheque
             CodigoCuenta = ""
             NombreCuenta = ""
 
+            If UsuarioActual.Empresa.UsaContabilidad Then
                 If drt("IdCtaContable").ToString.ToEntero > 0 Then 'DtCuentasContables
                     Dim drr As DataRow = DtCuentasContables.FiltroPrimero(String.Format("Id={0}", drt("IdCtaContable").ToString))
 
@@ -450,6 +451,9 @@ Partial Class Bancos_PolizaCheque
                     EsComodin = 0
 
                 End If
+            End If
+
+
 
             Dim dr As DataRow = DtMovimientos.NewRow
             dr("IdCuenta") = IdCuenta

Ventas/CatClientes.aspx

@@ -60,7 +60,7 @@
                                 <asp:DropDownList ID="DdlEstatus" runat="server" CssClass=" form-control  input-sm select2me" ValidationGroup="GrpFiltrar" Width="100%">
                                     <asp:ListItem Value="-1">Todos</asp:ListItem>
                                     <asp:ListItem Selected="True" Value="1">Activo</asp:ListItem>
-                                    <asp:ListItem Value="2">Inactivo</asp:ListItem>
+                                    <asp:ListItem Value="0">Inactivo</asp:ListItem>
                                 </asp:DropDownList>
                             </div>