diff --git a/Contabilidad2/CatCuentas.aspx.vb b/Contabilidad2/CatCuentas.aspx.vb
index 64e94e54c..7dbef8341 100644
--- a/Contabilidad2/CatCuentas.aspx.vb
+++ b/Contabilidad2/CatCuentas.aspx.vb
@@ -305,7 +305,8 @@ Partial Class Contabilidad2_CatCuentas
                                 CveConceptoAdmin:=CveConceptoAdmin, CveProveedor:=CveProveedor, CveCliente:=CveCliente, CveClasificacion:=CveClasificacion, PorcentajeImpuesto:=PorcentajeImpuesto, CveBancoCuenta:=CveBancoCuenta, CveAlmacen:=CveAlmacen) Then
 
             Dim codigo As String = DtDatos.FiltroPrimeroValor("Codigo", $"CveCuenta={IDSelected}")
-            If UsuarioActual.Empresa.TipoContabilizacion <> 1 Then
+
+            If UsuarioActual.Empresa.TipoContabilidad <> 1 Then
 
                 Using ObjConta2 As New ClsContPAQi(UsuarioActual.Empresa)