diff --git a/Contabilidad/PlantillasPolizasDetalle.aspx.vb b/Contabilidad/PlantillasPolizasDetalle.aspx.vb
index c80bca90a..d41facbad 100644
--- a/Contabilidad/PlantillasPolizasDetalle.aspx.vb
+++ b/Contabilidad/PlantillasPolizasDetalle.aspx.vb
@@ -141,7 +141,7 @@ Partial Class Contabilidad_PlantillasPolizasDetalle
 
         DdlCtaContable.Items.Insert(0, New ListItem("Seleccione", "-1"))
 
-        If UsuarioActual.Empresa.TipoContabilizacion = 2 Then
+        If UsuarioActual.Empresa.TipoContabilidad = 1 Then
             Dim Conta As New ClsContabilidad
             Dim dtt As New DataTable
 
@@ -378,7 +378,7 @@ CveCuenta:=DdlCuentas.SelectedValue.ToEntero) Then
 
         'cargar la cuenta
 
-        If UsuarioActual.Empresa.TipoContabilizacion = 0 Then
+        If UsuarioActual.Empresa.TipoContabilidad = 1 Then
             'busco en la cuenta contable, lo que tenga asignado 
             Dim Con As New ClsContabilidad
             Dim dtt As DataTable = Nothing